Option Explicit

'Global Const APP_PATH = "c:\docs\hosier\oledem\"
'Global Const DATABASE_NAME = "docs.mdb"
Global Const CONNECT_STRING = ""
Global Const OLE_MAX_VERBS = 10

Global Const DOCUMENT_TYPE_ACCESS1XOLE = 0
Global Const DOCUMENT_TYPE_OLE2 = 1
Global Const DOCUMENT_TYPE_MAX = 1

Global MDINew As Integer
Global db As Database
Global sDocumentName As String
Global iDocumentType As Integer

'Ole constants
'Comment out if already defined
Global Const OLE_ACTIVATE = 7
Global Const OLE_DELETE = 10
Global Const OLE_FETCH_VERBS = 17
Global Const OLE_INSERT_OBJ_DLG = 14
Global Const OLE_NONE = 3
Global Const OLE_CHANGED = 0

