Problemas al buscar
¿Hola cómo estas?
Tengo un problema el buscar en mi base de datos es en access 97 te paso mi código al final porgo el error que me dio no se porque
Option Explicit
Dim rs As Recordset
Dim db As Database
Private Sub CmdBuscar_Click()
DataCorte.Recordset.MoveFirst
DataCorte.Recordset.FindFirst ("Fecha=") & TxtFeBusqueda.Text
If DataCorte.Recordset.NoMatch Then
MsgBox ("No se encuentra la fecha")
Else
TxtCorte.Text = DataCorte.Recordset!Totales
End If
End Sub
Private Sub Form_Load()
Const sPathBase As String = "C:\syschec\BdEstacio.MDB"
'PONGO DONDE ESTA LA BASE DE DATOS
Set db = OpenDatabase(sPathBase)
Set rs = db.OpenRecordset("SELECT * FROM MaeCobranza", dbOpenDynaset)
'AQUI ES DONDE LE DIGO DONDE TENGO QUE GRABAR
End Sub
Este es el error que me da
Run time '3070'
Microsoft jet database engine does not recognize 'c' as a valid field name or expression.
Tengo un problema el buscar en mi base de datos es en access 97 te paso mi código al final porgo el error que me dio no se porque
Option Explicit
Dim rs As Recordset
Dim db As Database
Private Sub CmdBuscar_Click()
DataCorte.Recordset.MoveFirst
DataCorte.Recordset.FindFirst ("Fecha=") & TxtFeBusqueda.Text
If DataCorte.Recordset.NoMatch Then
MsgBox ("No se encuentra la fecha")
Else
TxtCorte.Text = DataCorte.Recordset!Totales
End If
End Sub
Private Sub Form_Load()
Const sPathBase As String = "C:\syschec\BdEstacio.MDB"
'PONGO DONDE ESTA LA BASE DE DATOS
Set db = OpenDatabase(sPathBase)
Set rs = db.OpenRecordset("SELECT * FROM MaeCobranza", dbOpenDynaset)
'AQUI ES DONDE LE DIGO DONDE TENGO QUE GRABAR
End Sub
Este es el error que me da
Run time '3070'
Microsoft jet database engine does not recognize 'c' as a valid field name or expression.
1 Respuesta
Respuesta de lazcanor
1
Con que Visual estas trabajando con el 6 o con studio.
Lo que te esta diciendo es que la cadena que estas mandadon no la reconoce el campo. Puede ser por la longitud del campo, puede ser por pasar de referencia, tendrás que hacer tu cambio de referencia recuerda que visual basic en la fecha empezá en el formato americano de mes día y año, pero no creo que se a este el problema si no más bien que estas pasando de referencia a un campo cadena el cual haya que convertir su valor a numero o dato. Por otro lado si esto ya lo hisite alguna vez y esta no se hace ahora bajate el servese pack de office.
Lo que te esta diciendo es que la cadena que estas mandadon no la reconoce el campo. Puede ser por la longitud del campo, puede ser por pasar de referencia, tendrás que hacer tu cambio de referencia recuerda que visual basic en la fecha empezá en el formato americano de mes día y año, pero no creo que se a este el problema si no más bien que estas pasando de referencia a un campo cadena el cual haya que convertir su valor a numero o dato. Por otro lado si esto ya lo hisite alguna vez y esta no se hace ahora bajate el servese pack de office.
