Probléme de rechargement (textbox)

Version imprimable

Bonjour les amis,

Voila, je suis nouveau sur ASP.NET, et j'ai un petit probléme concernant ma page web. j'ai un text box + 2 boutons ( 1 pour incrémenter et un autre pour décrémenter)
voici le code de l'incrémentation
Code:

1 2 3 4 5 Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click Txt_Année = Txt_Année + 1 txtAnnéeUnivD.Text = Txt_Année & " / " & Txt_Année + 1 End Sub
L'incrémentation ne se fait que deux fois et s'arréte... c'est le meme cas sur de nombreux pages ou il y'a un calcul à faire.

Je sais, ça peut etre facile pour certain, mais je suis encore nouveau :oops:

27/05/2009, 12h56
Quatre_Couleurs

Lu,
un petit conseil: evite les accents dans les noms de tes variables.
Sinon de quel type est ta variable Txt_Année?
27/05/2009, 12h57
florentino

c'est mon Text Box .....
27/05/2009, 13h04
Quatre_Couleurs
Ok.
Code:

1 2 Txt_Année = Txt_Année + 1
Tu ajoutes 1 a un textbox et tu n'a pas d'erreurs a la compilation?
27/05/2009, 13h07
florentino
ah désolé... je croyais que tu parlais "txtAnnéeUnivD" qui était mon textbox.

au fait, Txt_Année est juste un entier
Code:

1 2 Dim Txt_Année As Integer
dsl.j'avais pas bien lu
27/05/2009, 13h25
predalpha
Code:

1 2 Dim Txt_Année As Integer
Où as tu déclaré ceci ?

Tant qu'à faire balances le code de ta page stp

voici le code behind de ma page :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
 
Partial Public Class WebOpen
    Inherits System.Web.UI.Page
    Dim Txt_Année As Integer
 
    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Txt_Année = Date.Today.Year
        txtAnnéeUnivD.Text = Txt_Année & " / " & Txt_Année + 1
    End Sub
 
 
    Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click
        Txt_Année = Txt_Année + 1
        txtAnnéeUnivD.Text = Txt_Année & " / " & Txt_Année + 1
    End Sub
 
    Protected Sub Button2_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button2.Click
        Txt_Année = Txt_Année - 1
        txtAnnéeUnivD.Text = Txt_Année - 1 & " / " & Txt_Année
    End Sub
 
 
End Class

27/05/2009, 13h42
predalpha

Ceci est le fonctionnement normal de l'aspnet. Il te manque beaucoup de notions et je t'invite à aller faire les entrainements du coach ASP.NET.

http://msdn.microsoft.com/fr-fr/asp....achaspnet.aspx

A chaque chargement de ta page tu réinitialises Txt_Année avec la valeur de l'année systeme en cours.

Pour contourner ce problème, tu peux utiliser dans le Page_Load de ta page la propriété isPostBack .

De plus, Txt_Année n'est jamais conservé entre chaque chargement de page donc tu perdras souvent sa valeur. Une solution serait soit de la stocker dans le VIEWSTATE,la SESSION, ou un champ caché.

Bonne formation
27/05/2009, 13h49
florentino

Citation:

Envoyé par predalpha

Pour contourner ce problème, tu peux utiliser dans le Page_Load de ta page la propriété isPostBack .

Est ce que tu peux etre plus clair stp, avec un petit bout de code ?
27/05/2009, 13h55
Quatre_Couleurs
En fait quand tu cliques sur ton bouton cela active le rechargement de ta page et donc tu n'as pas la valeur que tu souhaites.
Le isPostBack permet de détecter cela: c'est un booléen, si vrai alors c'est un "vrai" chargement, si faux alors c'est que t'qs appuyé sur ton bouton.

Donc dans ton Load tu peux faire quelquechose comme ca
Code:

1 2 3 4 5 If Page.IsPostBack Then ' Code Else 'Code End If
27/05/2009, 13h58
predalpha

Oui c'est tout à fait ça sauf qu'il reste encore le problème de la sauvegarde de sa variable txt_Annee

si je suis ton raisonement je dois faire ca :
Code:

1 2 3 4 5 6 7 8 9 Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load Txt_Année = Date.Today.Year If Not Page.IsPostBack Then txtAnnéeUnivD.Text = Txt_Année & " / " & Txt_Année + 1 End If End Sub
mais ça marche pas, à moins que j'ajoute une variable session pour conserver l'ancienne valeur

Ce serai plutot quelquechose comme ca:
Code:

1 2 3 4 5 6 7 8 Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load If Not Page.IsPostBack Then Txt_Année = Date.Today.Year txtAnnéeUnivD.Text = Txt_Année & " / " & Txt_Année + 1 End If End Sub
Mais comme le dit predalpha ca ne changera rien puisque ta variable Txt_Année sera egale a null a l'appui sur ton bouton.
Pour resoudre ca t'as les variables de sessions mais je te le conseille pas c'est trop couteux pour faire ca.
Au lieu de mettre Txt_Année en attribut en code behind fais un champ caché dans ta page.

Exemple de mémorisation dans le cache :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
 
Partial Public Class WebOpen
    Inherits System.Web.UI.Page
    Dim Txt_Année As Integer
 
    Dim objID As String
 
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
 
        'Création identifiant unique
        If Not Page.IsPostBack Then ViewState("ID") = Guid.NewGuid.ToString
 
        'objID sert de clé pour retrouver l'obj dans le cache
        objID = "MonInt|" & ViewState("ID").ToString  
 
         If Page.IsPostBack Then 
             Txt_Année= CType(GetObjectFromCache(objID), integer)   
         else
             Txt_Année = Date.Today.Year
 
        End If
 
        txtAnnéeUnivD.Text = Txt_Année & " / " & Txt_Année + 1    
 
    End Sub
 
Public Function GetObjectFromCache(ByVal ObjName As String) As Object
        Dim _Cache As System.Web.Caching.Cache = Web.HttpContext.Current.Cache
        If _Cache(ObjName) Is Nothing Then
            Return Nothing
        Else
            Return _Cache(ObjName)
        End If
    End Function
 
Public Sub SetObjectToCache(ByVal ObjName As String, ByVal obj As Object)
 
        If ObjName Is Nothing Or obj Is Nothing Then Exit Sub
 
        Dim _Cache As System.Web.Caching.Cache = Web.HttpContext.Current.Cache
 
         _Cache(ObjName) = obj
 
        End Sub
 
 Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click
        Txt_Année = Txt_Année + 1
        txtAnnéeUnivD.Text = Txt_Année & " / " & Txt_Année + 1
    End Sub
 
    Protected Sub Button2_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button2.Click
        Txt_Année = Txt_Année - 1
        txtAnnéeUnivD.Text = Txt_Année - 1 & " / " & Txt_Année
    End Sub
 
 
Protected Sub Page_Unload(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Unload
        SetObjectToCache(objID, obj)
    End Sub

J'ai du simplifier mes 2 fonctions par rapport à ce que j'utilise dasn mes codes, mais cela devrait au moins te mettre sur la piste

Je serais toi, j'éviterai aussi d'appeler TXT.. quelque chose qui est de type entier.