UPDATE DATA NULL
Pessoal o que pode estar errado nesta linha do meu comando UPDATE? Esta dando a msg de erro:
(Tipo de dados incompativel co a expressão e criterio)
Sql = Sql & [Ô]Prazo=[ô][Ô] & IIf(Trim(Me.Controls([Ô]Grid_H[Ô] & X)) = [Ô][Ô], [Ô]NULL[Ô], [Ô]#[Ô] & Format(Me.Controls([Ô]Grid_H[Ô] & X), [Ô]MM/DD/YYYY[Ô]) & [Ô]#[Ô]) & [Ô][ô],[Ô]
A imagem mostra como esta saindo no comando. O banco é access e o campo esta como datatime.
(Tipo de dados incompativel co a expressão e criterio)
Sql = Sql & [Ô]Prazo=[ô][Ô] & IIf(Trim(Me.Controls([Ô]Grid_H[Ô] & X)) = [Ô][Ô], [Ô]NULL[Ô], [Ô]#[Ô] & Format(Me.Controls([Ô]Grid_H[Ô] & X), [Ô]MM/DD/YYYY[Ô]) & [Ô]#[Ô]) & [Ô][ô],[Ô]
A imagem mostra como esta saindo no comando. O banco é access e o campo esta como datatime.
IRENKO,
O WHERE Esta junto com o campo codigo, coloca um espaço entre eles.
Thiago
O WHERE Esta junto com o campo codigo, coloca um espaço entre eles.
Thiago
Não é isso. Se eu comento a linha da data, o update funciona, creio q o erro esta na formatação da data.
Vc está qual tipo de banco de dados?
access
Tentei assim tambem e da o mesmo erro:
Sql = Sql & [Ô][Prazo]=[ô][Ô] & IIf(Not IsDate(Me.Controls([Ô]Grid_H[Ô] & X)), Empty, Format(Me.Controls([Ô]Grid_H[Ô] & X), [Ô]dd/mm/yyyy[Ô])) & [Ô][ô],[Ô]
Sql = Sql & [Ô][Prazo]=[ô][Ô] & IIf(Not IsDate(Me.Controls([Ô]Grid_H[Ô] & X)), Empty, Format(Me.Controls([Ô]Grid_H[Ô] & X), [Ô]dd/mm/yyyy[Ô])) & [Ô][ô],[Ô]
Tenta assim
Sql = Sql & [Ô][Prazo]=[ô][Ô] & IIf(Not IsDate(Me.Controls([Ô]Grid_H[Ô] & X)), Null, Format(Me.Controls([Ô]Grid_H[Ô] & X), [Ô]dd/mm/yyyy[Ô])) & [Ô][ô],[Ô]
ou
If (Not IsDate(Me.Controls([Ô]Grid_H[Ô] & X)) then
Sql = Sql & [Ô][Prazo]= [Ô] & Format(Me.Controls([Ô]Grid_H[Ô] & X), [Ô]dd/mm/yyyy[Ô])) & [Ô][ô],[Ô]
else
Sql = Sql & [Ô][Prazo] is Null [Ô]
end if
Thiago.
Sql = Sql & [Ô][Prazo]=[ô][Ô] & IIf(Not IsDate(Me.Controls([Ô]Grid_H[Ô] & X)), Null, Format(Me.Controls([Ô]Grid_H[Ô] & X), [Ô]dd/mm/yyyy[Ô])) & [Ô][ô],[Ô]
ou
If (Not IsDate(Me.Controls([Ô]Grid_H[Ô] & X)) then
Sql = Sql & [Ô][Prazo]= [Ô] & Format(Me.Controls([Ô]Grid_H[Ô] & X), [Ô]dd/mm/yyyy[Ô])) & [Ô][ô],[Ô]
else
Sql = Sql & [Ô][Prazo] is Null [Ô]
end if
Thiago.
Poste o TIPO DE DADOS de todos os CAMPOS envolvidos na instrução SQL.
Tecla, tirando o campo Prazo que é DataTime e o campo ID que é Interger, o resto é Texto.
A para conhecimento maneira correta é:
Sql = Sql & [Ô][Prazo]=[Ô] & IIf(Not IsDate(Me.Controls([Ô]Grid_H[Ô] & X)), [Ô]null[Ô], [Ô][ô][Ô] + Format(Me.Controls([Ô]Grid_H[Ô] & X), [Ô]dd/mm/yyyy[Ô]) + [Ô][ô][Ô]) & [Ô],[Ô]
por LVFIOROT.
Valeu a todos.
Sql = Sql & [Ô][Prazo]=[Ô] & IIf(Not IsDate(Me.Controls([Ô]Grid_H[Ô] & X)), [Ô]null[Ô], [Ô][ô][Ô] + Format(Me.Controls([Ô]Grid_H[Ô] & X), [Ô]dd/mm/yyyy[Ô]) + [Ô][ô][Ô]) & [Ô],[Ô]
por LVFIOROT.
Valeu a todos.
Problema resolvido?
[txt-size=2]Encerre o tópico.[/txt-size]
[txt-size=2]Encerre o tópico.[/txt-size]
Tópico encerrado , respostas não são mais permitidas