asp调用DLL返回rs的问题
采用三层，我只贴相关代码
SqlHelper部分
VBScript code:
Public Function getObjRs(Sql)
Set objRs = New ADODB.Recordset
objRs.Open Sql, objConn, 1, 1
Set getObjRs = obj
End Function
Dal部分
VBScript code:
Public Function getItem(Model As moonPotato_Model)
Sql = "Select * from Mpt_CostItem where CostItem_ParentID = " & Model.CostItem_ParentID & " order by CostItem_Order desc"
Set getItem = SqlHelper.getObjRs(Sql)
End Function
BLL部分
VBScript code:
Public Function getItem(Model As moonPotato_Model)
Set getItem = Dal.getItem(Model)
End Function
以上部分编译成了DLL文件
ASP部分
VBScript code:
Set BLL = Server.CreateObject("OfficeNet.moonPotato_DAL")
Set Model = Server.CreateObject("OfficeNet.moonPotato_Model")
Model.CostItem_ParentID = 5
Set rs = BLL.getItem(Model)
错误提示
Microsoft VBScript 运行时�
相关问答：
HTML code:
dim jf
set conn=server.createobject("adodb.connection")
connstr="Driver={Sql Server};Server="&Sqlip&";Database="&Sqldb&";Uid="& ......
我们有一个网站模板，www.c111.com.cn,希望修改一些地方：
1）点击左侧“服务品牌”的其中一个小分类，如“足球”，界面的右侧就出现如www.c111.com.cn/1.jpg，点击1.jpg上方的其中一个品牌logo，下面就出现相关的� ......
当结束时间大于开始时间则显示未完成
当结束时间小于开始时间则显示未达到任务
没有时间则显示正在进行中
asp代码应该怎么写
如:开始时间 结束时间 & ......
我的網頁代碼為ASP語言,驗證方式為系統自帶的WINDOW驗證模式.
現在我如果要在ASP代碼中獲取當前的登入人 ......
登陆页面-验证页面-成功后返回登陆页面
这时怎么显示XXX您已成功登陆
这个XXX怎么实现(为了节省大家时间 我只要XXX这个变量实现代码)
要代码:
在登录验证页面里，当登录成功后把用户名保存到session里
......
