Visual Basic - Error agregar un registro Access 07

Life is soft - evento anual de software empresarial
   
Vista:

Error agregar un registro Access 07

Publicado por mauricio (50 intervenciones) el 25/02/2011 17:35:02
Hola chicos, este es mi problema.
VB6 + Access 2007 + ADO

La aplicacion esta hecha en windows 7 (funciona perfecto) pero en XP da el error.

Jamas me pasó, al intentar agregar un registro en la base me sale error de "Uso no valido de null".
La base de datos SI CONTIENE registros almacenados.

Private Sub btnGuardar_Click()

'aqui coloco en un txt el codigo del cliente consecutivo al anterior
If Base.RecordCount > 0 Then
Base.MoveLast
txt_codigo.Text = Format(Base.Fields(0).Value + 1, "0000000")
Else
txt_codigo = "0000001"
End If

'me voy al ultimo registro para agregar uno nuevo (simpre lo hice asi)
Base.MoveLast
'desde aqui en adelante no pasa, hasta aqui llega, sale error de null
With Base
.AddNew
.Fields("Codigo") = txt_codigo.Text
.Fields("Nombre") = txt_nombre.Text
.Fields("Apellido") = txt_apellido.Text
.Fields("DNI") = txt_dni.Text
.Fields("Localidad") = txt_localidad.Text
.Fields("Domicilio") = txt_domicilio.Text
.Fields("Telefono") = txt_telefono.Text
.Fields("Saldo") = Replace(txt_saldo.Text, ",", ".", 1)
.Update
End With

End sub
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Error agregar un registro Access 07

Publicado por zugger (1 intervención) el 27/02/2011 17:14:39
puede que tengas mal configurado el access, eso de indexado o clave principal, me paso una vuelta que tenia todos mis clientes desordenados en la base de datos, entonces al queres agregar uno nuevo me decia que el valor era duplicado.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Error agregar un registro Access 07

Publicado por mauriciocde (50 intervenciones) el 01/03/2011 21:01:56
Hola, zugger, no he dado solucion a mi problema todavia. te agradezco tu cooperacion
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar