constants.asp

This file contains ActiveX Data Objects (ADO) constants from the Microsoft ADOVBS.INC file, plus some constants associated with the FileSystemObject, plus the ADO connection string we use to attach to our database (SQL Server in this instance).  Finally, we create a constants for our WebGantt^© registration key.

<% '---- CursorTypeEnum Values ----
   Const adOpenForwardOnly = 0
   Const adOpenKeyset = 1
   Const adOpenDynamic = 2
   Const adOpenStatic = 3
   '---- LockTypeEnum Values ----
   Const adLockReadOnly = 1
   Const adLockPessimistic = 2
   Const adLockOptimistic = 3
   Const adLockBatchOptimistic = 4
   '---- CommandTypeEnum Values ----
   Const adCmdText = 1
   Const adCmdTable = 2
   Const adCmdStoredProc = 4
   '---- CursorLocationEnum Values ----
   Const adUseServer = 2
   Const adUseClient = 3
  
   '---- FileSystemObject IoMode Values ----
   Const ForReading = 1
   Const ForWriting = 2
   Const ForAppending = 8
  
   Dim connString
   connString = "Provider=sqloledb.1;Data Source=my.dbserver.com;" & _
                "Initial Catalog=mydatabase;User ID=dbUser;Password=abcdefg123"
  
   Const MY_WEBGANTT_KEY = "111-ABC-222"
%>