ERRO AO INSERIR DADOS NO MYSQL

USUARIO.EXCLUIDOS 05/09/2007 20:44:57
#234367
Ola, td bem?

Estou tendo problemas para inserir dados no Mysql usando o vb.net o codigo eh esse

 
[c] Public Class frmincluirfornecedores
    Private MyCON As MySql.Data.MySqlClient.MySqlConnection
    Private MyCMD As MySql.Data.MySqlClient.MySqlCommand
    Private MyDRR As MySql.Data.MySqlClient.MySqlDataReader

[c]    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Try
            MyCON = New MySql.Data.MySqlClient.MySqlConnection("server=localhost;user id=root;password=;database=novasafra")
            MyCMD = New MySql.Data.MySqlClient.MySqlCommand("insert into tb_fornecedores (idfornecedores, razaosocial, nomefan, endereco, bairro, cidade, uf, cep, cnpj, telefone, iestadual, fax, imunicipal, celular, prapagamento, email, contato, ctelefone, transportadora, obs) values ('" & TextBox1.Text & "','" & Textbox2.Text & "','" & TextBox3.Text & "','" & TextBox4.Text & "','" & TextBox5.Text & "','" & TextBox6.Text & "','" & TextBox7.Text & "','" & TextBox8.Text & "','" & TextBox9.Text & "','" & TextBox10.Text & "','" & TextBox11.Text & "','" & TextBox12.Text & "','" & TextBox13.Text & "','" & TextBox14.Text & "','" & TextBox15.Text & "','" & TextBox16.Text & "','" & TextBox17.Text & "','" & TextBox18.Text & "','" & TextBox19.Text & "''" & TextBox20.Text & "')", MyCON)
            Try
                MyCON.Open()
                MyCMD.ExecuteNonQuery()
            Finally
                MyCMD.Dispose()
            End Try
        Finally
            MyCON.Dispose()
            MyCON.Close()
        End Try
    End Sub

End Class
[/c]

O problema que quando clico no botao salvar aparece o erro

Column count doesn't match value count at row 1

esse erro aponta a linha MyCMD.ExecuteNonQuery()

Faz verifiquei as colunas com as textbox e vi que estao certas, tb fiz o teste se inserir os mesmos dados que estava tentando no vb .net direto no sql e deu certo, o que pode ser que esta dando errado?
USUARIO.EXCLUIDOS 06/09/2007 09:20:48
#234400 Resposta escolhida
Tenta o seguinte amigo, guarda o valor de retorno do executenonquery em algum lugar pois ele retornar o valor de alteracoes e vc nao esta fazendo nda com ele neh...

 Public Class frmincluirfornecedores
    Private MyCON As MySql.Data.MySqlClient.MySqlConnection
    Private MyCMD As MySql.Data.MySqlClient.MySqlCommand
    Private MyDRR As MySql.Data.MySqlClient.MySqlDataReader

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Try
            MyCON = New MySql.Data.MySqlClient.MySqlConnection("server=localhost;user id=root;password=;database=novasafra")
            MyCMD = New MySql.Data.MySqlClient.MySqlCommand("insert into tb_fornecedores (idfornecedores, razaosocial, nomefan, endereco, bairro, cidade, uf, cep, cnpj, telefone, iestadual, fax, imunicipal, celular, prapagamento, email, contato, ctelefone, transportadora, obs) values ('" & TextBox1.Text & "','" & Textbox2.Text & "','" & TextBox3.Text & "','" & TextBox4.Text & "','" & TextBox5.Text & "','" & TextBox6.Text & "','" & TextBox7.Text & "','" & TextBox8.Text & "','" & TextBox9.Text & "','" & TextBox10.Text & "','" & TextBox11.Text & "','" & TextBox12.Text & "','" & TextBox13.Text & "','" & TextBox14.Text & "','" & TextBox15.Text & "','" & TextBox16.Text & "','" & TextBox17.Text & "','" & TextBox18.Text & "','" & TextBox19.Text & "''" & TextBox20.Text & "')", MyCON)
            Try
                MyCON.Open()
                QtdAlteracoes = MyCMD.ExecuteNonQuery()
            Finally
                MyCMD.Dispose()
            End Try
        Finally
            MyCON.Dispose()
            MyCON.Close()
        End Try
    End Sub
USUARIO.EXCLUIDOS 06/09/2007 12:51:02
#234486
Deu certo kara, valeu!!

Mas o que acontece eh que realmente tava fazendo as insercoes erradas
Tópico encerrado , respostas não são mais permitidas
Voltar