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函数了 你这个应该用的时候打开.不用就关闭.
我在类中有一个函数 Public Function DownloadAdditionalSite(SiteName As siteconfig, Directory As String, ymd As String) As Boolean siteconfig是我自定义类型的数据，为什么会提示“只有在公共对象模块中� ......
