erro em insert

Question

 

Alguem poderia me ajudar nesse insert é VBA access

 

DoCmd.RunSQL "INSERT INTO tbl_furnas VALUES (" & Me.txtEmpresa.Value & "," & Me.txtEndereco.Value & "," & Me.txtCodLocal.Value & "," & Me.txtCodLocalizacao.Value & "," & Me.txtCidade.Value & "," & Me.txtDescrLocal.Value & ", " & Me.txtDescriLocaliz.Value & ", " & Me.txtUF.Value & "," & Me.txtNumOper.Value & "," & Me.txttag.Value & "," & Me.txtUc.Value & "," & Me.txtUar.Value & "," & Me.txtDescriBem.Value & ", " & Me.txtFabricante.Value & "," & Me.txtModelo.Value & "," & Me.txtNumSerie.Value & "," & Me.lstAnofabric.Value & "," & Me.txtQtde.Value & ") "

 

tá dando erro de sintaxe mas onde ?

Answer 1

Boa Tarde,

 

A julgar pelos nomes de seus controles, você deve estar tentando inserir campos numéricos (CodLocal, NumOper,etc) e campos textuais (Endereco, DescrLocal, etc). Quando se faz uma instrução SQL para lidar com texto, é preciso que o mesmo esteja entre aspas simples.

 

EX:

INSERT INTO tbl_furnas VALUES (1,'Empresa') ao contrário de
INSERT INTO tbl_furnas VALUES (1,Empresa)

 

Tente colocar os apóstrofos na sua instrução INSERT que deve funcionar.

 

[ ]s,

 

Gustavo

 

Answer 2

Acho que esse problema é devdo ao tamanho máximo da instrução sql. To tendo o mesmo problema utilizando o método RunSql. Ele simplesmente trunca a minha instrução gerando erro de sintaxe. Quano vou analisar a váriavel que contém a instrução, ela ta cortada na metade.

 

Alguém a sabe resolver isso??

Answer 3

Gizaol,

 

faltou colocar os apóstrofos ao redor dos campos tipo Texto.

Answer 4

ow.. passei 2 dias batendo cabela ak.. e esse ak foi oq me salvo!
vlw!