publicmodule.bas

運動會或各式活動秩序冊製作及檢錄表製作管理系統

Attribute VB_Name = "PublicModule"
Option Explicit


Public Const SDRole As String = "eMindSystemRole"
Public Const ADRole As String = "Admins"
Public Const FixKey As String = "A0000000"
Public Const DBName As String = "eMind"
Public Const RegName As String = "eMind"
Public Const MaxFieldLength As Integer = 900

Public gLastError As String
Public gAccount As String
Public gPassword As String
Public gSkipSql As Boolean

Public Const typDoc As String = "1"
Public Const typFod As String = "3"
Public Const typFid As String = "5"
Public Const typDid As String = "7"
Public Const typAid As String = "9"
Public Const typFix As String = "戈