关于用ASP写CLASS的问题!急用.

my0707 my0707 墨衍会员 · AI 创作全网分发 墨衍智能分发 通过墨衍一键同步至各平台 可同步平台 CSDN微信公众号微博知乎掘金百家号博客园抖音小红书 你的文章也可以这样分发 墨衍会员 ¥399起/年,写一次发全网 我也要 + 加入社区
==============================================
<%
class test
private rs
private rscount
public property Let setRs(rs)
rscount=rs.recordcount
end property
public property Get getRsCount
getRsCount=rs.recordcount
end property
end class

connstr="provider=SQLOLEDB;Data Source=(local);database=mytest;user id=sa; password=123"
set conn=server.createobject("adodb.connection")
set rs=server.createobject("adodb.recordset")
conn.open connstr
rs.open "select rq,val1,val2 from tb",conn,3,1

set t=new test
t.setRs=rs
response.write t.getRsCount
%>
==============================================

错误提示:
Microsoft VBScript 运行时错误 错误 '800a01a8'

缺少对象: 'rs'

/WEB/bzhs/qst/test.asp,行9


请高手帮忙!
...全文
评论 7
收藏 已收藏
分享
返回顶部
my0707
ASP 28,401 成员 356,940 内容