介绍如何在ASP中调用DLL的文章专题

发布时间：2023-09-23 10:45:22 所属栏目：Asp教程来源：

导读：本文通过VB5.0创建ActiveX DLL文件，这个文件模拟了一个掷色子的过程,向大家介绍如何在ASP中调用DLL的文章专题。

首先，必须得有DLL文件，本例是通过VB5.0创建ActiveX DLL文件，这个文件模拟了一个掷色子的过程。

本文通过VB5.0创建ActiveX DLL文件，这个文件模拟了一个掷色子的过程,向大家介绍如何在ASP中调用DLL的文章专题。

首先，必须得有DLL文件，本例是通过VB5.0创建ActiveX DLL文件，这个文件模拟了一个掷色子的过程。

在VB5.0的环境下，新建一个工程，并双击新建工程窗口中ActiveX DLL图标，VB将自动为项目添加一个类模块，并将该项目类型设置为ActiveX DLL。在属性窗口将类模块的名称属性改为clsDice。从工程菜单中，选择工程属性，将工程名称改为MyDLL。从文件菜单中，选择保存clsDice，将类模块保存为myDice.cls。添加以下代码：

Option Explicit

Private Max, Point As Integer

Public Property Get Result() As Integer
Result = Point
End Property

Public Property Get Maxpoint() As Integer
Maxpoint = Max
End Property

Public Property Let Maxpoint(num As Integer)
Max = num
End Property

Public Sub Throw()
Randomize
Point = Int(Rnd * Max) + 1
End Sub

Private Sub Class_Initialize()
Max = 6
End Sub

这个类模块定义了clsDice对象的两个属性和一个方法，这些属性和方法模拟了掷色子的过程。其中Maxpoint属性表示色子的面数，加入Property Let语句将使客户能修改色子的面数；Result属性表示最后掷出色子的点数；Throw方法代表掷色子的动作；Private Sub Class_Initialize语句将色子的面数缺省的设置为6面。

从文件菜单中，选择生成MYDLL.DLL并将它保存到适当的地方。至此，我们就创建了一个自己的DLL文件。

第二步要做的就是要在ASP文件中引用类clsDice。

ASP(活动服务器页面Active Server Pages)的所有代码都是在服务器上运行的，客户只能查看以HTML形式传回的结果。它使用“<%”和“%>”标记来标识脚本代码，并不传回客户端，在代码外部，使用HTML标记来标识内容。在下面Dice.asp的代码中使用了CreateObject函数创建了一个clsDice对象实例，该对象来自于上面创建的ActiveX.DLL--MYDLL.DLL文件，下面的例子使用了VBScript脚本语言。

（编辑：汽车网）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!