none
Inserir dados na base de dados RRS feed

  • Pergunta

  • Boas pessoal

    Estou a tentar inserir dados na base de dados e dá-me um erro no           cmd.ExecuteNonQuery(), a dizer que  a String ou dados binários serão trancados. A instrução foi encerrada.

    [code=vb]

      Const constr As String = "Data Source=.\SQLEXPRESS;AttachDbFilename=C:\Users\Acer\Desktop\Base de Dados.mdf;Integrated Security=True;Connect Timeout=30;User Instance=True"

    Dim db As New SqlConnection(constr)

                db.Open()

                Dim varsql As String

                ' Inserir na tabela clientes

                varsql = "insert into Stocks(CodigoStock, Fornecedor, Categoria, Produto, Quantidade, Preco_Compra_Und)" & "values(@CodigoStock, @Fornecedor, @Categoria, @Produto, @Quantidade, @Preco_Compra_Und)"

                Dim cmd As New SqlCommand(varsql, db)

                ' linha da base de dados

                cmd.Parameters.Add(New SqlParameter("@CodigoStock", TxtStock.Text))

                cmd.Parameters.Add(New SqlParameter("@Fornecedor", ComboFornecedores.Text))

                cmd.Parameters.Add(New SqlParameter("@Categoria", TxtCategoria.Text))

                cmd.Parameters.Add(New SqlParameter("@Produto", Txtproduto.Text))

                cmd.Parameters.Add(New SqlParameter("@Quantidade", TxtQuantidade.Text))

                cmd.Parameters.Add(New SqlParameter("@Preco_Compra_Und", TxtPreco.Text))

                cmd.ExecuteNonQuery() 'erro

                db.Close()

                MsgBox("inserido com sucesso!", MsgBoxStyle.Information, "Mensagem de Confirmação")

    [/code]

    sábado, 15 de março de 2014 15:55

Respostas

  • A coluna tem um limite de caracteres e você está tentando inserir um valor com mais caracteres que o permitido.
    • Marcado como Resposta Giovani Cr sexta-feira, 21 de março de 2014 18:07
    sábado, 15 de março de 2014 23:17