ASP 调用dll及封装dll实例

打开VB6,新建ActiveX DLL

2、在工程引用中加入Microsoft Active Server Pages Object Library选择

3、填加代码如下:

复制代码 代码如下:

'Code Start

'声明部分

Private MyScriptingContext As ScriptingContext

Private MyApplication As Application

Private MyRequest As Request

Private MyResponse As Response

Private MyServer As Server

Private MySession As Session

'下面定义公用函数(在VB中访问ASP对象,即在VB中可以用MyApplication等同于ASP中的Application、MyRequest等同于ASP中的Request、 MyResponse等同于ASP中的Response、 MyServer等同于ASP中的Server、 MySession等同于ASP中的Session 使用)

Public Sub OnStartPage(PassedScriptingContext As ScriptingContext)

Set MyScriptingContext = PassedScriptingContext

Set MyApplication = MyScriptingContext.Application

Set MyRequest = MyScriptingContext.Request

Set MyResponse = MyScriptingContext.Response

Set MyServer = MyScriptingContext.Server

Set MySession = MyScriptingContext.Session

End Sub

Public Sub OnEndPage()

Set MyScriptingContext = Nothing

Set MyApplication = Nothing

Set MyRequest = Nothing

Set MyResponse = Nothing

Set MyServer = Nothing

Set MySession = Nothing

End Sub

'建立自定义函数SayHello

Public Sub SayHello()

MyResponse.Write ("Hello World")

End Sub

'Code End

4、将类名改为:HelloWorld 将工程名改为:TestVBCode

5、生成TestVBCode.DLL文件,并使用Windows运行注册组件命令Regsvr32 路径\TestVBCode.DLL注册后即可使用。(卸载组件命令为Regsvr32 /u 路径\TestVBCode.DLL)

6、建立Test.asp文件,代码如下

复制代码 代码如下:

<%

'VB自建函数调用格式

'Set 对象名=Server.CreateObject("工程名.类名")

'对象名.自建函数名

Set MyTestObj = Server.CreateObject("TestVBCode.HelloWorld")

MyTestObj.SayHello

%>

7、运行Test.asp文件结果显示如下:

Hello World

===========================================================

对于更复杂的运用,大家可以通过这个实例向外扩展就可以了.

如:

复制代码 代码如下:

Public Sub connstr2()

Set conn = MyServer.CreateObject("ADODB.Connection")

conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & MyServer.MapPath("codata.mdb")

Set rs = conn.Execute("select * from news")

Do While Not rs.EOF

MyResponse.Write (rs("news_title") & "<br>")

rs.MoveNext

Loop

rs.Close

Set conn = Nothing

End Sub

这个是用数据库连接的代码封装,当然这里要添加ADO引用的.

时间: 2024-10-22 07:21:13

ASP 调用dll及封装dll实例的相关文章

asp调用vb生成的dll文件,执行shell异步变同步的解决方法(带源代码)

vb|解决|源代码|执行|shell|异步|同步 阿里西西web开发团队在开发一个asp系统,需要同步调用vb(dll)执行的shell操作,asp->vb(dll)->shell->rar.exe同步执行exe文件. 由于shell是异步处理,这个问题让我们头疼了很久,最终还是通过百度找到了几个不错的函数,调试过,效果还不错,建议可以先用vb建exe来调试好了,再放入DLL编译给ASP调用. 代码如下: 以下是用vb制作一个exe文件进行调试,打开记事本和计算器示例:Private T

asp调用C#编写的DLL发送邮件

一直想写一个asp能用发送邮件的服务器组件,不过用VC太麻烦了,一直都没都手. 前两天看一篇文章,说是asp怎么调用C#写的DLL,一试之下,果然可以,大喜,这下用来写一个发送邮件的东东简单了吧. 呵呵,非常简单,一会就弄好了,不敢独享,先看代码: 1 using System; 2 using System.Net.Mail; 3 using System.Text; 4 5 namespace IMELS 6 { 7 public class SendMail 8 { 9 public Se

ASP 调用dll及封装dll实例_应用技巧

打开VB6,新建ActiveX DLL 2.在工程引用中加入Microsoft Active Server Pages Object Library选择 3.填加代码如下: 复制代码 代码如下: 'Code Start '声明部分 Private MyScriptingContext As ScriptingContext Private MyApplication As Application Private MyRequest As Request Private MyResponse As

解决ASP中Connection对像封装dll问题

     asp代码保密一直是令人头痛的问题,目前没有非常好的解决方案,无非用vb编译成dll,但工作量实在太大,于是一直苦苦寻求着另一种途径,本文详细介绍关于解决ASP中Connection对像封装dll问题的文章专题. 中午,突然灵感一发,"为什么不尝试用加密数据库?",通过对数据库设一个高强度的密码,然后用vb封装connection对像,将密码信息写在dll里,然后通过asp创建组件方式调用,就算人家拿了我的代码,也无法改动数据库! 于是,开始了一步步既痛苦又刺激的旅程.vb三

pb程序里如何调用vs2012编译的dll ,该dll是封装的第三方的webservice

问题描述 pb程序里如何调用vs2012编译的dll ,该dll是封装的第三方的webservice 第三方给了一个webservice,我用vs的命令,编译成了dll,可惜pb程序里无法正常调用该dll 解决方案 .net的dll,需要包装成com对象,才能被pb调用,不是一般的dll.关于如何包装com组件,以及pb如何调用com组件,请google. 解决方案二: pb程序里如何调用vs2012编译的dll ,该dll是封装的第三方的webservice 第三方给了一个webservice

关于asp.net调用pb写的dll问题

问题描述 关于asp.net调用pb写的dll问题 现在asp.net调用pb写的dll我将dll放到bin目录然后添加引用,初始化的时候查看有哪些接口的时候报错出现死循环这里出现函数求值超时,谁遇到过这种情况求大神们指导. 解决方案 Asp.NET调用C++写的dllAsp.NET调用C++写的dllasp.net调用C++的dll 解决方案二: com对象本身是否有问题,先用activex control test container测试. 解决方案三: 如果winform可以调用的话,估计

asp.net源程序编译为dll文件并调用的实现过程_实用技巧

很多时候,我们需要将.cs文件单独编译成.dll文件,这就需要使用csc命令将.cs文件编译成.dll动态链接库文件.具体的操作步骤如下: 打开命令窗口->输入cmd到控制台->cd C:WINDOWSMicrosoft.NETFrameworkv1.1.4322 转到vs.net安装的该目录下->执行csc命令csc /target:library File.cs->在该目录下产生一个对应名字的.dll文件(前提:把.cs文件放到C:WINDOWSMicrosoft.NETFra

一个网站程序是由asp.net写的,里面的代码大多数封装到了dll里面,dll能在被编译么!?又办法没?

问题描述 一个网站程序是由asp.net写的,里面的代码大多数封装到了dll里面,dll能在被编译么!?有办法没?

asp.net调用医保接口DLL出现问题

问题描述 在XP中使用VS2008提供的虚拟IIS能够正常调用执行.但发布后,一旦开始调用(我把函数调用放在一个button里,点击执行),网页就一直没有响应了.以下是关键调用代码:intresult;stringinputdata="";result=DLLImports.INIT(inputdata);//调用函数初始化publicclassDLLImports{strings=System.Web.HttpContext.Current.Server.MapPath("