franckmj
Bovino adicto
- Desde
- 1 Sep 2007
- Mensajes
- 978
- Tema Autor
- #1
Hola mis estimados Bakunos lo que pasa es que estoy desarrollando una aplicacion en visual 6 que requiere Altas, bajas y Cambios mi conexion es a access 2003 estoy con un comando Data pero me marca un error mi codigo es el siguiente:
en esta parte del codigo tengo mi problema me marca error en la parte de Recordset y no se por que si pueedn ayudarme se los agradecere
Private Sub btnguardar_Click()
Data1.Recordset.AddNew <<<<--- el pronblema me lo marca aki
Data1.recorset.Fields("nombre_empleado") = txtnombre.Text
Data1.recorset.Fields("apellidos") = txtapellidos.Text
Data1.recorset.Update
End Sub
Private Sub Form_Load()
Set DB = New ADODB.Connection
DB.ConnectionString = "Provider=microsoft.jet.oledb.4.0;" & "Data Source= " & App.Path & "\Nomina.mdb" & ";" ' en este tengo mi cadena de conexion
DB.Open
End Sub
en esta parte del codigo tengo mi problema me marca error en la parte de Recordset y no se por que si pueedn ayudarme se los agradecere
Private Sub btnguardar_Click()
Data1.Recordset.AddNew <<<<--- el pronblema me lo marca aki
Data1.recorset.Fields("nombre_empleado") = txtnombre.Text
Data1.recorset.Fields("apellidos") = txtapellidos.Text
Data1.recorset.Update
End Sub
Private Sub Form_Load()
Set DB = New ADODB.Connection
DB.ConnectionString = "Provider=microsoft.jet.oledb.4.0;" & "Data Source= " & App.Path & "\Nomina.mdb" & ";" ' en este tengo mi cadena de conexion
DB.Open
End Sub