有关treeview问题，很急，

[xyfeng78]

代码如下：
数据库数据:
NodeID TASK PARENTID
1 我的工作 0
2 日常业务 1
3 采购入库单2
4 成品入库 2
5 采购增加 3


Public Shared dv As DataView '全局变量已获得数据

Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'在此处放置初始化页的用户代码
Call MyDbConnInit()

If Not IsPostBack Then
Call CreateDV()
Call InitTree(TreeView1.Nodes, 0)
End If
End Sub

Private Sub InitTree(ByRef Nds As TreeNodeCollection, ByVal parentId As Integer)

Dim drv As DataRowView
Dim tmpNd As TreeNode

dv.RowFilter = "ParentID='" & parentId & "'"

For Each drv In dv
tmpNd = New TreeNode()
tmpNd.ID = drv("NodeID")
tmpNd.Text = drv("Task")
Nds.Add(tmpNd)
InitTree(Nds(Nds.Count - 1).Nodes, tmpNd.ID)
Next

End Sub


为什么出现错误:
异常详细信息: System.IndexOutOfRangeException: 在位置 1 处没有任何行。
已debug，发现当tmpNd.ID=6时，出现此错误,怎么办，快救我！！

[xyfeng78]

up

[acewang]

代码没有处理数据集为空的情况，仍然去帮定所以就报错

[seesea125]

你少写东西了，看看范例
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
CreateDataSet()
intiTree(TreeView1.Nodes, 0)
End Sub
Private Sub intiTree(ByRef Nds As TreeNodeCollection, ByVal parentId As Integer)
Dim dv As New DataView()
Dim drv As DataRowView
Dim tmpNd As TreeNode
Dim intId As Integer
dv.Table = ds.Tables("tree")
dv.RowFilter = "PARENTID=’" & parentId & "’"
For Each drv In dv
tmpNd = New TreeNode()
strId = drv("NODE_ID")
tmpNd.ID = strId
tmpNd.Text = drv("NODE_NAME ")
tmpNd.ImageUrl = drv("ICON").ToString
Nds.Add(tmpNd)
intiTree(Nds(Nds.Count - 1).Nodes, intId)
Next
End Sub

[xyfeng78]

没有少写东西啊，你的代码，intid永远等于0，肯定不对。

[xyfeng78]

up快来解决啊

[pp1234567890]

CreateDataSet() 这个怎么没有代码，能不能让看看

[seesea125]

Private Sub CreateDataSet()’建立数据集
Dim myConn As New SqlConnection()
Dim myCmd As New SqlCommand("select NODEID,NODENAME,PARENTID,ADDRESS,ICON from Tree_info", myConn)
Dim myDataAdapter As New SqlDataAdapter()
myConn.ConnectionString = Application("connectstring")
myCmd.CommandText = ""
myCmd.Connection = myConn
myDataAdapter.SelectCommand = myCmd
myDataAdapter.Fill(ds, "tree")
End Sub
这些代码是别人的，我知道里面有毛病啊，我用c＃改好了的，他的思路是正确的，错误的地方就是把intiTree(Nds(Nds.Count - 1).Nodes, intId) 换成intiTree(Nds(Nds.Count - 1).Nodes, strId) ，其它语法错误也写错了好几个，你自己看看把，要是需要c＃的我倒可以给你帖一下

[pp1234567890]

楼上的，能不能给我份完整的VB代码，我会C#昨天改用C#改，改不成，谢谢

[xyfeng78]

to seesea125(雨天) ,如果改为strid，，则代和我的一样啊，可就是不行，
快帮我啊

[xyfeng78]

没人会啊，急死了

[seesea125]

我的QQ：12533391，明天我帮你调试把

[xyfeng78]

up

[xyfeng78]

up

[xyfeng78]

up

[pp1234567890]

ds怎么没有声明，我生命了，却没有显示，这是怎么了？？？

[xyfeng78]

http://www.developersdex.com/gurus/articles/407.asp?Page=2

[xyfeng78]

http://www.aspalliance.com/jamesavery/webcontrols/treeviewp2.aspx

[yuanylong]

http://expert.csdn.net/Expert/topic/2093/2093882.xml?temp=5.254763E-02

[seesea125]

昨天回去我用vb调试了一下，程序和你的一样，却没有出现这样的问题，我建了8级都没有问题，我想有可能是数据库或treeview的属性设置问题，需要的话QQ传给你我的代码和数据库看看