home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 6 / 06.iso / a / a563 / 3.ddi / WORKGRP.IN_ < prev   
Encoding:
INI File  |  1993-05-26  |  1.9 KB  |  75 lines
  1. [WorkGroup Path Dialog]
  2.     GetPathMessBoxTitle = $(AppName)" Specify WorkGroup"
  3.     GetPathMessBoxText  = "The string you have entered is not a fully-qualified and/or valid DOS pathname"
  4.     GetNameBoxText  = "You need to fill up all of the entries."
  5.     GetSysMdaErr = "Couldn't find SYSTEM.MDA on the specified path."
  6.     SYSMDAFILE = "system.mda"
  7.     CODEPAGE = "04E4"
  8.     LANGUAGE = "0409"            ; windows language code, need to be localized
  9.  
  10.  
  11. [System Paths]
  12.      WINDOWSPATH     =  "" ? DETCMD.DLL GetWindowsDir
  13.  
  14. [Shell Commands]
  15.     set    Title = "Microsoft Access Change Workgroup"
  16.     set-title       $(Title)        
  17.     ui start LanManNetWork
  18.  
  19.     ifstr $(STF_MODE) != "WORKGRP"
  20.         exit
  21.     endif
  22.  
  23.     read-syms "Custom"
  24.      detect          "System Paths"
  25.     set CIRPATH = $(STF_SRCDIR)
  26.     read-syms "WorkGroup Path Dialog"
  27.  
  28. MainDlg = +
  29.     ui start "ChangeWorkGrp"
  30.  
  31.     ifstr $(DLGEVENT) == "BACK"
  32.         ui start "GetWorkgrpString"
  33.         set EditTextIn = $(SYSMDAPATH)
  34.         ui start "ChangeWorkGrpPath"
  35.         ifstr $(DLGEVENT) == "EXIT"
  36.             ui pop 1
  37.             goto "MainDlg"
  38.         endif
  39.         ui pop 1
  40.         set SYSMDAPATH = $(EditPathOut)
  41.         set SYSMDAPATH2 = $(EditTextOut)  ;possible UNC
  42.     else-ifstr $(DLGEVENT) == "EXIT"
  43.         exit
  44.     else
  45.         ui start "GetNameOrgPin"
  46.         ifstr $(DLGEVENT) == "EXIT"
  47.             ui pop 1
  48.             goto "MainDlg"
  49.         endif
  50.         ui pop 1
  51.         ui start "CREATEDB"
  52.     endif
  53.     ui pop 1
  54.     install "Update INIs"
  55.     exit
  56.  
  57. [Update INIs]
  58.     RemoveIniKey, $(WINDOWSPATH)"MSACCESS.INI", "Options", "SystemDB"
  59.     CreateIniKeyValue, $(WINDOWSPATH)"MSACCESS.INI", "Options", "SystemDB", $(SYSMDAPATH2)$(SYSMDAFILE), O
  60.     Exit
  61.  
  62. [Custom]
  63.     IniFileName = "msaccess.ini"
  64.  
  65. [Source Media Descriptions]
  66.     0 = "Delete Old Files", TAGFILE = "msajt100.dll"
  67.     1 = "Disk 1 - Setup", TAGFILE = "1.wmf"
  68.     2 = "Disk 2", TAGFILE = "2.wmf"
  69.     3 = "Disk 3", TAGFILE = "3.wmf"
  70.     4 = "Disk 4", TAGFILE = "4.wmf"
  71.     5 = "Disk 5", TAGFILE = "5.wmf"
  72.     6 = "Disk 6", TAGFILE = "6.wmf"
  73.     7 = "ODBC Disk", TAGFILE = "7.wmf"
  74.  
  75.