跪求b/s系统activeX调用DLL的代码,不够可以加分 ( 积分: 100 )

  • 主题发起人 主题发起人 lyiqj1314
  • 开始时间 开始时间
L

lyiqj1314

Unregistered / Unconfirmed
GUEST, unregistred user!
我这里现有明华IC卡读卡器读写DLL,想用在b/s系统中在客户端浏览器通过COM口读IC卡。
看了一下论坛,大概是用ActiveX封闭DLL,然后再在Asp中调用。
因为以前没做过b/s开发,所以不清楚具体如何下手,希望哪位高人可以提供如下代码片段:
1.封闭DLL成ActiveX
2.Asp中自动下载并注册activeX
3.如何在asp中调用ActiveX,并得到返回值
我是小白,请大哥们教教小弟~~~~
可以发到我的邮箱leiyong000@126.com
 
我这里现有明华IC卡读卡器读写DLL,想用在b/s系统中在客户端浏览器通过COM口读IC卡。
看了一下论坛,大概是用ActiveX封闭DLL,然后再在Asp中调用。
因为以前没做过b/s开发,所以不清楚具体如何下手,希望哪位高人可以提供如下代码片段:
1.封闭DLL成ActiveX
2.Asp中自动下载并注册activeX
3.如何在asp中调用ActiveX,并得到返回值
我是小白,请大哥们教教小弟~~~~
可以发到我的邮箱leiyong000@126.com
 
<HTML>
<BODY>
<TITLE> Testing Delphi ASP </TITLE>
<CENTER>
<H3> asp代码 </H3>
</CENTER>
<HR>
<%

Dim retstr

Set RETSTR = &quot;系统正忙无法响应您的请求,请稍后再试!&quot

Set ASPObj = Server.CreateObject(&quot;动态连接库名称.类名称&quot;)
Set RETCODE= ASPObj. 函数(赋值参数,,,)

RESPONSE.WRITE RETSTR
%>
<HR>
</BODY>
</HTML>
 
RETCODE就是返回参数,你可以怎么做都可以了。
 
谢谢蓝叶菱,我想再问一下,asp可以实现调用一次函数返回多个值不
是这样的,我的DLL库里的读卡函数对返回值是采用的地址传递,你上面的RETCODE应该只能得到函数名本身的返回值,对吗?
我可以在asp语句里对变量使用值传递不?
 
谁可以告诉我ActiveX封闭DLL的具体步骤啊。。谢谢
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
2K
DelphiTeacher的专栏
D
后退
顶部