Function TreeMenu(id) sql = "select * from Class where CateID=1" rs.Open sql, cover, 1, 1 While Not rs.EOF Response.Write rs("Name") TreeMenu (rs("id")) rs.MoveNext Wend rs.Close End Function
因为我的rs是定义成全局变量的，如果释放掉就彻底关了 而且释放也没用 Function TreeMenu(id) sql = "select * from Class where CateID=1" rs.Open sql, cover, 1, 1 While Not rs.EOF Response.Write rs("Name") TreeMenu (rs("id")) rs.MoveNext Wend rs.Close set rs=nothing End Function 这样也不行，因为在释放前就调用TreeMenu函数了 你这个应该用的时候打开.不用就关闭.
