Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

acubane

Erro ao tentar gravar dados

Recommended Posts

Criei um formulario de cadastro de clientes para gravar em um BD Access porem apos clicar no botão salvar aparece o seguinte erro

 

An unhandled exception of type 'System.Data.OleDb.OleDbException' occurred in system.data.dll este erro aparece em uma caixa de dialogo que possoi os seguintes botões break, continue

 

Ao clicar em continue não salva nada no BD em em break apenas para de executar o aplicativo

 

Segue o codigo que eu digitei abaixo se alguem ja teve este tipo de problema por favor me ajude

 

 

 

strConect = "PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE=Systema_SpSystem.mdb"
		conexao = New OleDb.OleDbConnection(strConect)

		strQuery = "Insert into tblClientes (cnpj/cpf,RSocial,Fantasia,Endereco,Bairro,Cep,Cidade,Estado) values(@cnpj/cpf,@RSocial,@Fantasia,@Endereco,@Bairro,@Cep,@Cidade,@Estado)"
		comando = New OleDb.OleDbCommand(strQuery, conexao)
		comando.Parameters.Add(New OleDb.OleDbParameter("@cnpj/cpf", txtcnpj.Text))
		comando.Parameters.Add(New OleDb.OleDbParameter("@RSocial", txtRazaoSocial.Text))
		comando.Parameters.Add(New OleDb.OleDbParameter("@Fantasia", txtFantasia.Text))
		comando.Parameters.Add(New OleDb.OleDbParameter("@Endereco", txtEndereco.Text))
		comando.Parameters.Add(New OleDb.OleDbParameter("@Bairro", txtBairro.Text))
		comando.Parameters.Add(New OleDb.OleDbParameter("@Cep", txtCep.Text))
		comando.Parameters.Add(New OleDb.OleDbParameter("@Cidade", txtCidade.Text))
		comando.Parameters.Add(New OleDb.OleDbParameter("@Estado", cmbEstado.Text))
		conexao.Open()
		comando.ExecuteNonQuery()
		conexao.Close()

Compartilhar este post


Link para o post
Compartilhar em outros sites

Tente colocando o campo cnpj_cpf em sua query entre colchetes, mas evite criar campos usando caracteres especiais, isso pode causar problemas. Use o _ (underline) que é mais comum e não apresenta problemas.

 

Isso vale para o parâmetro de sua query:

 

strConect = "PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE=Systema_SpSystem.mdb"
		conexao = New OleDb.OleDbConnection(strConect)

		strQuery = "Insert into tblClientes (cnpj_cpf,RSocial,Fantasia,Endereco,Bairro,Cep,Cidade,Estado) values(@cnpj_cpf,@RSocial,@Fantasia,@Endereco,@Bairro,@Cep,@Cidade,@Estado)"
		comando = New OleDb.OleDbCommand(strQuery, conexao)
		comando.Parameters.Add(New OleDb.OleDbParameter("@cnpj_cpf", txtcnpj.Text))
		comando.Parameters.Add(New OleDb.OleDbParameter("@RSocial", txtRazaoSocial.Text))
		comando.Parameters.Add(New OleDb.OleDbParameter("@Fantasia", txtFantasia.Text))
		comando.Parameters.Add(New OleDb.OleDbParameter("@Endereco", txtEndereco.Text))
		comando.Parameters.Add(New OleDb.OleDbParameter("@Bairro", txtBairro.Text))
		comando.Parameters.Add(New OleDb.OleDbParameter("@Cep", txtCep.Text))
		comando.Parameters.Add(New OleDb.OleDbParameter("@Cidade", txtCidade.Text))
		comando.Parameters.Add(New OleDb.OleDbParameter("@Estado", cmbEstado.Text))
		conexao.Open()
		comando.ExecuteNonQuery()
		conexao.Close()

 

Se isto não resolver, indique o caminho completo para o banco de dados em sua string de conexão, talvez também não esteja encontrando o arquivo.

 

 

 

Aproveite e conheça meu blog - Mais de 200 posts com artigos, dicas e análises - www.julianonunes.com :D

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.