Erro No Inser Into Help Plz

[Guest Danilo Pelegrino]

olha nois aqui outra vez gente....Bom dessa vez é o seguinte, criei um public sub que insere os dados do fornecedor no banco de dados é o seguinte, quando clico no botao incluir, ele da o seguinte erro:

Run-time error "-2147217900 (80040e14)':

Erro de sintaxe na instrução INSERT INTO

já fiz de tudo e não sei onde esta o erro, alguém pode me ajudar?? o codigo q eu fiz do commando insert into esta logo a baixo.. se alguém puder ajudar agradeço valeu..

With adCmdFornecedor

.ActiveConnection = cnnBD

.CommandType = adCmdText

'Inclusão:

.CommandText = "INSERT INTO Fornecedor" & _

"(TipoServico, NomeFornecedor, PessoaContato, End, Bairro, " & _

"Cidade, Estado, Cep, Tel, Fax, Cel, Email, InsEst, Cnpj) VALUES ('" & _

cboServiços.Text & "','" & txtNomeFornecedor.Text & "','" & txtPessoaContato.Text & "','" & _

txtEnd.Text & "','" & txtBairro.Text & "','" & txtCidade.Text & "','" & _

txtEstado.Text & "', '" & txtCep.Text & "','" & txtTel.Text & "','" & _

txtFax.Text & "','" & txtcel.Text & "','" & txtEmail.Text & "','" & _

txtInsEst.Text & "','" & txtCnpj.Text & "');"

.Execute

End With

[kuroi]

Verifique se o nome dos campos estão certos, se o nome da TABELA está certo e verifique os tipos de campos. Se algum dos campos da tabela forem numéricos em vez de texto, voce não pode por entre apostrofos.