INSERT INTO

JAIR2002 06/09/2010 22:47:34
#352375
Pessoal desculpe as perguntas é q estou aprendendo o vb e sql
gostaria de saber onde esta o erro na clausula abaixo

a mesma gera erro de sintax.


sql = [Ô]INSERT INTO tblBoletim (CodCadastro, Expediente, HorarioExpediente, DiaDaSemana, DataDoBoletim, NaturezaDaOcorrencia, Local, DataDaOcorrencia, Horario, Afeto, Delegacia, Historico)[Ô]
sql = sql & [Ô] VALUES ([ô][Ô] & TxtId & [Ô],[Ô] & _
Format(txtExpediente.Text, [Ô]dd/mm/aaaa[Ô]) & [Ô],[Ô] & _
Format(txtHorarioExpediente.Text, [Ô]hh:mm[Ô]) & [Ô],[Ô] & _
txtDiaDaSemanaExpediente.Text & [Ô][ô],[ô][Ô] & _
Format(txtData.Text, [Ô]dd/mm/aaaa[Ô]) & [Ô],[Ô] & _
CbNaturezaOcorrencia.Text & [Ô][ô],[ô][Ô] & _
txtLocalOcorrencia.Text & [Ô][ô],[ô][Ô] & _
txtDataOcorrencia.Text & [Ô][ô],[ô][Ô] & _
txtHoraOcorrencia.Text & [Ô][ô],[ô][Ô] & _
Cbafeto.Text & [Ô][ô],[ô][Ô] & _
IdCodDelegacia & [Ô],[Ô] & _
RichTextBo.Text

[ô] gera o numero do boletim
Call NumeraRegistros
cnn.Execute sql

grato.
TECLA 06/09/2010 23:01:56
#352377
Resposta escolhida
Comece alterando a formatação [Ô]dd/mm/aaaa[Ô] para [Ô]dd/mm/yyyy[Ô].
JAIR2002 07/09/2010 09:48:30
#352381
TECLA,

Obrigado pela atenção amigo, sou um dos maiores admiradores do seu tabalho desde que entrei no forum.

Fiz a correção que você passou, mas continua dando o erro de sintaxe.

rapaz já fiz tudo o que podia, mas, infelizmente não acho a origem deste erro.

obrigado
TECLA 07/09/2010 10:11:40
#352382
Qual é o tipo de dados dos CAMPOS?
Outra coisa, o nome do controle sinalizado em vermelho está correto?
Não está faltando fechar o parênteses no final da instrução?


sql = [Ô]INSERT INTO tblBoletim (CodCadastro, Expediente, HorarioExpediente, DiaDaSemana, DataDoBoletim, NaturezaDaOcorrencia, Local, DataDaOcorrencia, Horario, Afeto, Delegacia, Historico)[Ô]
sql = sql & [Ô] VALUES ([ô][Ô] & TxtId & [Ô],[Ô] & _
Format(txtExpediente.Text, [Ô]dd/mm/aaaa[Ô]) & [Ô],[Ô] & _
Format(txtHorarioExpediente.Text, [Ô]hh:mm[Ô]) & [Ô],[Ô] & _
txtDiaDaSemanaExpediente.Text & [Ô][ô],[ô][Ô] & _
Format(txtData.Text, [Ô]dd/mm/aaaa[Ô]) & [Ô],[Ô] & _
CbNaturezaOcorrencia.Text & [Ô][ô],[ô][Ô] & _
txtLocalOcorrencia.Text & [Ô][ô],[ô][Ô] & _
txtDataOcorrencia.Text & [Ô][ô],[ô][Ô] & _
txtHoraOcorrencia.Text & [Ô][ô],[ô][Ô] & _
Cbafeto.Text & [Ô][ô],[ô][Ô] & _
IdCodDelegacia & [Ô],[Ô] & _
[txt-color=#e80000]RichTextBo.Text[/txt-color]
JAIR2002 07/09/2010 13:21:40
#352393
TECLA,

Obrigado pelas dicas.

Resolvir da seguinte forma: fui colocando campo por campo até chegar no campo que estava dando erro de sintaxe, apaguei ele na tabela e depois o escrevir com outro nome, funcionou perfeitamente.

abraços.
Tópico encerrado , respostas não são mais permitidas