Hallo zusammen , ich habe ein problem mit dem treeview, hier mein code darunter meine
problembeschreibung:
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs)
Handles MyBase.Load
Dim connect As String = _
db.ConnectString("sa", "**", "Server", "datenbank")
'Dim reader As SqlClient.SqlDataReader = db.SqlReader("select * from tree",
"connect")
Dim strSQL As String = "select * from Tree;"
db.Open(connect)
Dim dskategorie As New DataSet
Dim mycommand As New SqlClient.SqlDataAdapter(strSQL, connect)
mycommand.Fill(dskategorie, "Tree")
db.Close()
'dim type as New
Dim RootNode As Microsoft.Web.UI.WebControls.TreeNode
RootNode = New Microsoft.Web.UI.WebControls.TreeNode
RootNode.NodeData = "0"
RootNode.Text = "Hauptstamm"
'RootNode.Type = "folder"
RootNode.NavigateUrl = "WebForm2.aspx"
RootNode.Target = "frametarget"
TreeView1.Nodes.Add(RootNode)
RootNode.Expanded = True
Dim NewNode As TreeNode
Dim Kategorie As DataRow
For Each Kategorie In dskategorie.Tables("Tree").Rows
NewNode = New TreeNode
NewNode.NodeData = Kategorie("GB").ToString()
NewNode.Text = Kategorie("GB_Bez").ToString()
'NewNode.Type="folder"
-----> NewNode.NavigateUrl = Kategorie("WebForm2.aspx").ToString()
NewNode.Target = "frametarget"
AttachByData(NewNode, Kategorie("Region_id").ToString())
Next
End Sub
Public Sub AttachByData(ByVal node As TreeNode, ByVal NodeData As String)
Dim n As TreeNode
For Each n In TreeView1.Nodes
FindRecursive(node, n, NodeData)
Next
End Sub
Public Sub FindRecursive(ByVal AttachNode As TreeNode, ByVal n As TreeNode, ByVal
Data As String)
If n.NodeData = Data Then
n.Nodes.Add(AttachNode)
Else
Dim aNode As TreeNode
For Each aNode In n.Nodes
FindRecursive(AttachNode, aNode, Data)
Next
End If
End Sub
Und hier mein problem :
In der zeile die ich mit einem pfeil (links) markiert hab da schreibt er mir einen
fehler das Webform2.aspx nicht zu meiner tabelle geh�rt ?!? da geh�rt doch eine url
rein oder nicht?
Und mein zweites problem ist wenn ich die zeile auskommentiere dann funktioniert es
zwar aber ich bekomme nur den hauptstamm zu sehen.
Mach ich da was falsch mit den datenbankfeldern??
Meine tabelle ist wie folgt aufgebaut:
Erstes feld :GB(ist die ID f�r GB_Bez)
Zweites feld : GB_Bez
Drittes Feld:Region_ID(ist die ID f�r Region)
Viertes Feld: Region
_______________________________________________
Asp.net mailing list
[EMAIL PROTECTED]
http://www.glengamoi.com/mailman/listinfo/asp.net
