treeview dynamique

Version imprimable

28/05/2009, 14h16
smp82

treeview dynamique
Bonjour tous le monde.
j'ai un gros problème avec treeview et ça fait 3 jours que je cherche une solution mais sans ...:cry: et le temps me prisse.
j'ai deux table :
magasin
Code:

1 2 3 4 id_magasin libelle_magasin id_ville
pub_magasin
Code:

1 2 3 4 id_pub libelle_pub id_magasin
on peut avoir plusieurs pub pour une seul magasin.
donc je doit lister dans une treeview les magasin(node parent) et pour chaque magasin les pub affecter a cette magasin (node fils) et apres je doit ajouter une dropdown (ville) pour afficher juste les magasin de chaque ville avec autoposteback du dropdownlist

exemple

__________
ville 1 <--------------- dropdown pour les ville
__________
treeview
- magasin 1
|
|-----pub1
|
|-----pub2
+ magasin 2
.
.
.
merci merci
28/05/2009, 14h48
lola06

Bonjour,
Et la question c'est quoi ? Parce que là tu ne nous expose que le contexte, tu as dit que tu avais un problème mais c'est quoi exactement ton problème (il n'est écrit nulle part et nous ne sommes pas devin :mouarf:) ?
@+
28/05/2009, 14h53
Hinault Romaric

:cfou: nous ne sommes pas des sorciers pour devine vos problèmes

oui vous avez raison, chez nous on dit "si qu'il qu'un a beaucoup de prob, il devient automatiquement n'importe qui et bien sûr il commence de dire n'importe quoi;
alors mon porb est que je sais pas ou je vais commencer, tout d'abord j'ai trouvé ce code quelque part dans le net mais quand j ajoute le droupdown et je fait un updatepanel sur mon tree view et autopostback sur dropdown rien ne se passe

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
Protected Sub TreeView1_TreeNodePopulate(ByVal inParentID As Integer, ByRef inTreeNode As TreeNode)
 
        If inTreeNode.ChildNodes.Count = 0 Then
            Select Case inTreeNode.Depth
                Case 0
                    PopulateCategories(inTreeNode)
                Case 1
                    PopulateProducts(inTreeNode)
            End Select
        End If
 
 
    End Sub
    Sub PopulateCategories(ByVal node As TreeNode)
 
        Dim sqlQuery As New SqlCommand( _
            "Select id_franchis, lib_franchise From param_franchis where id_ville=" & Session("id_ville"))
 
        Dim ResultSet As DataSet
        ResultSet = RunQuery(sqlQuery)
        If ResultSet.Tables.Count > 0 Then
            Dim row As DataRow
            For Each row In ResultSet.Tables(0).Rows
                Dim NewNode As TreeNode = New  _
                    TreeNode(row("lib_franchise").ToString(), _
                    row("id_franchis").ToString())
                NewNode.PopulateOnDemand = True
                NewNode.SelectAction = TreeNodeSelectAction.Expand
                node.ChildNodes.Add(NewNode)
            Next
        End If
    End Sub
    Sub PopulateProducts(ByVal node As TreeNode)
        Dim sqlQuery As New SqlCommand
        sqlQuery.CommandText = "Select libelle From totem " & _
            " Where id_franchis = @categoryid"
        sqlQuery.Parameters.Add("@categoryid", SqlDbType.Int).Value = _
        node.Value
        Dim ResultSet As DataSet = RunQuery(sqlQuery)
        If ResultSet.Tables.Count > 0 Then
            Dim row As DataRow
            For Each row In ResultSet.Tables(0).Rows
                Dim NewNode As TreeNode = New  _
                    TreeNode(row("libelle").ToString())
                NewNode.PopulateOnDemand = True
                NewNode.SelectAction = TreeNodeSelectAction.None
                node.ChildNodes.Add(NewNode)
            Next
        End If
    End Sub
 
    Function RunQuery(ByVal sqlQuery As SqlCommand) As DataSet
        Dim connectionString As String
        connectionString = _
            ConfigurationManager.ConnectionStrings _
            ("totem").ConnectionString
        Dim dbConnection As New SqlConnection
        dbConnection.ConnectionString = connectionString
        Dim dbAdapter As New SqlDataAdapter
        dbAdapter.SelectCommand = sqlQuery
        sqlQuery.Connection = dbConnection
        Dim resultsDataSet As DataSet = New DataSet
        Try
            dbAdapter.Fill(resultsDataSet)
        Catch ex As Exception
            Label1.Text = "Unable to connect to SQL Server."
        End Try
        Return resultsDataSet
    End Function

alors que moi j'ai pensé de recommencer à zero, si vous voulez en peu commencer ensemble pas à pas !!!

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Imports System.Data
Imports System.Data.SqlClient
Partial Class test2_treeview
    Inherits System.Web.UI.Page
 
    Private Function getparent()
        Dim connectionString As String
        connectionString = _
            ConfigurationManager.ConnectionStrings _
            ("totem").ConnectionString
        Dim dbConnection As New SqlConnection
        dbConnection.ConnectionString = connectionString
        Dim rq As String = "select id_franchis, lib_franchise from param_franchis"
        Dim sql As New SqlCommand(rq, dbConnection)
        Dim da As New SqlDataAdapter(sql)
        Dim ds As New DataSet
        Dim dt As New DataTable
        da.Fill(ds, "tab1")
        dt = ds.Tables("tab1")
 
    End Function
End Class

alors je suppose que cette fonction prend la responsabilité pour remplir mes nodes root (magasin 1, magasin 2, ...) mais je sais pas comment lui dire (à la fonction) mm la fonction vas remplir à l aide de ton resultat mes nodes root ????