没有高手在吗？

Question

Public Function conntemp()
Dim conn As New ADODB.Connection '---->把这两行放到前面，做为一个公共变量，否则，你一退出这个子程序这两个变量就没有了！
Dim rs As New ADODB.Recordset    '---->
conn.Open "dsn=mssql;uid=sa;pwd=;"
rs.Open "select * from sys_user_zz", conn, 1, 3
rp.Write "<h2>" & rs.RecordCount & "</h2>"
rp.Write "<h1>database connection is already created</h1>"
conntemp = rs                  ->  改为 Set conntemp = rs 
End Function

Answer 1

非常非常谢谢你，我开始只怀疑rs要作为公共变量的，真的非常谢谢你！

Answer 2

已经可以了！不过不好意思,我已经没有分了，不过还是谢谢你