none
Erro de sintaxe na instrução INSERT INTO RRS feed

  • Pergunta

  • Olá, estou usando o código abaixo, para inserir dados num banco de dados em ACCESS.
    (Quando clica no botão ele executa o código abaixo)
    Porem, quando eu executo o projeto, da um erro na parte INSERT INTO.
    Já verifiquei tudo, e está tudo certo, o que pode ser o erro?

    Dim cb As New OleDb.OleDbCommandBuilder(da)
            Dim dsNewRow As DataRow
            dsNewRow = ds.Tables("Correias").NewRow()
            dsNewRow.Item("Nome") = txtNome.Text
            dsNewRow.Item("Modelo") = txtModelo.Text
            dsNewRow.Item("Preço Correia") = txtRSCorreia.Text
            dsNewRow.Item("Preço Guia") = txtRSGuia.Text
            dsNewRow.Item("Descrição") = txtDescricao.Text
            ds.Tables("Correias").Rows.Add(dsNewRow)
            da.Update(ds, "Correias")
    segunda-feira, 3 de setembro de 2012 18:14

Respostas

  • Não convém fazer esse Insert por parâmetros?

    Ex:

    Dim cmd As New OleDb.OleDbCommand
    cmd.Connection = cnn
    cmd.CommandType = CommandType.Text
    
    cmd.CommandText = "INSERT INTO Correias([Nome],[Modelo],[Preço Correia],[Preço Guia],[Descrição]) VALUES (@Nome,@Modelo,@PrecoCorreia,@PrecoGuia,@Descricao)"
    
    cmd.Parameters.AddWithValue("@Nome", txtNome.text)
    cmd.Parameters.AddWithValue("@Modelo", txtModelo.text)
    cmd.Parameters.AddWithValue("@PrecoCorreia", txtRSCorreia.text)
    cmd.Parameters.AddWithValue("@PrecoGuia", txtRSGuia.text)
    cmd.Parameters.AddWithValue("@Descricao", txtDescricao.text)
    
    
    cmd.ExecuteNonQuery()
    
    cnn.Close()

                                                  
    • Marcado como Resposta marcosdanger01 segunda-feira, 3 de setembro de 2012 19:50
    segunda-feira, 3 de setembro de 2012 19:30

Todas as Respostas

  • Qual erro?

    Microsoft Technology Associate (MTA)

    segunda-feira, 3 de setembro de 2012 18:22
  • Erro de sintaxe na instrução INSERT INTO.

    OleDbException was unhandled

    segunda-feira, 3 de setembro de 2012 18:32
  • Não convém fazer esse Insert por parâmetros?

    Ex:

    Dim cmd As New OleDb.OleDbCommand
    cmd.Connection = cnn
    cmd.CommandType = CommandType.Text
    
    cmd.CommandText = "INSERT INTO Correias([Nome],[Modelo],[Preço Correia],[Preço Guia],[Descrição]) VALUES (@Nome,@Modelo,@PrecoCorreia,@PrecoGuia,@Descricao)"
    
    cmd.Parameters.AddWithValue("@Nome", txtNome.text)
    cmd.Parameters.AddWithValue("@Modelo", txtModelo.text)
    cmd.Parameters.AddWithValue("@PrecoCorreia", txtRSCorreia.text)
    cmd.Parameters.AddWithValue("@PrecoGuia", txtRSGuia.text)
    cmd.Parameters.AddWithValue("@Descricao", txtDescricao.text)
    
    
    cmd.ExecuteNonQuery()
    
    cnn.Close()

                                                  
    • Marcado como Resposta marcosdanger01 segunda-feira, 3 de setembro de 2012 19:50
    segunda-feira, 3 de setembro de 2012 19:30
  • deu certo sim, muito obrigado

    segunda-feira, 3 de setembro de 2012 19:50