Leaked source code of windows server 2003
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

156 lines
5.3 KiB

  1. @Echo off
  2. Cls
  3. Rem
  4. Echo Install script for the Corel WordPerfect Suite 8 for the Administrator.
  5. Echo.
  6. Echo Net Setup is when you invoke netsetup.exe from the netadmin folder.
  7. Echo Node Setup is when you login the first time after the net setup.
  8. Echo **This script needs to be run after the net setup and again **
  9. Echo **after the node setup.** (Very critical! Only for Admin)
  10. Echo.
  11. Echo Press any key to continue...
  12. Pause > Nul:
  13. cls
  14. Echo.
  15. Echo Corel WordPerfect Suite 8 should be installed using Netsetup.exe.
  16. Echo.
  17. Echo If you did NOT run Netsetup.exe then exit now (Press Ctrl-c)
  18. Echo AND perform the following steps to repeat the installation.
  19. Echo Uninstall the WordPerfect Suite 8 from the Control Panel
  20. Echo Go to Control Panel and click Add/Remove Program
  21. Echo Choose Netsetup.exe under NetAdmin directory in Corel 8 CD-ROM
  22. Echo Finish the Net Setup for Corel WordPerfect Suite 8
  23. Echo.
  24. Echo Otherwise, press any key to continue...
  25. Pause > NUL:
  26. Echo.
  27. Echo If Corel WordPerfect Suite network files were not installed into
  28. Echo "D:\Corel", the Administrator needs to edit the file Cofc8ins.cmd
  29. Echo and replace the "D:\Corel" with the directory where the
  30. Echo files were installed.
  31. Echo.
  32. Echo Press any key to start updating Cofc8ins.cmd ...
  33. Pause > NUL:
  34. Notepad Cofc8ins.cmd
  35. Echo.
  36. Pause
  37. Call Cofc8ins.cmd
  38. Call "%SystemRoot%\Application Compatibility Scripts\ChkRoot.Cmd"
  39. If "%_CHKROOT%" == "FAIL" Goto Done
  40. Call "%SystemRoot%\Application Compatibility Scripts\SetPaths.Cmd"
  41. If "%_SETPATHS%" == "FAIL" Goto Done
  42. ..\acsr "#WPSINST#" "%WPSINST%" Template\Coffice8.key Coffice8.key
  43. ..\acsr "#WPSINST#" "%WPSINST%" ..\Logon\Template\Cofc8usr.cmd %temp%\Cofc8usr.tmp
  44. ..\acsr "#WPSINSTCMD#" "%WPSINST%\Suite8\Corel WordPerfect Suite 8 Setup.lnk" %temp%\Cofc8usr.tmp ..\Logon\Cofc8usr.cmd
  45. Del %temp%\Cofc8usr.tmp >Nul: 2>&1
  46. FindStr /I Cofc8Usr %SystemRoot%\System32\UsrLogn2.Cmd >Nul: 2>&1
  47. If Not ErrorLevel 1 Goto Skip0
  48. Echo Call Cofc8Usr.Cmd >> %SystemRoot%\System32\UsrLogn2.Cmd
  49. :Skip0
  50. Echo Critical: Have you started Node setup yet?
  51. Echo Critical: If you have just completed Net setup then you should
  52. Echo Critical: now start Node setup.
  53. Echo Critical: Follow these steps to start Node setup:
  54. Echo Critical: 1. Press Control-C to end this script
  55. Echo Critical: 2. Logoff and Logon as Admin
  56. Echo Critical: 3. From Add\Remove programs use the browse feature (or
  57. Echo Critical: within change user /install mode) to launch the
  58. Echo Critical: \corel\Suite 8\Corel WordPerfect Suite 8 Setup shortcut
  59. Echo Critical: 4. During setup, for Choose Destination select %RootDrive%
  60. Echo Critical: 5. Run this script again after Node Setup finishes
  61. Rem This script should be run after the Administrator finishes the
  62. Rem Corel WordPerfect Suite 8 Node Setup.
  63. Rem.
  64. Rem If the Administrator has not finished the Node Setup, press Ctrl-C
  65. Rem to quit the script and log off. Log on again as Administrator, perform
  66. Rem the Corel WordPerfect Suite Node setup and install the applications
  67. Rem to user's home directory: %RootDrive%.
  68. Rem.
  69. Echo Otherwise, press any key to continue...
  70. Pause > NUL:
  71. If Not Exist "%COMMON_START_MENU%\Corel WordPerfect Suite 8" Goto skip1
  72. Move "%COMMON_START_MENU%\Corel WordPerfect Suite 8" "%USER_START_MENU%\" > NUL: 2>&1
  73. :skip1
  74. If Not Exist "%COMMON_STARTUP%\Corel Desktop Application Director 8.LNK" Goto skip2
  75. Move "%COMMON_STARTUP%\Corel Desktop Application Director 8.LNK" "%USER_STARTUP%\" > NUL: 2>&1
  76. :skip2
  77. Rem If not currently in Install Mode, change to Install Mode.
  78. Set __OrigMode=Install
  79. ChgUsr /query > Nul:
  80. if Not ErrorLevel 101 Goto Begin
  81. Set __OrigMode=Exec
  82. Change User /Install > Nul:
  83. :Begin
  84. regini COffice8.key > Nul:
  85. Rem If original mode was execute, change back to Execute Mode.
  86. If "%__OrigMode%" == "Exec" Change User /Execute > Nul:
  87. Set __OrigMode=
  88. Rem Delete the files in IDAPI folder.
  89. Rem The CACLS commands in this script are only effective on NTFS format partitions.
  90. Cacls "%UserProfile%\Corel\Suite8\Shared\Idapi\idapi.cfg" /E /T /G "Authenticated Users":C > Nul: 2>&1
  91. Move "%UserProfile%\Corel\Suite8\Shared\Idapi\idapi.cfg" "%WPSINST%\Suite8\Shared\Idapi\" > NUL: 2>&1
  92. Del /F /Q "%UserProfile%\Corel\Suite8\Shared\Idapi"
  93. Echo Corel WordPerfect Suite 8 multi-user Application tuning has completed.
  94. Echo.
  95. Echo Administrator can generate Node Setup Response file to control the setup
  96. Echo configuration. For detailed information, read the online document or visit
  97. Echo Corel Web site.
  98. Echo http://www.corel.com/support/netadmin/admin8/Installing_to_a_client.htm
  99. Echo.
  100. Rem
  101. Rem Get the permission compatibility mode from the registry.
  102. Rem If TSUserEnabled is 0 we need to warn user to change mode.
  103. Rem
  104. ..\ACRegL "%Temp%\tsuser.Cmd" TSUSERENABLED "HKLM\System\CurrentControlSet\Control\Terminal Server" "TSUserEnabled" ""
  105. If Exist "%Temp%\tsuser.Cmd" (
  106. Call "%Temp%\tsuser.Cmd"
  107. Del "%Temp%\tsuser.Cmd" >Nul: 2>&1
  108. )
  109. If NOT %TSUSERENABLED%==0 goto SkipWarning
  110. Echo.
  111. Echo IMPORTANT!
  112. Echo Terminal Server is currently running in Default Security mode.
  113. Echo This application requires the system to run in Relaxed Security mode
  114. Echo (permissions compatible with Terminal Server 4.0).
  115. Echo Use Terminal Services Configuration to view and change the Terminal
  116. Echo Server security mode.
  117. Echo.
  118. :SkipWarning
  119. Pause
  120. :Done