Base de Datos
Publicado por patricio (47 intervenciones) el 11/10/2009 22:30:27
Hola, a todos, tengo 2 problemas con una base de datos, favor si me pueden ayudar
1.- Mi primer problema es que al exportar a mi base de datos , mi primer campo se va a otra fila, las demas quedan en la misma fila en forma horizontal que es donde quiero.
2.- Mi segundo problema es que al ingresar un nuevo dato me lo sobreescribe borrando el que exporte inicialmente.
Esta es mi aplicacion
Private Sub Command2_Click()
Data1.Recordset.AddNew
Data1.Recordset.Fields("Fecha Ingreso") = DTPicker2.Value
Data1.Recordset.Fields("Hora Ingreso") = DTPicker2.Value
Data1.Recordset.Fields("Centro Cultivo") = Combo1.Text
Data1.Recordset.Fields("Especie") = Combo2.Text
Data1.Recordset.Fields("Condicion Ingreso") = Combo3.Text
Data1.Recordset.Fields("Conductor") = Text1.Text
Data1.Recordset.Fields("Patente") = Text2.Text
Data1.Recordset.Update
End Sub
Que paso me falta agregar
1.- Mi primer problema es que al exportar a mi base de datos , mi primer campo se va a otra fila, las demas quedan en la misma fila en forma horizontal que es donde quiero.
2.- Mi segundo problema es que al ingresar un nuevo dato me lo sobreescribe borrando el que exporte inicialmente.
Esta es mi aplicacion
Private Sub Command2_Click()
Data1.Recordset.AddNew
Data1.Recordset.Fields("Fecha Ingreso") = DTPicker2.Value
Data1.Recordset.Fields("Hora Ingreso") = DTPicker2.Value
Data1.Recordset.Fields("Centro Cultivo") = Combo1.Text
Data1.Recordset.Fields("Especie") = Combo2.Text
Data1.Recordset.Fields("Condicion Ingreso") = Combo3.Text
Data1.Recordset.Fields("Conductor") = Text1.Text
Data1.Recordset.Fields("Patente") = Text2.Text
Data1.Recordset.Update
End Sub
Que paso me falta agregar
Valora esta pregunta


0