Attribute VB_Name = "AdoConstants"
'******************************************************************************************
'*
'*  AdoConstants.BAS    - ADO Constant definitions.
'*
'*  Copyright (c) 1998 Microsoft Corporation
Option Explicit


'
' Recordset.CursorType property constants:
'
Const adOpenUnspecified = -1    'Not specified/Default, equates to Forward Only
Const adOpenForwardOnly = 0     'No bookmarks, and only forward moves are allowed.
Const adOpenKeyset = 1          'Bookmarks allowed, movement allowed in any direction.
Const adOpenDynamic = 2         'NYI, assignment OK, is mapped to Keyset on Recordset.Open
Const adOpenStatic = 3          'NYI, is mapped to Keyset on assignment.

'
' Recordset.LockType property constants:
'
Const adLockUnspecified = -1    'Not specified/Default, equates Read Only.
Const adLockReadOnly = 1        'Read only recordset, updates (edits), AddNews, and Deletes not allowed.
Const adLockPessimistic = 2     'NYI, mapped to adLockOptimistic.
Const adLockOptimistic = 3      'Full access to recordset, Updates, AddNews, and Deletes allowed.
Const adLockBatchOptimistic = 4 'NYI, mapped to adLockOptimistic.

'
' Recordset.Open Option types:
'
'   (used in Recordset.Open <Source>, <Connection/Volume>, <CursorType>, <LockType>, <Options>)
'
Const adCmdText = 1             'Forces <Source> to be interpreted as an SQL command.
Const adCmdTable = 2            'Forces <Source> to be interpreted as the name of a table.
Const adCmdStoredProc = 4       'Forces <Source> to be interpreted as the name of a stored procedure.
Const adCmdUnknown = 8          'Attempts to evaluate <Source> as SQL Text, a StoredProc, or Table in that order.

'
' Recordset.Supports property constants:
'
Const adAddNew = 16778240       'AddNew method available.
Const adApproxPosition = 16384  'Absolute Position and Page properties available.
Const adBookMark = 8192         'Bookmark property available.
Const adDelete = 16779264       'Delete method available.
Const adHoldRecords = 256       'NI - always unset.
Const adMovePrevious = 512      'Cursor can be moved backwards.
Const adResync = 131072         'NI - always unset.
Const adUpdate = 16809984       'Update method available
Const adUpdateBatch = 65536     'NI - always unset.

'
' Recordset.AbsolutePage, Recordset.AbsolutePosition special constants:
'
Const adPosUnknown = -1         'Position not known.
Const adPosBOF = -2             'Cursor is at BOF.
Const adPosEOF = -3             'Cursor is at EOF.

'
' Recordset.EditMode property constants:
'
Const adEditNone = 0            'No edit in progress.
Const adEditInProgress = 1      'Edit in progress (current record has been modified), requires Update/CancelUpdate.
Const adEditAdd = 2             'AddNew in progress, requires Update/CancelUpdate.

'
' Field.Type property constants (All other field types NI):
'
Const adVarWChar = 202          'Text field, with defined maximum length < 256 characters.
Const adLongVarWChar = 203      'Text field, with implicit max length about 32K characters.
Const adVarBinary = 204         'Binary (Blob) field, with defined maximum length < 256 bytes.
Const adLongVarBinary = 205     'Binary (Blob) field, with implicit max length about 64K bytes.
Const adInteger = 3             '32-Bit signed integer.
Const adSmallInt = 2            '16-bit signed integer.
Const adDouble = 5              'Double-precision floating point number.
Const adDate = 7                'A date value.
Const adUnsignedInt = 19        '32-Bit unsigned integer - NOTE: vb does not support unsigned integers, DO NOT USE THIS.
Const adUnsignedSmallInt = 18   '16-Bit unsigned integer - NOTE: vb does not support unsigned integers, DO NOT USE THIS.
Const adBoolean = 11            'A boolean value - True/False.

'
' Field.Attributes property constants:
'
Const adFldMayDefer = 2         'NI - never returned.
Const adFldUpdatable = 4        'Completely dependant on Lock type specified (ie, Read Only).
Const adFldUnknownUpdatable = 8 'NI - never returned.
Const adFldFixed = 16           'Qnly set for adVarWChar, adLongVarWChar, adVarBinary, and adLongVarBinary.
Const adFldIsNullable = 32      'NI - always returned.
Const adFldMayBeNull = 64       'NI - always returned.
Const adFldLong = 128           'NI - never returned.
Const adFldRowID = 256          'NI - never returned.

'
' Recordset.Move special constants for <Start>:
'
'   (used in Recordset.Move <NumRecords>, <Start>)
'
Const adBookmarkCurrent = 0
Const adBookmarkFirst = 1
Const adBookmarkLast = 2

'
' Recordset.GetRows special constants for <Rows>:
'
'   (used in Recordset.GetRows <Rows>, <Start>, <Fields>)
'
Const adGetRowsRest = -1

'
' Recordset.Delete special constants for <AffectRecords>:
'
'   (used in Recordset.Delete <AffectRecords>)
'
Const adAffectCurrent = 1   'Only the current record is deleted.
Const adAffectGroup = 2     'NI - will return runtime error.
Const adAffectAll = 3       'NI - will return runtime error.


'******************************************************************************************
'*
'*  ADO Errors
'*
Const adErrInvalidArgument = &HBB9
Const adErrNoCurrentRecord = &HBCD
Const adErrIllegalOperation = &HC93
Const adErrFeatureNotAvailable = &HCB3
Const adErrItemNotFound = &HCC1
Const adErrObjectNotSet = &HD5C
Const adErrDataConversion = &HD5D
Const adErrObjectClosed = &HE78
Const adErrObjectOpen = &HE79
Const adErrProviderNotFound = &HE7A
Const adErrInvalidParamInfo = &HE7C
Const adErrInvalidConnection = &HE7D

'******************************************************************************************
'*
'*  OLE DB Errors
'*
Const DB_E_BADACCESSORHANDLE = &H80040E00
Const DB_E_ROWLIMITEXCEEDED = &H80040E01
Const DB_E_READONLYACCESSOR = &H80040E02
Const DB_E_SCHEMAVIOLATION = &H80040E03
Const DB_E_BADROWHANDLE = &H80040E04
Const DB_E_OBJECTOPEN = &H80040E05
Const DB_E_BADCHAPTER = &H80040E06
Const DB_E_CANTCONVERTVALUE = &H80040E07
Const DB_E_BADBINDINFO = &H80040E08
Const DB_SEC_E_PERMISSIONDENIED = &H80040E09
Const DB_E_NOTAREFERENCECOLUMN = &H80040E0A
Const DB_E_LIMITREJECTED = &H80040E0B
Const DB_E_NOCOMMAND = &H80040E0C
Const DB_E_COSTLIMIT = &H80040E0D
Const DB_E_BADBOOKMARK = &H80040E0E
Const DB_E_BADLOCKMODE = &H80040E0F
Const DB_E_PARAMNOTOPTIONAL = &H80040E10
Const DB_E_BADCOLUMNID = &H80040E11
Const DB_E_BADRATIO = &H80040E12
Const DB_E_BADVALUES = &H80040E13
Const DB_E_ERRORSINCOMMAND = &H80040E14
Const DB_E_CANTCANCEL = &H80040E15
Const DB_E_DIALECTNOTSUPPORTED = &H80040E16
Const DB_E_DUPLICATEDATASOURCE = &H80040E17
Const DB_E_CANNOTRESTART = &H80040E18
Const DB_E_NOTFOUND = &H80040E19
Const DB_E_CANNOTFREE = &H80040E1A
Const DB_E_NEWLYINSERTED = &H80040E1B
Const DB_E_GOALREJECTED = &H80040E1C
Const DB_E_UNSUPPORTEDCONVERSION = &H80040E1D
Const DB_E_BADSTARTPOSITION = &H80040E1E
Const DB_E_NOQUERY = &H80040E1F
Const DB_E_NOTREENTRANT = &H80040E20
Const DB_E_ERRORSOCCURRED = &H80040E21
Const DB_E_NOAGGREGATION = &H80040E22
Const DB_E_DELETEDROW = &H80040E23
Const DB_E_CANTFETCHBACKWARDS = &H80040E24
Const DB_E_ROWSNOTRELEASED = &H80040E25
Const DB_E_BADSTORAGEFLAG = &H80040E26
Const DB_E_BADSTATUSVALUE = &H80040E28
Const DB_E_CANTSCROLLBACKWARDS = &H80040E29
Const DB_E_BADREGIONHANDLE = &H80040E2A
Const DB_E_NONCONTIGUOUSRANGE = &H80040E2B
Const DB_E_INVALIDTRANSITION = &H80040E2C
Const DB_E_NOTASUBREGION = &H80040E2D
Const DB_E_MULTIPLESTATEMENTS = &H80040E2E
Const DB_E_INTEGRITYVIOLATION = &H80040E2F
Const DB_E_BADTYPENAME = &H80040E30
Const DB_E_ABORTLIMITREACHED = &H80040E31
Const DB_E_ROWSETINCOMMAND = &H80040E32
Const DB_E_CANTTRANSLATE = &H80040E33
Const DB_E_DUPLICATEINDEXID = &H80040E34
Const DB_E_NOINDEX = &H80040E35
Const DB_E_INDEXINUSE = &H80040E36
Const DB_E_NOTABLE = &H80040E37
Const DB_E_CONCURRENCYVIOLATION = &H80040E38
Const DB_E_BADCOPY = &H80040E39
Const DB_E_BADPRECISION = &H80040E3A
Const DB_E_BADSCALE = &H80040E3B
Const DB_E_BADID = &H80040E3C
Const DB_E_BADTYPE = &H80040E3D
Const DB_E_DUPLICATECOLUMNID = &H80040E3E
Const DB_E_DUPLICATETABLEID = &H80040E3F
Const DB_E_TABLEINUSE = &H80040E40
Const DB_E_NOLOCALE = &H80040E41
Const DB_E_BADRECORDNUM = &H80040E42
Const DB_E_BOOKMARKSKIPPED = &H80040E43
Const DB_E_BADPROPERTYVALUE = &H80040E44
Const DB_E_INVALID = &H80040E45
Const DB_E_BADACCESSORFLAGS = &H80040E46
Const DB_E_BADSTORAGEFLAGS = &H80040E47
Const DB_E_BYREFACCESSORNOTSUPPORTED = &H80040E48
Const DB_E_NULLACCESSORNOTSUPPORTED = &H80040E49
Const DB_E_NOTPREPARED = &H80040E4A
Const DB_E_BADACCESSORTYPE = &H80040E4B
Const DB_E_WRITEONLYACCESSOR = &H80040E4C
Const DB_SEC_E_AUTH_FAILED = &H80040E4D
Const DB_E_CANCELED = &H80040E4E
Const DB_E_CHAPTERNOTRELEASED = &H80040E4F
Const DB_E_BADSOURCEHANDLE = &H80040E50
Const DB_E_PARAMUNAVAILABLE = &H80040E51
Const DB_E_ALREADYINITIALIZED = &H80040E52
Const DB_E_NOTSUPPORTED = &H80040E53
Const DB_E_MAXPENDCHANGESEXCEEDED = &H80040E54
Const DB_E_BADORDINAL = &H80040E55
Const DB_E_PENDINGCHANGES = &H80040E56
Const DB_E_DATAOVERFLOW = &H80040E57
Const DB_E_BADHRESULT = &H80040E58
Const DB_E_BADLOOKUPID = &H80040E59
Const DB_E_BADDYNAMICERRORID = &H80040E5A
Const DB_E_PENDINGINSERT = &H80040E5B
Const DB_E_BADCONVERTFLAG = &H80040E5C
Const DB_E_BADPARAMETERNAME = &H80040E5D
Const DB_E_MULTIPLESTORAGE = &H80040E5E
Const DB_S_ROWLIMITEXCEEDED = &H40EC0
Const DB_S_COLUMNTYPEMISMATCH = &H40EC1
Const DB_S_TYPEINFOOVERRIDDEN = &H40EC2
Const DB_S_BOOKMARKSKIPPED = &H40EC3
Const DB_S_ERRORSINTREE = &H40EC4
Const DB_S_NONEXTROWSET = &H40EC5
Const DB_S_ENDOFROWSET = &H40EC6
Const DB_S_COMMANDREEXECUTED = &H40EC7
Const DB_S_BUFFERFULL = &H40EC8
Const DB_S_NORESULT = &H40EC9
Const DB_S_CANTRELEASE = &H40ECA
Const DB_S_GOALCHANGED = &H40ECB
Const DB_S_DIALECTIGNORED = &H40ECD
Const DB_S_UNWANTEDPHASE = &H40ECE
Const DB_S_UNWANTEDREASON = &H40ECF
Const DB_S_COLUMNSCHANGED = &H40ED1
Const DB_S_ERRORSRETURNED = &H40ED2
Const DB_S_BADROWHANDLE = &H40ED3
Const DB_S_DELETEDROW = &H40ED4
Const DB_S_TOOMANYCHANGES = &H40ED5
Const DB_S_STOPLIMITREACHED = &H40ED6
Const DB_S_LOCKUPGRADED = &H40ED8
Const DB_S_PROPERTIESCHANGED = &H40ED9
Const DB_S_ERRORSOCCURRED = &H40EDA
Const DB_S_PARAMUNAVAILABLE = &H40EDB
Const DB_S_MULTIPLECHANGES = &H40EDC

Const E_FAIL = &H80004005