如何实现ACTIVEX调用动态库。(100分)

  • 主题发起人 主题发起人 阿军
  • 开始时间 开始时间

阿军

Unregistered / Unconfirmed
GUEST, unregistred user!
我要写一个ACTIVEX,实现ACTIVEX调用动态库。然后我再在JSP中调用他。请问有什么好的方法?
 
呵呵
JSP中调用

你搞笑吧
虽然有办法,不过也太变态了吧
用asp吧
 
大哥,你到底会不会啊 .
 
其实activex中调用dll和通常的普通调用方法没什么区别,非常容易实现的,查看一下就会
出来一堆dll的调用实例。在网页中你可以通过javascript来调用activex的方法,在activex方法中再调用dll的方法,这还是比较容易实现的,如果你真的想在jsp中调用dll,那么我建议你看看jini的东西,比较难喔
 
那我的activex可以操作客户端的硬件吗,比如读卡器。
 
我会!![:)][:)][:)][:)]
 
我是刚申请这里的ID,还不能提问,如果你能帮我提个问题的话就更好了。
我也是做IC卡的。用DELPHI做ACTIVEX控件!
你说的我已经搞定了,但是我有个问题就是怎么在ACTIVEX控件中连接数据库?(怎么声明ADOCONNECTION 和ADOCOMMAND 和RECODESET)
你帮帮忙,在这里帮我问一下!!!我急着要用啊!
你要的代码如下:
uses
ComObj, ActiveX, AspTlb, com_check_TLB, StdVcl, SysUtils,Classes;

type
Tcheckuser = class(TASPMTSObject, Icheckuser)
protected
function check: Integer
safecall;
end;
VAR
function rf_init(port:integer;ss:integer):longint;stdcall;
far;external 'RfReader.dll';
function rf_exit(icdev:longint):integer;stdcall;
far;external 'RfReader.dll'
function Tcheckuser.check: Integer;
var
cardId:longword;
comPort : longint;
licencepath :string;
basicinfo:Basic_Info;
begin
// 关闭串口

// if not f_closecomm(icdev) then
// begin
// result := -1;
// exit;
// end;

// 打开串口并检查发卡器
comPort := 0;

icdev := OpenComm(comport);
if icdev <= 0 then // 打开串口1成功
begin
result := -2
// 读写器通讯错
exit
end

// 装载系统

licencepath := 'c:/licence.das';
st := Load_Author(licencepath); //装载系统
if st <> 0 then
begin
CloseComm(icdev);
result := st;
exit
// 装载系统失败
end
// 查询用户卡号
rf_beep( icdev ,10 )
st := GetBasicInfo ( icdev,basicinfo,cardId );
if st <> 0 then
begin
CloseComm(icdev);
result := st;

exit;
end
else
begin
CloseComm(icdev);
result := basicinfo.SerialNo
//返回卡流水号!
exit;
end;


end;

 
我的油箱lv8888@263.net
 
后退
顶部