1、代码和DLL的区别

    DLL代码前要加上以下一段，目的是引用ASP五大对象：
Private Context As ScriptingContext
Private Application As Application
Private Response As Response
Private Request As Request
Private Session As Session
Private Server As Server

Public Sub OnStartPage(PassedScriptContext As ScriptingContext)
    Set Context = PassedScriptContext  'Asp运行环境对象
   Set Application = Context.Application  'Asp 五大对象
   Set Request = Context.Request
    Set Response = Context.Response
    Set Server = Context.Server
    Set Session = Context.Session
End Sub

2、部件引用

  要引用MicroSoft Active Server Pages Objects Library
  如果DLL里也封装了数据库连接(Connections)和数据集(RecordSet)，DLL工程可以使用原来ASP里的数据库写法，也可以通过以下引用部件的方法实现：MicroSoft ActiveX Data Objects  2.7 Library
 同时把原ASP程序里的Server.CreateObject("ADODB.CONNECTION")改成下面样子，加在代码头部
  Public conn As New ADODB.connection
   Public rs As New ADODB.Recordset

另外：程序结束时要记得关闭连接，免得占用系统资源，影响服务器运行.
   Set rs = Nothing
   rs.Close
   Set conn = Nothing '将连接设为空，释放它所占用的资源。
  conn Close '将连接关闭(无释放连接所占用的资源)