Visual Basic - no me busca el registro

Life is soft - evento anual de software empresarial
   
Vista:

no me busca el registro

Publicado por victor (1 intervención) el 10/11/2010 04:00:51
tengo una base accedo mediante ado y sql
pero me da numero de registro 0 necesito que busque a traves de una variable desde ya muchas gracias
Dim con As String
Set base = New Connection
Set rst = New Recordset
Set rst1 = New Recordset
ruta = "C:\base\estasit_sdos201005.mdb"

'Abrimos la base de datos
base.CursorLocation = adUseClient
base.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=" & ruta
con = InputBox("ingrese numero de DNI : ")
rst1.Open "select * from Estasit_Sdos_Ofic where documento like con;", base

'Abrimos el recordset y Ejecutamos la consulta
'rst.Open "SELECT Count(*) as ndoc FROM(select distinct documento from Estasit_Sdos_Ofic)where documento='con' ;", base

'Mostramos el resultado Maximo y Minimo del campo Gastos
'MsgBox rst.Fields("ndoc")
' Text2.Text = ndoc
Set DataGrid1.DataSource = rst1
End Sub
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:no me busca el registro

Publicado por cmgcharli (128 intervenciones) el 12/11/2010 10:55:36
Si con es el nombre de la variable en la consulta tendra que concatenarla
no es documento='con' en este caso le estas diciendo que documento debe ser igual a con no al contenido que tenga la variable con que es un dni
Seria ..............documento='" & con & "'.........
Lo mismo con el Like
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar