用 Delphi 7 创建 ActiveX 组件交 ASP 使用
一、启动 Delphi 7 ,新建 ActiveX - ActiveX Library ;
二、引入类库先,若你的 Delphi 还没有引入 asp 组件的话。
Project - Import Type Library ,“Microsoft Active Server Pages Object Library(Version 3.0)”,对应的dll文件是:“系统盘:/Windows目录/system32/inetsrv/asp.dll”,为防止组件名称重复,将TRequest,TResponse,TSession 分别重命名为 TAspRequest,TAspResponse,TAspSession,再点击“Install...”。
三、新建 ActiveX - Automation Object ,coClassName ="test2",Instancing="Multiple Instance";
四、在"Itest2"上新建方法:
1、OnStartPage,参数:const unk:IUnknown,
2、OnEndPage
3、Test(测试方法)
五、代码:
六、注册ActiveX组件:
regsvr32 Project1.dll
反注册是:regsvr32 /u Project1.dll
注:若Delphi需重新编译工程,而IIS又在用这个dll,则重启w3c服务才能断开iis与dll的连接,才能编译。
七、ASP使用: