Boa noite,
O que poderia estar errado no código abaixo, para fins de edição.
Dá erro de sintaxe na instrução UPDATE
O erro ocorre quando eu tento fazer uma edição e algum campo fica em branco, aí tentei contornar utilizando o LIKE '*", mas também não certo. Ao um tempo atrás em outro projeto, utilizava um código parecido com esse, porém se eu deixasse algum campo em branco ele salvava igual, sem dar erro, mas esse não estou conseguindo.
Onde erro?
CurrentDb.Execute "UPDATE Tbl_Lancamentos_Gerais SET Id=" & Me.Txt_Id & ",Data_Troca='" & Me.Txt_Data & _
"',Placa='" & Me.Txt_Placa & "',Desc_Veic='" & Me.Txt_Modelo & "',Tipo_Veiculo='" & Me.Txt_Tipo_Veiculo & _
"',Data_Ultima_Troca='" & Me.Txt_Ult_Troca & "',Km_Horas_Ultima_Troca=" & Me.Km_Inicial & _
",Km_Horas_Troca_Atual=" & Km_Final & ",Km_Horas_Rod=" & Txt_Km_Rod & _
",Obs='" & Txt_Ob & "',Status_Troca='" & Txt_Status2 & _
"',Data_Edicao='" & Date & "',Hora_Edicao='" & Time & "',Condutor='" & Txt_Condutor & _
"',Local='" & Txt_Local & "',Tipo_Item='" & Txt_Tipo_Item & "' Where Id=" & Txt_Id & ""
O que poderia estar errado no código abaixo, para fins de edição.
Dá erro de sintaxe na instrução UPDATE
O erro ocorre quando eu tento fazer uma edição e algum campo fica em branco, aí tentei contornar utilizando o LIKE '*", mas também não certo. Ao um tempo atrás em outro projeto, utilizava um código parecido com esse, porém se eu deixasse algum campo em branco ele salvava igual, sem dar erro, mas esse não estou conseguindo.
Onde erro?
CurrentDb.Execute "UPDATE Tbl_Lancamentos_Gerais SET Id=" & Me.Txt_Id & ",Data_Troca='" & Me.Txt_Data & _
"',Placa='" & Me.Txt_Placa & "',Desc_Veic='" & Me.Txt_Modelo & "',Tipo_Veiculo='" & Me.Txt_Tipo_Veiculo & _
"',Data_Ultima_Troca='" & Me.Txt_Ult_Troca & "',Km_Horas_Ultima_Troca=" & Me.Km_Inicial & _
",Km_Horas_Troca_Atual=" & Km_Final & ",Km_Horas_Rod=" & Txt_Km_Rod & _
",Obs='" & Txt_Ob & "',Status_Troca='" & Txt_Status2 & _
"',Data_Edicao='" & Date & "',Hora_Edicao='" & Time & "',Condutor='" & Txt_Condutor & _
"',Local='" & Txt_Local & "',Tipo_Item='" & Txt_Tipo_Item & "' Where Id=" & Txt_Id & ""