windows-nt/Source/XPSP1/NT/termsrv/admtools/appcmpt/cht/cofc8usr.cmd
2020-09-26 16:20:57 +08:00

58 lines
1.5 KiB
Batchfile

Rem
Rem 如果使用者尚未執行節點安裝程式,
Rem 請立即執行它。
Rem
If Exist "%RootDrive%\Corel" Goto Skip1
Rem 互動式安裝
Rem 用 Corel 網路檔案所在磁碟來取代 #WPSINST#。
If Not Exist "#WPSINST#\Suite8\Corel WordPerfect Suite 8 Setup.lnk" Goto cont2
#WPSINST#\Suite8\#WPSINSTCMD#
Goto skip0
:cont2
..\End.cmd
:Skip0
Cls
Echo Corel 安裝程式完成後,請按任意鍵繼續...
Pause > NUL:
:Skip1
Rem
Rem 每個人都會有它自己的 DOD.So 複本。刪除 All Users 現存的 DOD.So。
Rem
If Not Exist "%COMMON_START_MENU%\Corel WordPerfect Suite 8" Goto Skip2
If Exist "%USER_START_MENU%\Corel WordPerfect Suite 8" Goto Cont1
Move "%COMMON_START_MENU%\Corel WordPerfect Suite 8" "%USER_START_MENU%\Corel WordPerfect Suite 8" > NUL: 2>&1
Goto Skip2
:Cont1
Rd /S /Q "%COMMON_START_MENU%\Corel WordPerfect Suite 8"
:Skip2
If Not Exist "%COMMON_STARTUP%\Corel Desktop Application Director 8.LNK" Goto Skip3
If Exist "%USER_STARTUP%\Corel Desktop Application Director 8.LNK" Goto Cont2
Move "%COMMON_STARTUP%\Corel Desktop Application Director 8.LNK" "%USER_STARTUP%\" > NUL: 2>&1
Goto Skip3
:Cont2
Del /F /Q "%COMMON_STARTUP%\Corel Desktop Application Director 8.LNK"
:Skip3
If Not Exist "%RootDrive%\Windows\Twain_32\Corel" Goto Skip4
Rd /S /Q "%RootDrive%\Windows\Twain_32\Corel"
:Skip4
If Not Exist "%RootDrive%\Corel\Suite8\PhotoHse\PhotoHse.ini" Goto Skip5
..\Aciniupd /e "%RootDrive%\Corel\Suite8\PhotoHse\PhotoHse.ini" "Open File Dialog" "Initial Dir" "%RootDrive%\MyFiles"
:Skip5