Temas

Amigos, tengo el problema de que cuando quiero actualizar un dato en el datagridview me tira este error en el query, y este sucede al colocar la sentencia "where", espero alguien pueda ayudarme a solucionarlo, muchas gracias amigos



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

        Me.propietariosTableadapter.UpdateCommand = New OleDbCommand
        Me.propietariosTableadapter.UpdateCommand.CommandText = "UPDATE propietariosTableadapter SET Fiscalia = @fisdis, Expediente = @numexp, Reiteracion = @rei, Supervision =  @sup, Victima = @noml, Delito = @deli, Avances = @obs WHERE Fecha = @ingreso"
        Me.propietariosTableadapter.UpdateCommand.Parameters.Add("@fisdis", OleDbType.VarChar, 25, "Fiscalia")
        Me.propietariosTableadapter.UpdateCommand.Parameters.Add("@numexp", OleDbType.VarChar, 24, "Expediente")
        Me.propietariosTableadapter.UpdateCommand.Parameters.Add("@rei", OleDbType.VarChar, 24, "Reiteracion")
        Me.propietariosTableadapter.UpdateCommand.Parameters.Add("@sup", OleDbType.VarChar, 24, "Supervision")
        Me.propietariosTableadapter.UpdateCommand.Parameters.Add("@nom", OleDbType.VarChar, 24, "Victima")
        Me.propietariosTableadapter.UpdateCommand.Parameters.Add("@deli", OleDbType.VarChar, 24, "Delito")
        Me.propietariosTableadapter.UpdateCommand.Parameters.Add("@obs", OleDbType.VarChar, 24, "Avances")
        Me.propietariosTableadapter.UpdateCommand.Parameters.Add("@ingreso", OleDbType.BigInt, 24, "Fecha")

        Me.propietariosTableadapter.UpdateCommand.Connection = Me.miconexion

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

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] Expandir


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.

Hola amigos, les comento q tengo un problema, necesito pasar un dato seleccionado de la lista en un DataGridView a un ListBox utilizando un Boton , espero me pueden ayudar con la linea de codigo q se utilizaria para realizar esto, les agradezco mucho...

Hola amigos, quisiera saber si alguine me puede ayudar con este programa, el mismo tiene q hacer esto: prgrama que lea un numero N y calcule la suma de la siguiente serie: 1elevado1 + 2elevado2 + 3elevado3 asi susesivamentre hasllegar al numero ingresado.
estoy tratando de q me funcione pero hasta ahora es inutil, espero me puedan dar una ayudita muchas gracias amigos

Amigos mucho gusto, alguien me podria ayudar a saber cual es el limite de impresiones de una impresora canon mx320?...muchas gracias 

Amigos fijense de que tngo una impresora Canon MP250 q cuando quiero mandar a imprimir, me sale una ventana con el error "b200", si alguine me puede ayudar para ver q pasa gracias amigos!

Amigos buen dia, miren resulta que tengo una compaq mini y quiero ponerle el windows xp, pero cuando le conecto la lectora externa  dentro del sistema si la reconoce, pero a la hora de reiniciar y botear no la reconoce en el menu de boteo, amigos si me pueden ayudar porfavor gracias!!   

Amigos resulta que cuand mando a imprimir jala la hoja bin y todo pero cuando va por la mitad de la impresion de la hoja , el alimentador empiesa a moverse como para jalar mas hojas, osea el encargado de empujar la hoja para que empiese a imprimir. y si le pongo mas hojas las jala cuando estoy imprimiendo una. pero lo raro es que cuando mando a hacer una prueba de inyectores no hace eso solo cuando mando a imprimir. porfavor si alguine me puede ayudar amigos gracias!!

Bueno amigos resulta de que tengo aca una Dell Mini 10 pero tiene clave el BIOS, como se la quito, probe quitando la bateria pero no me funciono la probe dejar si bateria un dia entero y la encendi sin la bateria solo con corriente alterna pero igual me pide la clave me podria atudar amigos a solucionar el problema!!     

Bueno amigos miren resulta de que tenemos una notebook compaq cq40 que a la hora de conectarle el cargador la luz del conector de el cargador y la wireless empieza a parpadear y no enciende, la destapamos para hacerle una limpieza pero el problema persiste no si si sera la placa al fin la mala o solo el PLU, amigos si alguien me pudiere ayudar o dar una posible razon de que esto pase porfavor gracias 

Hola Amigos, fijense de que se trajo una impresora para mantenimineto es una canon MP150 pero resulta de que a la hora de armarla y hacer las pruebas de impresion, la Impresora Lanza un error "E42", Amigos si me pueden ayudar para solucionar este prblema se lo agradeseré, Muchas Gracias!!