代码如下:Function getTreeRootId(pNodeId) getSQL = “select note_id,parent_id from [T_tree_demo] where note_id='”& pNodeId &”‘” Set getRs = db.Execute(getSQL) If Not getRs.eof Then If Trim(getRs(“parent_id”)) = “0” Then getTreeRootId = Trim(getRs(“note_id”)) Exit Function Else getTreeRootId = getTreeRootI