[Débutant] [VB.NET] Probleme de Modification du Text d'un TextBox

[VB.NET] Probleme de Modification du Text d'un TextBox

Salut,
je travaille avec visual studio 2008 et une BD Sql-server 2008, j'ai une web forme qui contient un TextBox et un bouton, au lancement de la page mon Textbox contiendra un texte bien définie dans le Sub (Page_load), quand je modifie le texte et j'exécute la requête UPLOAD , elle prends toujours l'ancien Text mais pas celui que je viens d'introduire !!

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
 
 Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        TextBox1.Text = "1990"
    End Sub
 
    Protected Sub Modifier_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Modifier.Click
 
        ' Création de l'objet de connexion
        oConnection = New System.Data.SqlClient.SqlConnection()
        ' Ecriture de la chaîne de connexion
        sConnectionString = "Data Source=My-PC;Initial Catalog=GestionDuMendatement;Integrated Security=True"
        oConnection.ConnectionString = sConnectionString
        ' Ouverture de la connexion
        oConnection.Open()
 
        ' Traitement des opération à effectuer sur la base de données
        sqlstring = " UPDATE pension SET Annee_naiss = '" & TextBox1.Text & "' WHERE num_pens = '1975000000'"
        cmd = New SqlCommand(sqlstring, oConnection)
        cmd.ExecuteNonQuery()
        ' Fermeture de la connexion
        oConnection.Close()

PS : Les paramètres du TextBox sont tous par-défaut, j'ai rien modifier y compris l'option ReadOnly

L'évènement Load est exécuté à chaque postback, après traitement de l'évènement Click. Il ne faut donc initialiser les champs que lors du chargement initial, pas lors des postbacks :
Code:

1 2 3 4 5 Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load If Not IsPostback Then TextBox1.Text = "1990" End If End Sub

Merci Pour votre aide :ccool: ça marche très bien ^^