关于treeview树视图问题

[bigman_lfj]

//这段代码，编译提示不合法的key;,麻烦各位帮我看一下；3x
adors, rs是2个adodb.recorset;
Do Until adors.EOF
Set noderoot = Trv_list.Nodes.Add(, , Trim(adors("type")), adors("type"), 4, 4)
stritem = Trim(adors.Fields(0))
strSql = "select * from device where type = '" & stritem & "'"
rs.Open strSql, cn, 3, 2
Do Until rs.EOF
Trv_list.Nodes.Add adors("type"), tvwChild, rs.Fields(0), rs.Fields(1), 2, 2
rs.MoveNext
i = i + 1
Loop
rs.Close
adors.MoveNext
j = j + 1
Loop
adors.Close

[lindqp]

Trv_list.Nodes.Add adors("type"), tvwChild, rs.Fields(0), rs.Fields(1), 2, 2
中的key值重复
确保key值唯一就不会出错！

[网络老男孩了]

------------------是不是这一句报错？？？
Trv_list.Nodes.Add adors("type"), tvwChild, rs.Fields(0), rs.Fields(1), 2, 2
----------------

[bigman_lfj]

可是adors("type")并没有重复的key值阿，type字段是primary key;