Ado
Publicado por Jorge Díaz (42 intervenciones) el 02/02/2004 20:02:32
db.CursorLocation = adUseServer
db.Open "PROVIDER=MSDASQL;dsn=Siscat;uid=lbarrera;pwd=123;database=siscat;"
empleado.Open "select CED_EMP,SEG_SOC,NO1_EMP,AP1_EMP,SEXO,STA_EMP from empleado", db, adOpenStatic, adLockOptimistic
criterio1 = "ced_emp like '" & cedula.Text & "'"
este manda error usando la caja de texto ó
criterio1 = "ced_emp like '" & variable & "'"
donde variable es de tipo string he hecho de todo cstr() le he concatenado las comillas nvavar=chr(34) + variable + chr(34)
y nada
este esta bien funciona
criterio = "ced_emp like '" & "08 035800357" & "'"
db.Open "PROVIDER=MSDASQL;dsn=Siscat;uid=lbarrera;pwd=123;database=siscat;"
empleado.Open "select CED_EMP,SEG_SOC,NO1_EMP,AP1_EMP,SEXO,STA_EMP from empleado", db, adOpenStatic, adLockOptimistic
criterio1 = "ced_emp like '" & cedula.Text & "'"
este manda error usando la caja de texto ó
criterio1 = "ced_emp like '" & variable & "'"
donde variable es de tipo string he hecho de todo cstr() le he concatenado las comillas nvavar=chr(34) + variable + chr(34)
y nada
este esta bien funciona
criterio = "ced_emp like '" & "08 035800357" & "'"
Valora esta pregunta


0