[DUDA] Error en ADO al poner un WHERE en la consulta

Iniciado por Psyke1, 2 Febrero 2015, 05:09 AM

0 Miembros y 1 Visitante están viendo este tema.

Psyke1

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:

Código (vb) [Seleccionar]
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:
Código (sql) [Seleccionar]
select EDAD from datos.csv where NOMBRE='MARIO'

Me devuelve esto:



¿Qué se me está escapando?
Muchas gracias.

DoEvents! :P

MCKSys Argentina

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:
MCKSys Argentina

"Si piensas que algo está bien sólo porque todo el mundo lo cree, no estás pensando."


Psyke1

Hola MCKSys:)

Aún compilado me da el mismo error...



¿Alguna idea?
Si quito el where funciona perfecto.
Esto es muy raro...  :-\

DoEvents! :P

seba123neo

proba cambiar la libreria de ADO, creo que la ultima es la 2.8.
La característica extraordinaria de las leyes de la física es que se aplican en todos lados, sea que tú elijas o no creer en ellas. Lo bueno de las ciencias es que siempre tienen la verdad, quieras creerla o no.

Neil deGrasse Tyson