Tengo un fichero csv con la siguiente información:
NOMBRE,EDAD,FECHA
MARIO,30,24/12/2002
MARIA,90,24/12/2001
PEDRO,10,24/12/2004
Y quiero hacer una consulta de la siguiente manera:
Dim oConn As New ADODB.Connection
Dim oRS As New ADODB.Recordset
oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" _
& "Data Source=" & Environ("temp") & ";" _
& "Extended Properties=""text;HDR=Yes;FMT=Delimited(;)"";Persist Security Info=False"
Set oRS = oConn.Execute("select * from datos.csv")
Dim ofield As ADODB.Field
Do Until oRS.EOF
For Each ofield In oRS.Fields
Debug.Print "Field Name = " & ofield.Name & " Field Value = " & ofield.Value
Next ofield
oRS.MoveNext
Loop
Esto devuelve:
Field Name = NOMBRE Field Value = MARIO
Field Name = EDAD Field Value = 30
Field Name = FECHA Field Value = 24/12/2002
Field Name = NOMBRE Field Value = MARIA
Field Name = EDAD Field Value = 90
Field Name = FECHA Field Value = 24/12/2001
Field Name = NOMBRE Field Value = PEDRO
Field Name = EDAD Field Value = 10
Field Name = FECHA Field Value = 24/12/2004
Pero si intento hacer una consulta del tipo:
select EDAD from datos.csv where NOMBRE='MARIO'
Me devuelve esto:
(http://i57.tinypic.com/mvotc3.png)
¿Qué se me está escapando?
Muchas gracias.
DoEvents! :P
Hola!
Según veo en la web, ese error (selected collating sequence not supported by the operating system) sale cuando estás en el IDE.
Prueba a compilar un exe a ver si se soluciona así.
Saludos!
PD: En VB6, luego de compilar un exe, ejecuto el segundo SQL en el IDE y no da error... :huh: :huh:
Hola MCKSys, :)
Aún compilado me da el mismo error...
(http://i57.tinypic.com/2mee4r5.png)
¿Alguna idea?
Si quito el where funciona perfecto.
Esto es muy raro... :-\
DoEvents! :P
proba cambiar la libreria de ADO, creo que la ultima es la 2.8.