l'interface ou je modifie les comptes, ça marche, mais la fenetre compte ne marche pas, dès que je l'excute tout se plante
Private Sub Butnmodif_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Butnmodif.Click sql "update account set name'" & cmbxiduser.Text & "', privilege='" & cmbxpriv.Text & "', login='" & txtlogin.Text & "' , password='" & txtpswd.Text & "', Secret_Question='" & txtsecretq.Text & "', Secret_Answer= '" & txtsecretan.Text & "', email='" & txtemail.Text & "',accstatus= '" & cmbxstate.Text & "' where login = '" & txtlogin.Text & "'" cmd = New MySqlCommand(sql) dataadapt = New MySqlDataAdapter(cmd) datset = New DataSet cmd.Connection() = cn cmd.ExecuteNonQuery() txtemail.Text = "" txtlogin.Text = "" txtpswd.Text = "" txtsecretan.Text = "" txtsecretq.Text = "" cmbxiduser.Text = "" cmbxpriv.Text = "" ButnNew.Enabled = True ButtnSave.Enabled = False End Sub
Private Sub Butnmodif_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Butnmodif.Click sql "update user set maritalstatus'" & cmbxmaritstat.Text & "', sex='" & cmbxsex.Text & "', name='" & txtname.Text & "' , phonenumber='" & txtphone.Text & "', shortname='" & txtshrtname.Text & "', Secret_Question='" & txtsecretq.Text & "', Secret_Answer= '" & txtsecretan.Text & "', email='" & txtEmail.Text & "', country= '" & cmbxgovern.Text & "', address='" & txtadress.Text & "' where name= '" & txtname.Text & "'" cmd = New MySqlCommand(sql) dataadapt = New MySqlDataAdapter(cmd) datset = New DataSet cmd.Connection() = cn cmd.ExecuteNonQuery() txtEmail.Text = "" txtname.Text = "" txtshrtname.Text = "" txtphone.Text = "" txtsecretan.Text = "" txtsecretq.Text = "" txtadress.Text = "" cmbxsex.Text = "" cmbxmaritstat.Text = "" cmbxgovern.Text = "" ButnNew.Enabled = True ButtnSave.Enabled = False End Sub
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionsql "update account set name'" & cmbxiduser.Text & "', privilege='" & cmbxpriv.Text & "', login='" & txtlogin.Text & "' , password='" & txtpswd.Text & "', Secret_Question='" & txtsecretq.Text & "', Secret_Answer= '" & txtsecretan.Text & "', email='" & txtemail.Text & "',accstatus= '" & cmbxstate.Text & "' where login = '" & txtlogin.Text & "'" cmd = New MySqlCommand(sql,cn) dataadapt = New MySqlDataAdapter(cmd) ' ca sert à rien datset = New DataSet ' ca sert à rien console.writeline(sql) cmd.ExecuteNonQuery()