consulta de registros
Publicado por noe (48 intervenciones) el 14/07/2007 01:45:52
ps a mi se me hace ke no me se explicar
lo ke necesito es una consulta por medio de la matricula que me mande los datos de esa persona
tengo este codigo, no se hacerle porke no me deja
segun yo es algo asi:
If matriculatext = "" Then
MsgBox "Agregue la matricula para mostrar datos..."
Else
Set db = OpenDatabase("D:\Thunder\system\personas.mdb")
SQL = "perso"
Set rec = db.OpenRecordset(SQL)
db.Execute "SELECT * FROM perso WHERE matricula LIKE '" & matriculatext & "'" aki me marca error
nombrestext.Text = rec("nombres")
apellidoptext.Text = rec("apep")
apellidomtext.Text = rec("apem")
end if
kiero ke al poner la matricula me ponga los demas registros de esa persona como el nombre apellidos etc, en ke estoy mal? me marca error en ke no se puede crear consulta
ya no hayo ke hacer con esto
gracias
lo ke necesito es una consulta por medio de la matricula que me mande los datos de esa persona
tengo este codigo, no se hacerle porke no me deja
segun yo es algo asi:
If matriculatext = "" Then
MsgBox "Agregue la matricula para mostrar datos..."
Else
Set db = OpenDatabase("D:\Thunder\system\personas.mdb")
SQL = "perso"
Set rec = db.OpenRecordset(SQL)
db.Execute "SELECT * FROM perso WHERE matricula LIKE '" & matriculatext & "'" aki me marca error
nombrestext.Text = rec("nombres")
apellidoptext.Text = rec("apep")
apellidomtext.Text = rec("apem")
end if
kiero ke al poner la matricula me ponga los demas registros de esa persona como el nombre apellidos etc, en ke estoy mal? me marca error en ke no se puede crear consulta
ya no hayo ke hacer con esto
gracias
Valora esta pregunta


0