Error de sintaxis en la instrucción INSERT INTO. Ayuda porfavor!

Iniciado por airtraffic, 11 Febrero 2013, 04:05 AM

0 Miembros y 1 Visitante están viendo este tema.

airtraffic

Amigos esto tratando de hacer ingresar unos datos a una bd en acces pero al darle click al boton Ingresar me sale este error: Error de sintaxis en la instrucción INSERT INTO.  , les ruego puedan ayudarme, aca les dejo el codigo:
Código (vbnet) [Seleccionar]

Private parqueaderoDataset As DataSet
    Public propietariosTableadapter As OleDbDataAdapter
    Private miconexion As OleDbConnection
    Private cadenadeconexion As String


    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click



        cadenadeconexion = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Documents and Settings\Luis\Mis documentos\RegistroFemicidio.accdb"



        miconexion = New OleDbConnection(cadenadeconexion)



        propietariosTableadapter = New OleDbDataAdapter
        propietariosTableadapter.SelectCommand = New OleDbCommand("SELECT * FROM PropietariosTableadapter", miconexion)



        parqueaderoDataset = New DataSet

        parqueaderoDataset.Tables.Add("PropietariosTableadapter")


        propietariosTableadapter.Fill(parqueaderoDataset.Tables("PropietariosTableadapter"))

        DataGridView1.DataSource = parqueaderoDataset.Tables("PropietariosTableadapter")



    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click


        Dim nuevafila As DataRow

        nuevafila = parqueaderoDataset.Tables("PropietariosTableadapter").NewRow

        nuevafila("Numero de Expediente") = 352
        nuevafila("Nombre de La Victima") = "Lupita"
        nuevafila("Apellido(s)") = "Lupita"
        nuevafila("Edad") = 12
        nuevafila("Fiscalia Distrital") = "Lupita"
        nuevafila("Fiscalia Municipal") = "Lupita"
        nuevafila("Fiscalia de sección") = "Lupita"
        nuevafila("Oficio de Reiteracion") = 1
        nuevafila("Oficio a Supervision") = 122
        nuevafila("Observaciones") = "Lupita"
        nuevafila("Fiscal Responsable") = "Lupita"
        nuevafila("Tipo de Delito") = "Lupita"

        parqueaderoDataset.Tables("PropietariosTableadapter").Rows.Add(nuevafila)


        propietariosTableadapter.InsertCommand = New OleDbCommand
        propietariosTableadapter.InsertCommand.Connection = miconexion
        propietariosTableadapter.InsertCommand.CommandText = "INSERT INTO PropietariosTableadapter(Numero de Expediente, Nombre de La Victima, Apellido(s), Edad, Fiscalia Distrital, Fiscalia Municipal, Fiscalia de sección, Oficio de Reiteracion, Oficio a Supervision, Observaciones, Fiscal Responsable, Tipo de Delito) VALUES (@numeroexpediente,@nombredelavictima,@apellidos,@edad,@fiscaliadistrital,@fiscaliamunicipal,@fiscaliadeseccion,@oficioreiteracion,@oficiosupervision,@observaciones,@fiscaliresponsable,@tipodedelito)"
        propietariosTableadapter.InsertCommand.Parameters.Add("@numeroexpediente", OleDbType.BigInt, 12, "Numero de Expediente")
        propietariosTableadapter.InsertCommand.Parameters.Add("@nombredelavictima", OleDbType.VarChar, 12, "Nombre de La Victima")
        propietariosTableadapter.InsertCommand.Parameters.Add("@apellidos", OleDbType.VarChar, 12, "Apellido(s)")
        propietariosTableadapter.InsertCommand.Parameters.Add("@edad", OleDbType.BigInt, 12, "Edad")
        propietariosTableadapter.InsertCommand.Parameters.Add("@fiscaliadistrital", OleDbType.VarChar, 12, "Fiscalia Distrital")
        propietariosTableadapter.InsertCommand.Parameters.Add("@fiscaliamunicipal", OleDbType.VarChar, 12, "Fiscalia Municipal")
        propietariosTableadapter.InsertCommand.Parameters.Add("@fiscaliadeseccion", OleDbType.VarChar, 12, "Fiscalia de sección")
        propietariosTableadapter.InsertCommand.Parameters.Add("@oficioreiteracion", OleDbType.BigInt, 12, "Oficio de Reiteracion")
        propietariosTableadapter.InsertCommand.Parameters.Add("@oficiosupervision", OleDbType.BigInt, 12, "Oficio a Supervision")
        propietariosTableadapter.InsertCommand.Parameters.Add("@observaciones", OleDbType.VarChar, 12, "Observaciones")
        propietariosTableadapter.InsertCommand.Parameters.Add("@fiscaliresponsable", OleDbType.VarChar, 12, "Fiscali Responsable")
        propietariosTableadapter.InsertCommand.Parameters.Add("@tipodedelito", OleDbType.VarChar, 12, "Tipo de Delito")

        propietariosTableadapter.Update(parqueaderoDataset.Tables("PropietariosTableadapter"))

El error me lo marca en la ultima Linea.


MCKSys Argentina

El error podría ser el nombre del campo Apellido(s).

Quítale los paréntesis al campo y al SQL y prueba nuevamente.

Saludos!
MCKSys Argentina

"Si piensas que algo está bien sólo porque todo el mundo lo cree, no estás pensando."


HdM

Hola.

Post inicial realmente caótico: sección equivocada (va en .NET), code sin GeSHi.

Además de lo indicado por MCKSys, ¿tienes una tabla en la db llamada PropietariosTableadapter? , definición de campos con nombres kilométricos, con tildes y con espacios (éstos últimos debes acotarlos entre []) que te llevan a cometer errores al picar. También súmale el error en el nombre del campo en la antepenúltima línea ("Fiscali Responsable"))

Un saludo.

- Nice to see you again -