ERRO DE SINTESE COMANDO SQL

[dragonsday]

Não sei o que está acontecendo pois o código para cadastrar registro abaixo já usei para vários outros formulário e deu tudo certo porém, nesse último, tem dado o erro "Erro de sintaxe na instrução INSERT INTO".

OBS.: O código do comando Sql não possue quebra de linhas como aparece no texto abaixo.

Segue abaixo o código:

Imports System.Data.OleDb
Public Class formCadProdServ
Dim SSQL As String

'criamos uma instância da classe oleDbConnection para efetuarmos a 'conexão com o banco quando preciso
Dim conexao As New OleDbConnection()

'criamos a variável para executarmos o comando sql
Dim comando As OleDbCommand

'variável que guarda o caminho do banco de dados
Dim caminho_banco As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\dogStar\clinica_veterinaria.accdb;Persist Security Info=False;"

Private Sub btnCadastrarProdServ_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCadastrarProdServ.Click

conexao.ConnectionString = (caminho_banco)
conexao.Open()
SSQL = "INSERT INTO tabela_produtoServico( nome_ produtoServico, valorFornecedor, valorFinal, qttd_estoque, tipo_produtoServico, cod_barras, id_fornecedor, descricao_produtoServico) VALUES ( '" & Me.txtNomeProdServ.Text & "','" & Me.txtValorFornecedorProdServ.Text & "','" & Me.txtValorFinalProdServ.Text & "','" & Me.txtQtdProdServ.Text & "','" & Me.comboTipoProdServ.Text & "','" & Me.txtCodBarrasProdServ.Text & "','" & Me.txtIdFornecedor.Text & "','" & Me.txtDescricaoProdServ.Text & "')"
comando = conexao.CreateCommand
comando.CommandText = SSQL
comando.ExecuteNonQuery()
MsgBox("Produto cadastrado com sucesso!", vbOKOnly, "CADASTRO OK!")

conexao.close()

end sub

End Class

Editado Fevereiro 16, 2015 por dragonsday

[Graymalkin]

Todos os campos são do tipo texto mesmo? Se algum for numérico, não deveria ter as aspas simples.

Abraços!

[dragonsday]

Sim Graymalkin, na tabela tem campos numéricos porém, há campos numéricos em outras tabelas para as quais o código funcionou mesmo com aspas.

Até tentei a sua sugestão mas o mesmo erro persiste.

Desde já agradeço sua atenção e a de quem mais se dispuser a colaborar.

[dragonsday]

Acabei de tentar uma modificação na tabela baseado na sua dica mudando todos os campos da tabela para texto e manter as aspas simples no código sql mas o erro é o mesmo.

Começo a pensar que deve ser algum bug do Visual Studio porque não vejo lógica no que está acontecendo.

[dragonsday]

Graymalkin, obrigado pelo auxílio. Problema resolvido.

Fico até com vergonha de postar essa cag#$* minha - rsrsrsrsrs - mas o que ocorreu era que no banco, ao criar os nomes dos campos, após o sinal de underline, acabei sem perceber inserindo um espaço entre ele e a ultima palavra como em "nome_ produtoServico". No próprio código sql que postei aqui tem esse erro já que copiei os nomes dos campos diretamente da janela do Access.

De toda forma muito obrigado pela preocupação em ajudar.

Abraço.

Editado Fevereiro 16, 2015 por dragonsday

[Graymalkin]

É assim mesmo, já cansei de perseguir nomes de campos errados também... rsrsrsrs. Mas ainda bem que resolveu!

Abraços!