agregar registro a base de datos
Publicado por roberto (14 intervenciones) el 07/08/2007 22:46:41
hola: quiero agregar un registro a la base de datos pero no se donde esta el error, el codigo es el sgte:
Dim varbase As Database
Dim varreg As Recordset
Set varbase = OpenDatabase("C:\Documents and Settings\ROBERTO GODOY\Mis documentos\base de datos programa.mdb")
Set varreg = varbase.OpenRecordset("vales")
varreg.AddNew
varreg.Empresa = Text1.Text
varreg.Serie = Text2.Text
varreg.Movil = Text3.Text
varreg.Fecha = Text4.Text
varreg.Conductor = Text5.Text
varreg.Tarifa = Text6.Text
varreg.Observaciones = Text7.Text
varreg.Update
los cuadros de texto contiene la informacion que deseo agregar. agradecere si me pueden ayudar
Dim varbase As Database
Dim varreg As Recordset
Set varbase = OpenDatabase("C:\Documents and Settings\ROBERTO GODOY\Mis documentos\base de datos programa.mdb")
Set varreg = varbase.OpenRecordset("vales")
varreg.AddNew
varreg.Empresa = Text1.Text
varreg.Serie = Text2.Text
varreg.Movil = Text3.Text
varreg.Fecha = Text4.Text
varreg.Conductor = Text5.Text
varreg.Tarifa = Text6.Text
varreg.Observaciones = Text7.Text
varreg.Update
los cuadros de texto contiene la informacion que deseo agregar. agradecere si me pueden ayudar
Valora esta pregunta


0