易截截图软件、单文件、免安装、纯绿色、仅160KB

[技术散分]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!




相关问答:

为什么C写DLL文件C、PB能调用VB不能调用

为什么C写的DLL文件C、PB能调用VB不能调用?
VB里为什么有的DLL直接通过引用可以使用?有的需要通过declare申明外部函数?这些DLL有什么差别?

1、为什么PB能通过DECLARE声明而VB不行?
2、如果这个dll中的 ......

ASP简单问题

conn.asp

<%
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0; Data Source="&server.MapPath("Connt ......

用ASP怎么写以下代码

当结束时间大于开始时间则显示未完成
当结束时间小于开始时间则显示未达到任务
没有时间则显示正在进行中
asp代码应该怎么写


如:开始时间      结束时间      & ......

ASP 文件上传后将文件信息插入数据库的问题

能上传但不能插入数据库信息。ASP文件代码如下:

<%
  Response.Buffer = True
  Server.ScriptTimeOut=9999999
  On Error Resume Next
%>
<!DOCTYPE html PUBLIC ......

求改一个ASP小程序加上传功能和下载功能。。

文件:folder.inc
HTML code:

<%
Dim folderini,pos,pageName
fPath = Request.ServerVariables("PATH_TRANSLATED")
pos = instrRev(fPath,"\")
folderini = Left(fPath,pos)+&qu ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号