Visual Basic para Aplicaciones - Problemas con consulta de actualización

Life is soft - evento anual de software empresarial
 
Vista:
sin imagen de perfil

Problemas con consulta de actualización

Publicado por Jon (12 intervenciones) el 25/09/2016 22:32:02
Buenos días:

He creado un código para actualizar datos en una tabla, a través de un consulta de actualización. La cuestión es que actualice el campo Factura_Serie con el valor de la variable MiSerieFactura, que toma de un formulario. Los valores que puede tomar este campo son: 00, 01, por lo que lo he definido como Texto con tamaño 2.

El código es el siguiente:

Dim MiSerieFactura As String


MiFecha = Me![Fecha_Factura]
MiAño = Me![Año_Factura]
MiSerieFactura = Me![SerieFactura]
N_Factura = Me![N_Factura]
Cliente = Me![Cliente_Id]
Var_BaseImponible = Me![Total_BaseImponible]
Var_IVA = Me![%_IVA]
Var_CuotaIVA = Nz(Me![Total_IVA])
Var_Recargo = Me![%_Recargo]
Var_CuotaRecargo = Nz(Me![Total_Recargo])
Var_TotalFactura = Me![Total_Factura]

CurrentDb.Execute "UPDATE Albaranes_Ventas SET Factura_Numero=" & N_Factura & ",Factura_Serie=" & MiSerieFactura & ",Factura_Año=" & MiAño & " WHERE Factura_Numero Is Null AND Facturado=-1"

El problema es que el valor que inserta en la tabla es 0 o 1 (en vez de 00 o 01).

He ejecutado el código paso a paso y la variable si que toma bien el valor, el problema es que la consulta actualiza mal el valor.

¿Alguna sugerencia, por favor?

Gracias
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