busqueda en Base de Datos
El Gato
23 de Junio del 2004
Me tira error en la busqueda y no se que es, si alguien me puede ayudar se lo agradezco:
Dim BaseDato As Database
Dim Tabla As Recordset
Set BaseDato = OpenDatabase(LoadResString(4) & usuarioactivo & "LgjbD.mdb")
Set Tabla = BaseDato.OpenRecordset("Personas")
Tabla.FindFirst "Telefono='" & Text1 & "'"
Dim BaseDato As Database
Dim Tabla As Recordset
Set BaseDato = OpenDatabase(LoadResString(4) & usuarioactivo & "LgjbD.mdb")
Set Tabla = BaseDato.OpenRecordset("Personas")
Tabla.FindFirst "Telefono='" & Text1 & "'"
El Gato
23 de Junio del 2004
Se que esto debe ser facil, ME AYUDAN!!!!!!