Actualizar la fecha de una tabla mediante una forma
Publicado por Paquita Gol (1 intervención) el 05/03/2020 20:59:09
Quiero que me actualice en tabla o consulta, el campo fecha_entrada o fecha_salida, desde un formulario, donde ingreso la cantidad de piezas a salis y la fecha que salieron las piezas. el codigo que tengo es este.
y donde esta el update, la parte de la fecha no me la hace, y me marca error 3144.e probado muchas formas y siempre es error, o no hace el cambio de fecha,
Porfavor alguien me puede ayudar.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Private Sub cmd_gardar_Click()
If IsNull(txt_salidas.Value) Or txt_salidas.Value = "" Then
MsgBox "Por favor introdusca la cantidad a salir", vbInformation, "Salidas"
txt_salidas.SetFocusExit Sub
ElseIf IsNull(Txt_Fechas_salidas.Value) Or Txt_Fechas_salidas.Value = "" Then
MsgBox "Por favor selecione la fecha", vbInformation, "Salidas"
Txt_Fechas_salidas.SetFocusExit Sub
Else
If MsgBox("Esta seguro que desea registrar una salida de producto" & txt_No_producto, vbYesNo, "Aviso") = vbYes Then
CurrentDb.Execute ("UPDATE Salidas Set salidas=salidas + " & txt_salidas.Value & ", Fechas_salidas =#" & Txt_Fechas_salidas.Value & "#," & " WHERE No_de_parte = '" & txt_No_de_parte.Value & "'")
MsgBox "Salida de producto efectuado correctamente", vbInformation, "Avi"
txt_salidas.Value = ""
Txt_Fechas_salidas.Value = ""
Else
txt_salidas.Value = ""
Txt_Fechas_salidas.Value = ""
End If
End If
End Sub
y donde esta el update, la parte de la fecha no me la hace, y me marca error 3144.e probado muchas formas y siempre es error, o no hace el cambio de fecha,
Porfavor alguien me puede ayudar.
Valora esta pregunta
0
