ERRO NO INSERT INTO
bom dia galera do vbmania. preciso de um Help de vcs.
quando executo o camando abaixo da o erro postado.
alguem sabe me dizer o que pode ser?
Sql = [Ô]INSERT INTO operadora (Nome,Razao,RegAns,CNPJ,Endereco,[Ô]
Sql = Sql & [Ô]Bairro,CEP,Cidade,UF,DD,Fone,Fax,Email,dtcad,hrcad,Usuario) VALUES ([Ô]
Sql = Sql & [Ô][ô][Ô] & Text1.Text & [Ô][ô],[Ô]
Sql = Sql & [Ô][ô][Ô] & Text2.Text & [Ô][ô],[Ô]
Sql = Sql & [Ô][ô][Ô] & Text3.Text & [Ô][ô],[Ô]
Sql = Sql & [Ô][ô][Ô] & Text4.Text & [Ô][ô],[Ô]
Sql = Sql & [Ô][ô][Ô] & Text5.Text & [Ô][ô],[Ô]
Sql = Sql & [Ô][ô][Ô] & Text6.Text & [Ô][ô],[Ô]
Sql = Sql & [Ô][ô][Ô] & Text7.Text & [Ô][ô],[Ô]
Sql = Sql & [Ô][ô][Ô] & Text8.Text & [Ô][ô],[Ô]
Sql = Sql & [Ô][ô][Ô] & Text9.Text & [Ô][ô],[Ô]
Sql = Sql & [Ô][ô][Ô] & Text10.Text & [Ô][ô],[Ô]
Sql = Sql & [Ô][ô][Ô] & Text11.Text & [Ô][ô],[Ô]
Sql = Sql & [Ô][ô][Ô] & Text12.Text & [Ô][ô],[Ô]
Sql = Sql & [Ô][ô][Ô] & Text13.Text & [Ô][ô],[Ô]
Sql = Sql & [Ô][ô][Ô] & Format(Date, [Ô]yyyy-mm-dd[Ô]) & [Ô][ô],[Ô]
Sql = Sql & [Ô][ô][Ô] & Time & [Ô][ô],[Ô]
Sql = Sql & [Ô][ô][Ô] & Trim(NUsuario) & [Ô][ô][Ô]
TB.Open Sql, DB, adOpenKeyset, adLockOptimistic
quando executo o camando abaixo da o erro postado.
alguem sabe me dizer o que pode ser?
Sql = [Ô]INSERT INTO operadora (Nome,Razao,RegAns,CNPJ,Endereco,[Ô]
Sql = Sql & [Ô]Bairro,CEP,Cidade,UF,DD,Fone,Fax,Email,dtcad,hrcad,Usuario) VALUES ([Ô]
Sql = Sql & [Ô][ô][Ô] & Text1.Text & [Ô][ô],[Ô]
Sql = Sql & [Ô][ô][Ô] & Text2.Text & [Ô][ô],[Ô]
Sql = Sql & [Ô][ô][Ô] & Text3.Text & [Ô][ô],[Ô]
Sql = Sql & [Ô][ô][Ô] & Text4.Text & [Ô][ô],[Ô]
Sql = Sql & [Ô][ô][Ô] & Text5.Text & [Ô][ô],[Ô]
Sql = Sql & [Ô][ô][Ô] & Text6.Text & [Ô][ô],[Ô]
Sql = Sql & [Ô][ô][Ô] & Text7.Text & [Ô][ô],[Ô]
Sql = Sql & [Ô][ô][Ô] & Text8.Text & [Ô][ô],[Ô]
Sql = Sql & [Ô][ô][Ô] & Text9.Text & [Ô][ô],[Ô]
Sql = Sql & [Ô][ô][Ô] & Text10.Text & [Ô][ô],[Ô]
Sql = Sql & [Ô][ô][Ô] & Text11.Text & [Ô][ô],[Ô]
Sql = Sql & [Ô][ô][Ô] & Text12.Text & [Ô][ô],[Ô]
Sql = Sql & [Ô][ô][Ô] & Text13.Text & [Ô][ô],[Ô]
Sql = Sql & [Ô][ô][Ô] & Format(Date, [Ô]yyyy-mm-dd[Ô]) & [Ô][ô],[Ô]
Sql = Sql & [Ô][ô][Ô] & Time & [Ô][ô],[Ô]
Sql = Sql & [Ô][ô][Ô] & Trim(NUsuario) & [Ô][ô][Ô]
TB.Open Sql, DB, adOpenKeyset, adLockOptimistic
tenta fechar o parenteses nesta linha
Sql = Sql & [Ô][ô][Ô] & Trim(NUsuario) & [Ô][ô])[Ô]
Sql = Sql & [Ô][ô][Ô] & Trim(NUsuario) & [Ô][ô])[Ô]
marcelão matou a pau, ainda bem que existem vcs no vbmania.
muito obrigado.
muito obrigado.
disponha irmão, não esquece de encerrar o tópico.
Abraço
Abraço
Tópico encerrado , respostas não são mais permitidas