[技术散分]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)
这样就提对象不支持该属性或方法,问题指向Dal.InSertCls (Model)，在ASP中单独运行Dal.InSertCls没有问题
如果把以上BLL部分直接写在ASP中就正可正常执行，这是什么原恩
问题是Dal.InSertCls (Model)改成这样就Dal.InSertCls Model OK
看来（）能不用就不用。VB的语法确实不太规范，中午结贴。
如需要阅读该回复，请登录或注册CSDN!
相关问答：
<%@language="vbscript"%>
<%option explicit%>
<html>
<head> <title>xxx </title> </head>
<script language=vbs>
'注意变量 ......
<%On Error Resume Next
Set conn=Server.CreateObject("ADODB.Connection")
conn.begintrans
conn.Open ("Driver={SQL Server};server=(local);uid=sa;database=student;pwd=")
......
我用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 c ......
问个问题，我的一个网站能上传文件，我把网站目录考到同一台电脑的另一个目录下，然后在复制过来的目录上新建了一个网站，程序文件没动(相关路径的设置已经改了，不是路径问题)，但是新网站不能上传文件，我网上查了 ......
文件：folder.inc
HTML code:
<%
Dim folderini,pos,pageName
fPath = Request.ServerVariables("PATH_TRANSLATED")
pos = instrRev(fPath,"\")
folderini = Left(fPath,pos)+&qu ......
