0

Ya me salía el guardado a al perfección en otro programas que desarrolle, pero en este me salió este error y llevo horas sin saber que pasa.

ERROR que me aparece

Y este es el código que implemente para hacer el guardado de datos

 Private Sub btn_signup_root_Click(sender As Object, e As EventArgs) Handles btn_signup_root.Click

    Try

        cadena.Open()

        command = New OleDbCommand("INSERT INTO Normal(username,password) values (@txtRoot,@txtRoot2)", cadena)


        command.Parameters.AddWithValue("@username", txtRoot.Text)
        command.Parameters.AddWithValue("@password", txtRoot2.Text)

        command.ExecuteNonQuery()

        MsgBox("Save Data", vbInformation, "DB")

        cadena.Close()
    Catch ex As Exception
        MsgBox(ex.Message, vbCritical)
    End Try

    cadena.Close()


End Sub
10
  • Prueba de este modo: command = New OleDbCommand("INSERT INTO Normal(username,password) values(@username,@password)", cadena) Te falta un espacio antes de values y además marcar los parámetros con @ y llamarlos igual que al usar AddWithValue
    – A. Cedano
    el 3 jul. 2020 a las 16:38
  • @A.Cedano Me sigue saliendo el mismo error y ya probé varios métodos, y esta raro por que ese código lo use en otro y funciono.
    – AngelRzos
    el 3 jul. 2020 a las 18:04
  • ¿Podrías poner cómo tienes el código ahora pulsando en editar?
    – A. Cedano
    el 3 jul. 2020 a las 18:08
  • Listo ahora lo use de esa manera pero me sale el mismo error @A.Cedano
    – AngelRzos
    el 3 jul. 2020 a las 18:11
  • Te falta un espacio entre los campos y la palabra values. Seguro está quedando algo como INSERT INTO Normal(username,password)values(... y ahí falta un espacio.
    – Alfabravo
    el 3 jul. 2020 a las 18:20

1 respuesta 1

1

Si no hay otro problema, el código debería funcionar así sin ningún problema:

 Private Sub btn_signup_root_Click(sender As Object, e As EventArgs) Handles btn_signup_root.Click

    Try

        cadena.Open()   
        command = New OleDbCommand("INSERT INTO Normal(username, password) values (@username, @password)", cadena)       
        command.Parameters.AddWithValue("@username", txtRoot.Text)
        command.Parameters.AddWithValue("@password", txtRoot2.Text)    
        command.ExecuteNonQuery() 
        MsgBox("Save Data", vbInformation, "DB")
        cadena.Close()

    Catch ex As Exception
        MsgBox(ex.Message, vbCritical)
    End Try

    cadena.Close()

End Sub

Inicialmente, la instrucción SQL se estaba interpretando así:

INSERT INTO Normal(username, password)values(...) todo junto, porque no estabas poniendo espacios en blanco antes de values.

Otro error que estás cometiendo es con respecto a los marcadores. Deben llamarse igual, tanto en la instrucción SQL, como al pasar los parámetros. Esos son marcadores para indicar algo como: donde puse este marcador, va este dato.

2
  • !YA ME DEJO¡. Al parecer el parámetro password no puedo utilizarlo al cambiarlo por passwd dejo de salirme el error y el registro quedo el DB. Gracias por su ayuda...
    – AngelRzos
    el 3 jul. 2020 a las 19:44
  • OK, puede que password sea una palabra reservada, @AngelRzos
    – A. Cedano
    el 3 jul. 2020 a las 20:03

Tu Respuesta

By clicking “Publica tu respuesta”, you agree to our terms of service and acknowledge you have read our privacy policy.

¿No es la respuesta que buscas? Examina otras preguntas con la etiqueta o formula tu propia pregunta.