asp对象化之:数据库操作类

<% 
’────────────────────────────────    
’功能说明：db类是实现数据库连接的类，里面留有数据库连接字符串接口 
’包括模块：无，一般都是被其他模块包括 
’调用方法：1、如果使用原有数据库连接，则不用更改数据库连接字符串ConnStr 
’        具体操作为：Set DBC=New DataBaseClass 
’               DBC.ConnStr="其他连接字符串" 
’       2、方法使用：Set Conn=DBC.OpenConnection()得到一个连接对象 
’────────────────────────────────    
Class dbclass 
’────────────────────────────────    
’定义变量    
Private IConnStr    
’────────────────────────────────    
’ ConnStr属性 
Public Property Let ConnStr(Val) 
    IConnStr = Val 
End Property 
’────────────────────────────────    
’ ConnStr属性    
Public Property Get ConnStr() 
    ConnStr = IConnStr 
End Property 
’────────────────────────────────    
’ 类初始化    
Private Sub Class_initialize()    
End Sub    
’────────────────────────────────    
’ 类注销    
Private Sub Class_Terminate()