Discussion :

[Afaf001]

Bonjour,

Je voudrais créer un bouton dynamiquement, et ensuite lui associer un événement. j'ai essayé le code suivant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
 
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Dim btn_Bouton As Button = New Button()        
        btn_Bouton.ID = "btn"
        btn_Bouton.Text = "valider"
        Me.Controls.Add(btn_Bouton)
        AddHandler btn_Bouton.Click, AddressOf bonsoir
    End Sub
 
 
 
    Private Sub bonsoir(ByVal sender As System.Object, ByVal e As System.EventArgs)
        Label1.Text = "bonsoir"
    End Sub

Mais ça me donne l'erreur suivante :

Le contrôle 'btn' de type 'Button' doit être placé dans une balise form avec runat=server.

Comment remédier à ce problème svp ? merci

[Afaf001]

Re,

Bon j'ai ajouté un panel, et au lieu de Me.Controls.Add(btn_Bouton) j'écris Panel.Controls.Add(Btn_Bouton). Comme ça l'erreur n'apparait plus, mais mpn grand soucis n'était pas de créer un bouton dynamiquement et lui associer un évènement. En fait mon code est le suivant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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
 
 Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Dim btn_Bouton As Button = New Button()
        btn_Bouton.ID = "btn"
        btn_Bouton.Text = "valider"
        Panel1.Controls.Add(btn_Bouton)
        AddHandler btn_Bouton.Click, AddressOf bonsoir
 
        'Création de la table Avalider
        Dim MonDataSet As New DataSet
        MonDataSet.Tables.Add("Avalider")
        MonDataSet.Tables("Avalider").Columns.Add("Demandeur", GetType(String))
        MonDataSet.Tables("Avalider").Columns.Add("Motif", GetType(String))
        MonDataSet.Tables("Avalider").Columns.Add("Durée", GetType(Integer))
        MonDataSet.Tables("Avalider").Columns.Add("Période", GetType(String))
        MonDataSet.Tables("Avalider").Columns.Add("Valider", GetType(Button))
        MonDataSet.Tables("Avalider").Rows.Add("", "", Nothing, "", btn_Bouton)
        GridView1.DataSource = MonDataSet.Tables("Avalider")
        GridView1.DataBind()
    End Sub
 
 
 
    Private Sub bonsoir(ByVal sender As System.Object, ByVal e As System.EventArgs)
        'traitement de validation
    End Sub

Je veux en fait créer une table, dont une colonne contient des boutons. chacun de ces boutons déclenchera un évenement propre à la ligne à laquelle il appartient.

Comment faire svp ? merci

[Afaf001]

Re,

Ce bricolage que j'avais fait pour ajouter des boutons pour chaque ligne était du n'importe quoi (Bah je suis débutante) Après avoir googlé, je crois que j'ai trouvé la solution à mon problème.

Je n'avais qu'à ajouter une ButtonField Column et puis associer aux boutons des evenement à l'aide du CommandRow.