ERRO EM UPDATE
TENHO A SEGUINTE ROTINA PARA FAZER ALTERAÇÃO NO CADASTRO, MAIS ESTà MOSTRANDO O SEGUINTE ERRO.
con.Execute [Ô]UPDATE tblacessorio [Ô] & _
[Ô]SET Lancamento=[ô][Ô] & IIf(atxtLançamento.Text = [Ô][Ô], [Ô]NULL[Ô], [Ô]#[Ô] & Format(atxtLançamento, [Ô]mm/dd/yyyy[Ô]) & [Ô]#[Ô]) & [Ô], Especificacao=[ô][Ô] & cboEspecificaçao & [Ô][ô], Saida=[Ô] & IIf(aTxtSaida.Text = [Ô][Ô], [Ô]NULL[Ô], [Ô]#[Ô] & Format(atxtSaida, [Ô]mm/dd/yyyy[Ô]) & [Ô]#[Ô]) & [Ô], Conclusao=[ô][Ô] & cboConclusao & [Ô][ô] [Ô] & _
[Ô]WHERE Especificacao=[ô][Ô] & Tipo & [Ô][ô];[Ô]
AGRADEÇO AJUDA
ABRAÇOS
con.Execute [Ô]UPDATE tblacessorio [Ô] & _
[Ô]SET Lancamento=[ô][Ô] & IIf(atxtLançamento.Text = [Ô][Ô], [Ô]NULL[Ô], [Ô]#[Ô] & Format(atxtLançamento, [Ô]mm/dd/yyyy[Ô]) & [Ô]#[Ô]) & [Ô], Especificacao=[ô][Ô] & cboEspecificaçao & [Ô][ô], Saida=[Ô] & IIf(aTxtSaida.Text = [Ô][Ô], [Ô]NULL[Ô], [Ô]#[Ô] & Format(atxtSaida, [Ô]mm/dd/yyyy[Ô]) & [Ô]#[Ô]) & [Ô], Conclusao=[ô][Ô] & cboConclusao & [Ô][ô] [Ô] & _
[Ô]WHERE Especificacao=[ô][Ô] & Tipo & [Ô][ô];[Ô]
AGRADEÇO AJUDA
ABRAÇOS
Tenta assim:
con.Execute [Ô]UPDATE tblacessorio SET Lancamento=[Ô] & IIf(atxtLançamento.Text = [Ô][Ô], [Ô]NULL[Ô], [Ô]#[Ô] & _
Format(atxtLançamento, [Ô]mm/dd/yyyy[Ô]) & [Ô]#[Ô]) & [Ô], Especificacao=[ô][Ô] & cboEspecificaçao & [Ô][ô], Saida=[Ô] & _
IIf(atxtSaida.Text = [Ô][Ô], [Ô]NULL[Ô], [Ô]#[Ô] & Format(atxtSaida, [Ô]mm/dd/yyyy[Ô]) & [Ô]#[Ô]) & [Ô], Conclusao=[ô][Ô] & _
cboConclusao & [Ô][ô] WHERE Especificacao=[ô][Ô] & Tipo & [Ô][ô];[Ô]
OBRIGADO ROBIU, DEU CERTO SUA ROTINA
ABRAÇOS.
ABRAÇOS.
Tópico encerrado , respostas não são mais permitidas