动态联接库(DLL)是加快应用程序关键部分的执行速度的重要方法，但有一点恐怕大部分人都不知道，那就是在ASP文件也能通过调用DLL来加快服务器的执行速度，下面我简单的介绍一下在ASP文件调用DLL的步骤。

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

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

OptionExplicit
PrivateMax,PointAsInteger
PublicPropertyGetResult()AsInteger
Result=Point
EndProperty
PublicPropertyGetMaxpoint()AsInteger
Maxpoint=Max
EndProperty
PublicPropertyLetMaxpoint(numAsInteger)
Max=num
EndProperty
PublicSubThrow()
Randomize
Point=Int(Rnd*Max)+1
EndSub
PrivateSubClass_Initialize()
Max=6
EndSub

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

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