STRING DE INCUSAO

CAIO.FR.SP 04/11/2010 10:15:24
#356607
valera me ajuda a acha o erro na seguinte string

[txt-size=2]
StrSQL = [Ô]INSERT INTO clientes (nome,datcad,tipp,cpf,rg,expe,sexo,nasc,estciv,nomfan,cnpj,insest,insmun,cep,uf,cid,bai,ende,num,comp,prox,fone1,fone2,fax,cel,email,site,situ,moti)[Ô]
StrSQL = StrSQL & [Ô] [Ô]
StrSQL = StrSQL & [Ô]VALUES ([ô][Ô] & txt_nome.Text & [Ô][ô],#[Ô] & Format(Date, [Ô]mm/dd/yyyy[Ô]) & [Ô]#,[ô][Ô] & Tip & [Ô][ô],[ô][Ô] & msk_cpf.Text & [Ô][ô],[ô][Ô] & txt_rg.Text & [Ô][ô],[ô][Ô] & txt_expedidor.Text & [Ô][ô],[ô][Ô] & cmb_sexo.Text & [Ô][ô],#[Ô] & Format(msk_nasc.Text, [Ô]mm/dd/yyyy[Ô]) & [Ô]#,[ô][Ô] & cmb_estciv.Text & [Ô][ô],[ô][Ô] & txt_nomfant.Text & [Ô][ô],[ô][Ô] & msk_cnpj.Text & [Ô][ô],[ô][Ô] & txt_inscest.Text & [Ô][ô],[ô][Ô] & txt_inscmun.Text & [Ô][ô],[ô][Ô] & msk_cep.Text & [Ô][ô],[ô][Ô] & cmb_uf.Text & [Ô][ô],[ô][Ô] & cmb_cid.Text & [Ô][ô],[ô][Ô] & txt_bai.Text & [Ô][ô],[ô][Ô] & txt_end.Text & [Ô][ô],[ô][Ô] & txt_numero.Text & [Ô][ô],[ô][Ô] & txt_complemento.Text & [Ô][ô],[ô][Ô] & txt_proximo.Text & [Ô][ô],[ô][Ô] & msk_fone1.Text & [Ô][ô],[ô][Ô] & msk_fone2.Text & [Ô][ô],[ô][Ô] & msk_fax.Text & [Ô][ô],[ô][Ô] & msk_cel.Text & [Ô][ô],[ô][Ô] & txt_email.Text & [Ô][ô],[ô][Ô] & txt_site.Text & [Ô][ô],[ô][Ô] & cmb_situ.Text & [Ô][ô],[ô][Ô] & txt_motivo.Text & [Ô][ô]);[Ô]

Conexao.Execute StrSQL


erro numero -2147217900 - erro de sintaxe na instrução insert into
SLEIFER 04/11/2010 10:32:06
#356610
talvez eu esteja falando besteira mas se fizer

Conexao.Execute [Ô]INSERT INTO clientes (nome,datcad,tipp,cpf,rg,expe,sexo,nasc,estciv,nomfan,cnpj,insest,insmun,cep,uf,cid,bai,ende,num,comp,prox,fone1,fone2,fax,cel,email,site,situ,moti)[Ô] & _
[Ô]VALUES ([ô][Ô] & txt_nome.Text & [Ô][ô],#[Ô] & Format(Date, [Ô]mm/dd/yyyy[Ô]) & [Ô]#,[ô][Ô] & Tip & [Ô][ô],[ô][Ô] & msk_cpf.Text & [Ô][ô],[ô][Ô] & txt_rg.Text & [Ô][ô],[ô][Ô] & txt_expedidor.Text & [Ô][ô],[ô][Ô] & cmb_sexo.Text & [Ô][ô],#[Ô] & Format(msk_nasc.Text, [Ô]mm/dd/yyyy[Ô]) & [Ô]#,[ô][Ô] & cmb_estciv.Text & [Ô][ô],[ô][Ô] & txt_nomfant.Text & [Ô][ô],[ô][Ô] & msk_cnpj.Text & [Ô][ô],[ô][Ô] & txt_inscest.Text & [Ô][ô],[ô][Ô] & txt_inscmun.Text & [Ô][ô],[ô][Ô] & msk_cep.Text & [Ô][ô],[ô][Ô] & cmb_uf.Text & [Ô][ô],[ô][Ô] & cmb_cid.Text & [Ô][ô],[ô][Ô] & txt_bai.Text & [Ô][ô],[ô][Ô] & txt_end.Text & [Ô][ô],[ô][Ô] & txt_numero.Text & [Ô][ô],[ô][Ô] & txt_complemento.Text & [Ô][ô],[ô][Ô] & txt_proximo.Text & [Ô][ô],[ô][Ô] & msk_fone1.Text & [Ô][ô],[ô][Ô] & msk_fone2.Text & [Ô][ô],[ô][Ô] & msk_fax.Text & [Ô][ô],[ô][Ô] & msk_cel.Text & [Ô][ô],[ô][Ô] & txt_email.Text & [Ô][ô],[ô][Ô] & txt_site.Text & [Ô][ô],[ô][Ô] & cmb_situ.Text & [Ô][ô],[ô][Ô] & txt_motivo.Text & [Ô][ô])[Ô]




não rola?
ACG1574 04/11/2010 10:46:01
#356614
caio, faz o seguinte pra nós, debuga a string, e coloca o resultado dela aqui pra nós, ai da pra ver o que esta concatenando errado, aparentemente ta tudo certo.
MARCELO.TREZE 04/11/2010 11:41:43
#356623
bom analizando sua query ela parece estar correta, resta saber o seguinte todos os campos são do tipo texto, exceto os campos datacad e nasc que soponho serem do tipo data/hora..

StrSQL = [Ô]INSERT INTO clientes [Ô]
StrSQL = StrSQL & [Ô](nome,datcad,tipp,cpf,rg,expe,sexo,nasc,estciv,nomfan,cnpj,[Ô]
StrSQL = StrSQL & [Ô]insest,insmun,cep,uf,cid,bai,ende,num,comp,prox,fone1,fone2,[Ô]
StrSQL = StrSQL & [Ô]fax,cel,email,site,situ,moti)[Ô]
StrSQL = StrSQL & [Ô] VALUES ([Ô]
StrSQL = StrSQL & [Ô][ô][Ô] & txt_nome.Text & [Ô][ô],[Ô]
StrSQL = StrSQL & [Ô]#[Ô] & Format(Date, [Ô]mm/dd/yyyy[Ô]) & [Ô]#,[Ô]
StrSQL = StrSQL & [Ô][ô][Ô] & Tip & [Ô][ô],[Ô]
StrSQL = StrSQL & [Ô][ô][Ô] & msk_cpf.Text & [Ô][ô],[Ô]
StrSQL = StrSQL & [Ô][ô][Ô] & txt_rg.Text & [Ô][ô],[Ô]
StrSQL = StrSQL & [Ô][ô][Ô] & txt_expedidor.Text & [Ô][ô],[Ô]
StrSQL = StrSQL & [Ô][ô][Ô] & cmb_sexo.Text & [Ô][ô],[Ô]
StrSQL = StrSQL & [Ô]#[Ô] & Format(msk_nasc.Text, [Ô]mm/dd/yyyy[Ô]) & [Ô]#,[Ô]
StrSQL = StrSQL & [Ô][ô][Ô] & cmb_estciv.Text & [Ô][ô],[Ô]
StrSQL = StrSQL & [Ô][ô][Ô] & txt_nomfant.Text & [Ô][ô],[Ô]
StrSQL = StrSQL & [Ô][ô][Ô] & msk_cnpj.Text & [Ô][ô],[Ô]
StrSQL = StrSQL & [Ô][ô][Ô] & txt_inscest.Text & [Ô][ô],[Ô]
StrSQL = StrSQL & [Ô][ô][Ô] & txt_inscmun.Text & [Ô][ô],[Ô]
StrSQL = StrSQL & [Ô][ô][Ô] & msk_cep.Text & [Ô][ô],[Ô]
StrSQL = StrSQL & [Ô][ô][Ô] & cmb_uf.Text & [Ô][ô],[Ô]
StrSQL = StrSQL & [Ô][ô][Ô] & cmb_cid.Text & [Ô][ô],[Ô]
StrSQL = StrSQL & [Ô][ô][Ô] & txt_bai.Text & [Ô][ô],[Ô]
StrSQL = StrSQL & [Ô][ô][Ô] & txt_end.Text & [Ô][ô],[Ô]
StrSQL = StrSQL & [Ô][ô][Ô] & txt_numero.Text & [Ô][ô],[Ô]
StrSQL = StrSQL & [Ô][ô][Ô] & txt_complemento.Text & [Ô][ô],[Ô]
StrSQL = StrSQL & [Ô][ô][Ô] & txt_proximo.Text & [Ô][ô],[Ô]
StrSQL = StrSQL & [Ô][ô][Ô] & msk_fone1.Text & [Ô][ô],[Ô]
StrSQL = StrSQL & [Ô][ô][Ô] & msk_fone2.Text & [Ô][ô],[Ô]
StrSQL = StrSQL & [Ô][ô][Ô] & msk_fax.Text & [Ô][ô],[Ô]
StrSQL = StrSQL & [Ô][ô][Ô] & msk_cel.Text & [Ô][ô],[Ô]
StrSQL = StrSQL & [Ô][ô][Ô] & txt_email.Text & [Ô][ô],[Ô]
StrSQL = StrSQL & [Ô][ô][Ô] & txt_site.Text & [Ô][ô],[Ô]
StrSQL = StrSQL & [Ô][ô][Ô] & cmb_situ.Text & [Ô][ô],[Ô]
StrSQL = StrSQL & [Ô][ô][Ô] & txt_motivo.Text & [Ô][ô]);[Ô]
CAIO.FR.SP 04/11/2010 11:58:41
#356626
marcelo, esta certo no banco de dados, os campos sao todos texto e apenas os campos datcad e nasc sao do tipo date, sera q estou usando no nome de algum campo uma função do acess? ou sera q existe um limite para campos?
MARCELO.TREZE 04/11/2010 12:06:03
#356627
pode ser isso também.

não sei mas tente alterar o nome do campo [Ô]num[Ô] para numero ou outro.

ah e tenta tirando aquele ponto e virgula do final
CAIO.FR.SP 04/11/2010 12:43:49
#356637
marcelo, mesmo com essas alteraçoes o erro ocorreu

a baixo a string debugada

 
INSERT INTO clientes (nome,datcad,tipp,cpf,rg,expe,sexo,nasc,estciv,nomfan,cnpj,insest,insmun,cep,uf,cid,bai,ende,nume,comp,prox,fone1,fone2,fax,cel,email,site,situ,moti) VALUES ([ô]CAIO[ô],#11/04/2010#,[ô]FISICA[ô],[ô]111.111.111-11[ô],[ô]11111111111[ô],[ô]SSP[ô],[ô]M[ô],#12/26/1987#,[ô]SOLTEIRO(A)[ô],[ô][ô],[ô]__.___.___/____-__[ô],[ô][ô],[ô][ô],[ô]14402-137[ô],[ô]SP[ô],[ô]FRANCA[ô],[ô]JARDIM éDEN[ô],[ô]ALICE SOARES DE OLIVEIRA[ô],[ô]1861[ô],[ô][ô],[ô][ô],[ô]016-3704-7774[ô],[ô]___-____-____[ô],[ô]___-____-____[ô],[ô]016-9158-3740[ô],[ô]CAIO_FR_SP@HOTMAIL.COM[ô],[ô][ô],[ô]ATIVO[ô],[ô][ô]);
ACG1574 04/11/2010 12:47:16
#356638
caio, na string debugada, onde for mask vc ao inves de pegar text, pega cliptext e faz o teste.
CAIO.FR.SP 04/11/2010 22:59:41
#356678
Galera descobri o erro. fui cadastrando campo por campo e achei.
o problema é o campo [Ô]comp[Ô], deve ser um função interna do acess, apenas troquei o nome do campo e deu certo
Obrigado a todos que me ajudaram (SLEIFER, MARCELO-TREZE, ACG1574)
Tópico encerrado , respostas não são mais permitidas
Voltar