SoloCodigo
Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: gabperez en Jueves 21 de Noviembre de 2002, 17:27
-
Hola. Necesitaría que me indiquen como buscar un dato en una base de datos DAO (guardada como Acces 97). La base es simple, está ordenada por fechas y para cada día tiene dos valores asignados...
Lo que necesito es que me pase esos valores asignados, al indicarle la fecha en tiempo de ejecución, en una caja de texto por ejemplo.
Gracias y hasta pronto.
-
si es que estas usando un un control data puedes hacer hacer lo siguiente
d.RecordSource = "select * from histousuario where fecha =cdate('30/10/2002')"
'esto es un sql muy basico
d.Refresh 'esto es para actualizar
Tienes que enlazar los cuadros de texto previamente. y si utiliza codigo ado o en el data grid entonces al momento de abrir la tabla en vez de poner el nombre de la tabla pone la consulta sql.
-
El mensaje anterior esta mal, no es DAO.
set Mdb=dbengine.workspaces(0).opendatabase("c:Biblio")
set mrs=Mdb.openrecordset("Select * from Ntabla where CampoFecha=#03/01/2000#",dbopenDynaset)
'Y para mostrar los campos
if mrs.nomatch ' si no hay ninguno
exit sub
else
while not mrs.eof
debug.print mrs!NombreCampo1 & _
vbcrlf & mrs!NombreCampo2 ' Etc
wend
Espero que te haya servido de ayuda
un saludo