Correlativo?
Publicado por Dipat (1 intervención) el 29/03/2006 04:00:30
Hola a todos, esta es mi inquietud!
Necesito insertar en una bd access con código sql`, los datos de una factura, porque estoy haciendo un sistema de facturación en visual basic. Al campo Num. de Factura lo coloque autonumérico. Y utilizo este código para insertar en la tabla:
Set BD1 = OpenDatabase("C:\SIFAPE\SIFAPE1.mdb")
SQL1 = "insert into Factura_Encabezado(NUMERO_FACTURA,FECHA,CEDULA_CLI ENTE,NOMBRE_CLIENTE,DIRECCION_CLIENTE,TELEFONO_CLI ENTE,ESTADO) values (" & cod & ",'" & Lb_Fecha2.Caption & "',STR('" & Maskcedula.Text & "'),'" & txtNombre.Text & "','" & txtDireccion.Text & "','" & Masktelefono.Text & "','" & Combo1.Text & "')"
BD1.Execute SQL1
Lo que sucede es que sólo guarda la primera vez que inserto en la bd, si luego vuelvo a ejecutar el programa, no me guarda nada. Creo que es porque el campo es Autonomurico, además es el campo clave y esta relacionado con otra tabla.
No se que debo hacer si crear un correlativo por codigo sql o que?
Muchas gracias de antemano.
Necesito insertar en una bd access con código sql`, los datos de una factura, porque estoy haciendo un sistema de facturación en visual basic. Al campo Num. de Factura lo coloque autonumérico. Y utilizo este código para insertar en la tabla:
Set BD1 = OpenDatabase("C:\SIFAPE\SIFAPE1.mdb")
SQL1 = "insert into Factura_Encabezado(NUMERO_FACTURA,FECHA,CEDULA_CLI ENTE,NOMBRE_CLIENTE,DIRECCION_CLIENTE,TELEFONO_CLI ENTE,ESTADO) values (" & cod & ",'" & Lb_Fecha2.Caption & "',STR('" & Maskcedula.Text & "'),'" & txtNombre.Text & "','" & txtDireccion.Text & "','" & Masktelefono.Text & "','" & Combo1.Text & "')"
BD1.Execute SQL1
Lo que sucede es que sólo guarda la primera vez que inserto en la bd, si luego vuelvo a ejecutar el programa, no me guarda nada. Creo que es porque el campo es Autonomurico, además es el campo clave y esta relacionado con otra tabla.
No se que debo hacer si crear un correlativo por codigo sql o que?
Muchas gracias de antemano.
Valora esta pregunta
0