在ASP中自定义函数返回的RecordSet为什么不能Close，怎么办？(50分)

我有一个自定义函数A，定义如下：
Function A(id)
返回值是一个RecordSet，
类似如下这样使用是没有问题的：
1、Set rs=A(1)
2、Response.Write rs("sName")
但是如果:
rs.Close
就会保错。
为什么会出现这样的情况呢？应该怎么样才能Close这个Rs呢？

我这样测试过，iis5下不会报错。
<!--#include virtual="/include/conn.asp"-->
<%
set rs = a()
response.write rs(0)
rs.close
set rs = nothing
function a()
dim objRs
set objRs=server.createobject("adodb.recordset")
objRs.open "select * from taMain",conn,1,1
set a = objRs
end function
%>