problemas con el metodo seek
Publicado por ruben (33 intervenciones) el 07/05/2002 11:04:57
buenas, haber si se me puede ayudar. tengo problemas con el seek en una funcion haber si me decis q falla en esta funcion
Dim mib As DAO.Database, tabla As DAO.Recordset
Set mib = CurrentDb
Set tabla = mib.OpenRecordset("numerodepagos", dbopentable)
tabla.Index = "clave"
tabla.Seek "=", Form_factura.Factura
If tabla.NoMatch Then
existe = False
Else
existe = True
y segun sea el valor d "existe" hara una u otra cosa.
gracias
Dim mib As DAO.Database, tabla As DAO.Recordset
Set mib = CurrentDb
Set tabla = mib.OpenRecordset("numerodepagos", dbopentable)
tabla.Index = "clave"
tabla.Seek "=", Form_factura.Factura
If tabla.NoMatch Then
existe = False
Else
existe = True
y segun sea el valor d "existe" hara una u otra cosa.
gracias
Valora esta pregunta


0