Busqueda con DAO
Hola... Hace tiempos no te escribía, quería saber si me puedes ayudar con una consulta, mira estoy utilizando DAO. Recordset para la búsqueda de registros en una tabla... Y la consulta me la hace, ¿pero quisiera saber como desplegar ese resultado de la consulta en un formulario?...
Más o menos este es mi código para que lo veas:
Dim rst As DAO.Recordset
Dim Sql As String
Dim db As Database
Set db = CurrentDb
If btnfecha.Value = True And btntipoestable.Value = True Then
Sql = "SELECT Fecha, Tipo, Área, Nombre, Contacto, Tipocontacto, Materia, Nivel, Dirección, Sector, Ciudad, Teléfono, Correo FROM Educación "
Sql = Sql & "WHERE Fecha = ' " & txtfecha & " '"
Sql = Sql & "AND Tipo = ' " & lsttipoestable & " '"
End If
Set rst = db.OpenRecordset(Sql)
Más o menos este es mi código para que lo veas:
Dim rst As DAO.Recordset
Dim Sql As String
Dim db As Database
Set db = CurrentDb
If btnfecha.Value = True And btntipoestable.Value = True Then
Sql = "SELECT Fecha, Tipo, Área, Nombre, Contacto, Tipocontacto, Materia, Nivel, Dirección, Sector, Ciudad, Teléfono, Correo FROM Educación "
Sql = Sql & "WHERE Fecha = ' " & txtfecha & " '"
Sql = Sql & "AND Tipo = ' " & lsttipoestable & " '"
End If
Set rst = db.OpenRecordset(Sql)
1 Respuesta
Respuesta de kieleze
1