本文通過VB5.0創建ActiveXDLL文件，這個文件模擬了一個擲色子的過程,向大家介紹如何在ASP中調用DLL的文章專題。
動態聯接庫(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文件。
第二步要做的就是要在ASP文件中引用類clsDice。
ASP(活動服務器頁面ActiveServerPages)的所有代碼都是在服務器上運行的，客戶只能查看以HTML形式傳回的結果。它使用“<%”和“%>”標記來標識腳本代碼，並不傳回客戶端，在代碼外部，使用HTML標記來標識內容。在下面Dice.asp的代碼中使用了CreateObject函數創建了一個clsDice對象實例，該對象來自於上面創建的ActiveX.DLL--MYDLL.DLL文件，下面的例子使用了VBScript腳本語言。
<!--METADATATYPE="typelib"FILE="Path/mydll.dll"-->