home *** CD-ROM | disk | FTP | other *** search
INI File | 1993-01-03 | 1.4 KB | 52 lines |
- [WorkGroup Path Dialog]
- GetPathMessBoxTitle = $(AppName)" Specify WorkGroup"
- GetPathMessBoxText = "The string you have entered is not a fully-qualified and/or valid DOS pathname"
- GetSysMdaErr = "Couldn't find SYSTEM.MDA on the specified path."
- SYSMDAFILE = "system.mda"
-
- [System Paths]
- WINDOWSPATH = "" ? DETCMD.DLL GetWindowsDir
-
- [Shell Commands]
- set Title = "Microsoft Access Change Workgroup"
- set-title $(Title)
- ui start LanManNetWork
-
- ifstr $(STF_MODE) != "WORKGRP"
- exit
- endif
-
- detect "System Paths"
- ui start "GetWorkgrpString"
- set EditTextIn = $(SYSMDAPATH)
-
- set CIRPATH = $(STF_SRCDIR)
- read-syms "WorkGroup Path Dialog"
- ui start "ChangeWorkGrp"
-
- ifstr $(DLGEVENT) == "BACK"
- exit
- else-ifstr $(DLGEVENT) == "EXIT"
- exit
- else
- set SYSMDAPATH = $(EditPathOut)
- set SYSMDAPATH2 = $(EditTextOut) ;possible UNC
- endif
- ui pop 1
- install "Update INIs"
- exit
-
- [Update INIs]
- RemoveIniKey, $(WINDOWSPATH)"MSACCESS.INI", "Options", "SystemDB"
- CreateIniKeyValue, $(WINDOWSPATH)"MSACCESS.INI", "Options", "SystemDB", $(SYSMDAPATH2)$(SYSMDAFILE), O
- Exit
-
-
- [Source Media Descriptions]
- 1 = "Disk 1 - Setup", TAGFILE = "1.wmf"
- 2 = "Disk 2", TAGFILE = "2.wmf"
- 3 = "Disk 3", TAGFILE = "3.wmf"
- 4 = "Disk 4", TAGFILE = "4.wmf"
- 5 = "Disk 5", TAGFILE = "5.wmf"
- 6 = "Disk 6", TAGFILE = "6.wmf"
-