ERRO AO CARREGAR DADOS

JONATHANSTECKER 08/04/2011 10:45:12
#370822
Você está utilizando o comando UPDATE de forma errada.
Tente dessa forma.:
        Dim command As New MySql.Data.MySqlClient.MySqlCommand([Ô]UPDATE  tb_entradas_carvao set (cpf_portador = @cpf_portador, numero_gca = @numero_gca, nf_produtor_rural = @nf_produtor_rural, preco_m3 = @preco_m3, calcular_valor_motorista = @calcular_valor_motorista, peso = @peso, data_descarga = @data_descarga, m3_nfe = @m3_nfe, diferenca_volume = @diferenca_volume, metragem_real = @metragem_real, valor_nfe = @valor_nfe, umidade = @umidade, densidade = @densidade, numero_nfe = @numero_nfe, valor_motorista = @valor_motorista) where numero_gca = [ô][Ô] & numero_gca.text & [Ô][ô][Ô], GetConexao1)
        command.Parameters.AddWithValue([Ô]@numero_gca[Ô], numero_gca.Text)
        command.Parameters.AddWithValue([Ô]@cpf_portador[Ô], cpf_portador.Text)
        command.Parameters.AddWithValue([Ô]@nf_produtor_rural[Ô], nf_produtor_rural.Text)
        command.Parameters.AddWithValue([Ô]@preco_m3[Ô], preco_m3.Text)
        command.Parameters.AddWithValue([Ô]@calcular_valor_motorista[Ô], calcula_valor_motorista.Text)
        command.Parameters.AddWithValue([Ô]@peso[Ô], peso.Text)
        command.Parameters.AddWithValue([Ô]@data_descarga[Ô], data_descarga.Text)
        command.Parameters.AddWithValue([Ô]@m3_nfe[Ô], m3_nfe.Text)
        command.Parameters.AddWithValue([Ô]@diferenca_volume[Ô], diferenca_volume.Text)
        command.Parameters.AddWithValue([Ô]@metragem_real[Ô], metragem_real.Text)
        command.Parameters.AddWithValue([Ô]@valor_nfe[Ô], valor_nfe.Text)
        command.Parameters.AddWithValue([Ô]@umidade[Ô], umidade.Text)
        command.Parameters.AddWithValue([Ô]@densidade[Ô], densidade.Text)
        command.Parameters.AddWithValue([Ô]@numero_nfe[Ô], numero_nfe.Text)
        command.Parameters.AddWithValue([Ô]@valor_motorista[Ô], valor_motorista.Text)
       
        command.ExecuteNonQuery()
        command.Dispose()
JONATHANSTECKER 08/04/2011 10:49:14
#370823
Citação:

:
Cara você ta usando a instrução do INSERT no UPDATE
Ex: INSERT INTO <tabela> (<campo1>,<campo2>,...) values (<valor1,<valor2>,...) WHERE <condição>

O UPDATE usa:
UPDATE <tabela> SET <campo1> = <valor1>, <campo2> = <valor2>, ... WHERE <condição>

Sua instruçao deve ficar mais ou menos assim:
UPDATE tb_entradas_carvao SET cpf_portador = @cpf_portador, numero_cga = @numero_cga ... WHERE .....


é isso ai! Não havia visto sua resposta ao responder...
PEGUDO 08/04/2011 10:50:37
#370824
Ok JONATHANSTECKER
Acho devemos ter respondido ao mesmo tempo
ALTAIR148 08/04/2011 13:38:57
#370843
Bom erro não dá mais, agora tem um problema, quando executo o update, todos os campos que era para ele atualizar ficam nulos. Segue abaixo o código.


Dim command As New MySql.Data.MySqlClient.MySqlCommand([Ô]UPDATE  tb_entradas_carvao set numero_gca = @numero_gca, cpf_portador = @cpf_portador, nf_produtor_rural = @nf_produtor_rural, preco_m3 = @preco_m3, calcular_valor_motorista = @calcular_valor_motorista, peso = @peso, data_descarga = @data_descarga, m3_nfe = @m3_nfe, diferenca_volume = @diferenca_volume, metragem_real = @metragem_real, valor_nfe = @valor_nfe, umidade = @umidade, densidade = @densidade, numero_nfe = @numero_nfe, valor_motorista = @valor_motorista where numero_gca = [Ô] & numero_gca.Text, GetConexao1)
        command.Parameters.AddWithValue([Ô]@numero_gca[Ô], numero_gca.Text)
        command.Parameters.AddWithValue([Ô]@cpf_portador[Ô], cpf_portador.Text)
        command.Parameters.AddWithValue([Ô]@nf_produtor_rural[Ô], nf_produtor_rural.Text)
        command.Parameters.AddWithValue([Ô]@preco_m3[Ô], preco_m3.Text)
        command.Parameters.AddWithValue([Ô]@calcular_valor_motorista[Ô], calcula_valor_motorista.Text)
        command.Parameters.AddWithValue([Ô]@peso[Ô], peso.Text)
        command.Parameters.AddWithValue([Ô]@data_descarga[Ô], data_descarga.Text)
        command.Parameters.AddWithValue([Ô]@m3_nfe[Ô], m3_nfe.Text)
        command.Parameters.AddWithValue([Ô]@diferenca_volume[Ô], diferenca_volume.Text)
        command.Parameters.AddWithValue([Ô]@metragem_real[Ô], metragem_real.Text)
        command.Parameters.AddWithValue([Ô]@valor_nfe[Ô], valor_nfe.Text)
        command.Parameters.AddWithValue([Ô]@umidade[Ô], umidade.Text)
        command.Parameters.AddWithValue([Ô]@densidade[Ô], densidade.Text)
        command.Parameters.AddWithValue([Ô]@numero_nfe[Ô], numero_nfe.Text)
        command.Parameters.AddWithValue([Ô]@valor_motorista[Ô], valor_motorista.Text)

        command.ExecuteNonQuery()
        command.Dispose()
ALTAIR148 09/04/2011 07:22:12
#370907
Resolvi, no final bastava colocar:

where numero_gca = @numero_gca

Segue abaixo o código, caso alguém tenha a mesma dúvida que eu, com o código fica mais fácil.

Obrigado gente....



Dim command As New MySql.Data.MySqlClient.MySqlCommand([Ô]UPDATE  tb_entradas_carvao set cpf_portador = @cpf_portador, nf_produtor_rural = @nf_produtor_rural, preco_m3 = @preco_m3, calcular_valor_motorista = @calcular_valor_motorista, peso = @peso, data_descarga = @data_descarga, m3_nfe = @m3_nfe, diferenca_volume = @diferenca_volume, metragem_real = @metragem_real, valor_nfe = @valor_nfe, umidade = @umidade, densidade = @densidade, numero_nfe = @numero_nfe, valor_motorista = @valor_motorista where numero_gca = @numero_gca [Ô], GetConexao1)
        command.Parameters.AddWithValue([Ô]@numero_gca[Ô], numero_gca.Text)
        command.Parameters.AddWithValue([Ô]@cpf_portador[Ô], cpf_portador.Text)
        command.Parameters.AddWithValue([Ô]@nf_produtor_rural[Ô], nf_produtor_rural.Text)
        command.Parameters.AddWithValue([Ô]@preco_m3[Ô], preco_m3.Text)
        command.Parameters.AddWithValue([Ô]@calcular_valor_motorista[Ô], calcula_valor_motorista.Text)
        command.Parameters.AddWithValue([Ô]@peso[Ô], peso.Text)
        command.Parameters.AddWithValue([Ô]@data_descarga[Ô], data_descarga.Text)
        command.Parameters.AddWithValue([Ô]@m3_nfe[Ô], m3_nfe.Text)
        command.Parameters.AddWithValue([Ô]@diferenca_volume[Ô], diferenca_volume.Text)
        command.Parameters.AddWithValue([Ô]@metragem_real[Ô], metragem_real.Text)
        command.Parameters.AddWithValue([Ô]@valor_nfe[Ô], valor_nfe.Text)
        command.Parameters.AddWithValue([Ô]@umidade[Ô], umidade.Text)
        command.Parameters.AddWithValue([Ô]@densidade[Ô], densidade.Text)
        command.Parameters.AddWithValue([Ô]@numero_nfe[Ô], numero_nfe.Text)
        command.Parameters.AddWithValue([Ô]@valor_motorista[Ô], valor_motorista.Text)

        command.ExecuteNonQuery()
        command.Dispose()
Página 2 de 2 [15 registro(s)]
Tópico encerrado , respostas não são mais permitidas
Voltar