假前最后一帖ASP调用VB组件

我用VB按MVC的构架写组件供ASP调用
BLL层
VB code:

Private Dal As New moonPotato_DAL
Public Sub inSertUser(Model As moonPotato_Model)
Dal.InSertCls (Model)
End Sub


ASP中调用
VB code:

Set BLL = server.CreatoObject("tttt.moonPotato_BLL")
Set Model= server.CreatoObject("tttt.moonPotato_Model")
Model.userName="123"
Model.userLevel="456"
BLL.inSertUser(Model)


这样就提对象不支持该属性或方法
如果BLL在VB中写，直接写在ASP中就正可正常执行，这是什么原恩

---

呵呵。问题已经解决了。
Dal.InSertCls (Model)
改成
Dal.InSertCls Model

---

引用

呵呵。问题已经解决了。
Dal.InSertCls (Model)
改成
Dal.InSertCls Model

用call Dal.InSertCls (Model) 也行

---

打酱油~~~~~