www.pudn.com > ADO 2.6 Programmers Reference(Source Code).zip > Globals.bas

Attribute VB_Name = "Globals" 
Option Explicit 
 
' global connect variables 
Public g_sProvider              As String       ' provider 
Public g_sConnectString         As String       ' connect string 
Public g_sDriver                As String       ' odbc driver 
Public g_sLogdb                 As String       ' path to logging database 
 
' provider descriptions 
Public Const ACCESS_DRIVER      As String = "Microsoft Access Driver (*.mdb)" 
Public Const ACCESS_PROVIDER    As String = "Microsoft.Jet.OLEDB.4.0" 
Public Const ACCESS_PROV_DESC   As String = "Microsoft Provider for Jet"