lier une datatable avec les controls d'une template dans une gridview

Version imprimable

21/03/2011, 13h15
tonnebrre

lier une datatable avec les controls d'une template dans une gridview

salut
j'ai une gridview lié avec une datatable
je cree des template par programmation et je les ajoute dans la grid
question : comment lier les controls de la template tel un textbox avec cette datatable par programmation ?
j'ai deja trouver la methode databinder.eval() mais ja n'ai pas reusi a l'utiliser
et merci d'avance
25/03/2011, 08h02
Ramajb

Salut, As tu définit l’événement Data binding sur ton contrôle? Pourrais-tu nous montrer le code?
Merci

definition de la template

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
60
61
62
63
64
65
66
67
68
69
70
71
 
Imports Microsoft.VisualBasic
Imports System.Data.SqlClient
Imports System.Data
 
Public Class GridTemplate
    Implements ITemplate
    Dim templateType As ListItemType
    Dim database, Table, column As String
 
    Sub New(ByVal type As ListItemType, ByVal DataBaseName As String, ByVal TableName As String, ByVal ColumnName As String)
        templateType = type
        Table = TableName
        column = ColumnName
        database = DataBaseName
    End Sub
 
    ' retourne true si le champs et une clé étrangère '
    Private Function IsForeignKey(ByVal DatabaseName As String, ByVal TableName As String, ByVal ColumnName As String) As Boolean
        Dim con As New SqlConnection("server=localhost;database=" & DatabaseName & ";integrated security=true;")
        Dim cmd As New SqlCommand
        cmd.Connection = con
        cmd.CommandType = Data.CommandType.StoredProcedure
        cmd.CommandText = "IsForeignKey"
        With cmd.Parameters
            .AddWithValue("@TableName", TableName)
            .AddWithValue("@ColumnName", ColumnName)
            Dim p As New SqlParameter("@return", Data.SqlDbType.Bit)
            p.Direction = Data.ParameterDirection.ReturnValue
            .Add(p)
        End With
        Try
            con.Open()
            cmd.ExecuteScalar()
            con.Close()
        Catch ex As Exception
            MsgBox("IsForeignKey : erreur : " & vbNewLine & ex.Message)
            Return Nothing
        End Try
        Return cmd.Parameters("@return").Value
    End Function
 
    Sub InstantiateIn(ByVal container As Control) Implements ITemplate.InstantiateIn
        Dim lc As New Literal()
        Select Case templateType
            Case ListItemType.Header
                lc.Text = "h"
                container.Controls.Add(lc)
            Case ListItemType.Item
                Dim lbl As New Label
                lbl.ID = "lbl" & column
                lbl.Text = "<%# Eval(""LIBENTITE"") %>"
                container.Controls.Add(lbl)
            Case ListItemType.EditItem
                If Me.IsForeignKey(database, Table, column) Then
                    Dim ddl As New DropDownList
                    ddl.ID = "ddl" & column
                    container.Controls.Add(ddl)
                Else
                    Dim txt As New TextBox()
                    txt.ID = "txt" & column
                    txt.Text = ""
                    container.Controls.Add(txt)
                End If
            Case ListItemType.Footer
                lc.Text = "f"
                container.Controls.Add(lc)
        End Select
    End Sub
 
End Class

code de remplissage de la gridview

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
 
 Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Dim con As New SqlConnection("server=localhost;database=rhexpress;integrated security=true;")
        Dim cmd As New SqlCommand
        Dim dt As New DataTable
        Dim da As New SqlDataAdapter(cmd)
        cmd.Connection = con
        cmd.CommandType = Data.CommandType.Text
        cmd.CommandText = "SELECT * FROM entite"
        con.Open()
        da.Fill(dt)
        con.Close()
 
        GridView1.DataSource = dt
 
        For Each col As DataColumn In dt.Columns
            Dim dgvCol As New TemplateField
            dgvCol.HeaderText = col.ColumnName
            dgvCol.ItemTemplate = New GridTemplate(ListItemType.EditItem, "rhexpress", "entite", col.ColumnName)
            GridView1.Columns.Add(dgvCol)
        Next
        GridView1.DataBind()
    End Sub

et merci de votre attention

Enlève

Code:

lbl.Text = "<%# Eval(""LIBENTITE"") %>"

et à sa place , attache le à l’événement DataBinding

Code:

lbl .DataBinding += new EventHandler(lbl_DataBinding);

Maintenant, lors du déclenchement du databing, tu as la possibilité de lier la valeur souhaité a ton label
Code:

1 2 3 4 5 6 7 8 9 10 void tb1_DataBinding(object sender, EventArgs e) { Label lbl_1 = (Label)sender; GridViewRow container = (GridViewRow)lbl_1.NamingContainer; object myValue = DataBinder.Eval(container.DataItem, Nom_du_colonne); if (dataValue != DBNull.Value) { lbl.Text = myValue.ToString(); } }
Fais moi savoir si tu as des commentaires.
+

25/03/2011, 16h48
tonnebrre

merci infiniment
je mesuis inspirer de votre solution et d'un autre tuto et ça a marché

le tuto

j'ai remplacé

Code:

lbl .DataBinding += new EventHandler(lbl_DataBinding);

par

Code:

AddHandler lbl.DataBinding, AddressOf lbl_DataBingding

car la 1 ère a causée un problème
25/03/2011, 18h42
Ramajb

cool :ccool: . Une dernière chose, si possible, ne met pas directement ton contrôle dans le container, a la place de ce dernier, utilise un PlaceHolder qui pourra être a son tour ajouter dans le container.

Merci.
25/03/2011, 22h23
tonnebrre

mais je ne sais pas pourquoi quand je declanche un postback sur la mème page les controls de la grid (ceux que j'ai definir dans la template) disparaissent ?
26/03/2011, 07h41
Ramajb

Citation:

Envoyé par tonnebrre

mais je ne sais pas pourquoi quand je declanche un postback sur la mème page les controls de la grid (ceux que j'ai definir dans la template) disparaissent ?

Le contrôle crée a la volée devrait être recrée a chaque postback ;)
++