Public Property Get DB() As Connection

'有连接？
If m_db Is Nothing Then
    
    '新建连接对象
    Set m_db = New Connection
    
    m_db.Open m_strODBCString, m_strDBLoginString, m_strDBPwdString
    
End If

' 返回给调用者
Set DB = m_db

End Property

It is the code from 《Beginning E-Commerce: with Visual Basic, ASP, SQL 
Server 7.0 and MTS》, now ,I want to get a Error from the Database 
operation , but I can't know which is the variable who do the database 
connection, could you tell me?
thanks for your answering!
yours,