Session+update dans base access

Version imprimable

salut à tous!
j'ai un datalist qui m'affiche les infos en fonction d'une champ email récupérer dans un dropdownlist en faisant session("email")=dropdownlist.SelectedValue sur ma page1.aspx
Sur page1.aspx,j'ai aussi deux textbox qui sont censés mettre à jour le mot de passe dans ma bdd.
voici mon code,mais il est incomplet
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 Protected Sub butUpdate_Click(ByVal sender As Object, ByVal e As System.EventArgs) Session("email") = DataList1.SelectedItem Dim connec As New OleDbConnection() Dim cmd_update As New OleDbCommand() connec = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data source=D:\Visual Studio 2005\WebSites4\App_Data\Bdd.mdb") cmd_update = New OleDbCommand _ ("UPDATE Employes SET passwd=(" & TextBox1.Text & "),passwdconfirm=(" & TextBox2.Text & ") WHERE email='email' ", connec) connec.Open() cmd_update.Connection = connec cmd_update.ExecuteNonQuery() End Sub
comment le compléter dans le cas d'une mise à jour correcte?
merci pour aide!!

08/08/2008, 14h44
lutecefalco

cmd_update.ExecuteNonQuery() te retourne le nombre de lignes impactées par la requête.
Donc si > 0 alors mise à jour correcte
08/08/2008, 16h37
alicia26

salut et merci pour ta réponse!!
peux tu stp me traduire tout çà en script vb.net??
08/08/2008, 17h45
lutecefalco

Citation:

Envoyé par alicia26

salut et merci pour ta réponse!!
peux tu stp me traduire tout çà en script vb.net??

Euh non, je suis pas là pour faire le boulot à ta place 8O

OK,désolé
j'ai essayé et j'obtiens çà:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Protected Sub butUpdate_Click(ByVal sender As Object, ByVal e As System.EventArgs)
        Session("email") = DataList1.SelectedItem
        Dim connec As New OleDbConnection()
        Dim rows As Integer
 
        Dim cmd_update As New OleDbCommand()
        connec = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data source=D:\Visual Studio 2005\WebSites4\App_Data\Bdd.mdb")
        cmd_update = New OleDbCommand _
        ("UPDATE Employes SET passwd=(" & TextBox1.Text & "),passwdconfirm=(" & TextBox2.Text & ") WHERE email='email' ", connec)
        connec.Open()
        cmd_update.Connection = connec
        rows = cmd_update.ExecuteNonQuery()
        If rows > 0 Then
            Label5.Text = "mise à jour correcte"
        End If
 
    End Sub

seulement lors du text,ce message s'affiche:
L'exception OleDbException n'a pas été gérée par le code utilisateur
Aucune valeur donnée pour un ou plusieurs des paramètres requis

09/08/2008, 10h11
Promesses

Tu es sur que ta requête update fonctionne ?
12/08/2008, 14h43
alicia26

salut,
la requête update est correct,seulement le bout de code pour le message de confirmation ne l'était pas.
en insérant un try/catch,tout est correct!!
merci à tous!