windows-nt/Source/XPSP1/NT/termsrv/admtools/appcmpt/chs/coffice7.cmd

@Echo Off

Rem
Rem  ע<><D7A2>:  <20><><EFBFBD><EFBFBD><EFBFBD>ű<EFBFBD><C5B1>е<EFBFBD> CACLS <20><><EFBFBD><EFBFBD>ֻ<EFBFBD><D6BB> NTFS 
Rem         <20><>ʽ<EFBFBD><CABD><EFBFBD>Ĵ<EFBFBD><C4B4>̷<EFBFBD><CCB7><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ч<EFBFBD><D0A7>
Rem

Rem #########################################################################

Rem
Rem  <20><><EFBFBD>û<EFBFBD><C3BB><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ļ<EFBFBD><C4BC><EFBFBD>ɾ<EFBFBD><C9BE> Corel Office 7 Ŀ¼<C4BF><C2BC>
Rem  <20><><EFBFBD>ȣ<EFBFBD>ǿ<EFBFBD><C7BF><EFBFBD>û<EFBFBD><C3BB>ص<EFBFBD>ִ<EFBFBD><D6B4>ģʽ<C4A3><CABD><EFBFBD>Ա<EFBFBD>֤<EFBFBD>ļ<EFBFBD><C4BC><EFBFBD>
Rem  us <20><><EFBFBD>Ը<EFBFBD><D4B8>Ƶ<EFBFBD><C6B5><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD><C3BB><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ļ<EFBFBD><C4BC><EFBFBD><EFBFBD><EFBFBD>
Rem

Rem  <20><><EFBFBD><EFBFBD>Ŀǰ<C4BF><C7B0><EFBFBD><EFBFBD>ִ<EFBFBD><D6B4>ģʽ<C4A3>У<EFBFBD><D0A3><EFBFBD><EFBFBD>ijɰ<C4B3>װģʽ<C4A3><CABD>

ChgUsr /query > Nul:
if ErrorLevel 101 Goto Begin1
Set __OrigMode=Install
Change User /Execute > Nul:
:Begin1


Rem <20><><EFBFBD><EFBFBD>ԭʼģʽ<C4A3>ǰ<EFBFBD>װ<EFBFBD><D7B0><EFBFBD><EFBFBD><EFBFBD>Ļذ<C4BB>װģʽ<C4A3><CABD>
If "%__OrigMode%" == "Install" Change User /Install > Nul:
Set __OrigMode=


Rem #########################################################################

Rem
Rem <20><><EFBFBD><EFBFBD>֤ %RootDrive% <20>Ѿ<EFBFBD><D1BE><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ã<EFBFBD><C3A3><EFBFBD>Ϊ<EFBFBD><CEAA><EFBFBD><EFBFBD><EFBFBD>ű<EFBFBD><C5B1><EFBFBD><EFBFBD>øñ<C3B8><C3B1><EFBFBD><EFBFBD><EFBFBD>
Rem

Call "%SystemRoot%\Application Compatibility Scripts\ChkRoot.Cmd"
If "%_CHKROOT%" == "FAIL" Goto Done
Call "%SystemRoot%\Application Compatibility Scripts\SetPaths.Cmd"
If "%_SETPATHS%" == "FAIL" Goto Done

Rem #########################################################################

Rmdir "%USER_START_MENU%\Corel Office 7" /Q >Nul: 2>&1


Rem
Rem  ָ<><D6B8><EFBFBD>û<EFBFBD><C3BB>޸<EFBFBD> key <20>ļ<EFBFBD><C4BC><EFBFBD>
Rem


if "%RootDrive%"=="w:" goto PostDriveChange
if "%RootDrive%"=="W:" goto PostDriveChange

Echo   <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> coffice7.key <20>ļ<EFBFBD><C4BC><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ŀ¼<C4BF><C2BC>
Echo.
Echo   <20><>ִ<EFBFBD><D6B4><EFBFBD><EFBFBD><EFBFBD>в<EFBFBD><D0B2><EFBFBD>:
Echo     1) <20><><EFBFBD><EFBFBD><EFBFBD>±<EFBFBD><C2B1><EFBFBD><EFBFBD>в<EFBFBD><D0B2><EFBFBD><EFBFBD><EFBFBD>Ŀ¼<C4BF><C2BC> ASCII ֵ<><D6B5>
Echo        <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ŀ¼<C4BF><C2BC> %RootDrive%
Echo.
Echo        A = 61   E = 65   I = 69   M = 6D   Q = 71   U = 75   Y = 79
Echo        B = 62   F = 66   J = 6A   N = 6E   R = 72   V = 76   Z = 7A
Echo        C = 63   G = 67   K = 6B   O = 6F   S = 73   W = 77   
Echo        D = 64   H = 68   L = 6C   P = 70   T = 74   X = 78
Echo.
Echo     2) <20><><EFBFBD>á<EFBFBD><C3A1><EFBFBD><EFBFBD>±<EFBFBD><C2B1><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ڲ<EFBFBD><DAB2><EFBFBD> 1 <20><><EFBFBD>ҵ<EFBFBD><D2B5><EFBFBD>ֵ 
Echo        <20>滻<EFBFBD><E6BBBB><EFBFBD>е<EFBFBD> 77<37><37>
Echo        ע<><D7A2>: <20><>ȷ<EFBFBD><C8B7><EFBFBD><EFBFBD><EFBFBD>滻<EFBFBD><E6BBBB><EFBFBD><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD><C3BB><EFBFBD><EFBFBD><EFBFBD>Ӷ<EFBFBD><D3B6><EFBFBD><EFBFBD>Ŀո<C4BF><D5B8><EFBFBD>
Echo     3) <20><><EFBFBD><EFBFBD><EFBFBD>ļ<EFBFBD><C4BC><EFBFBD><EFBFBD>˳<EFBFBD><CBB3><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ű<EFBFBD><C5B1><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
Echo.
Pause

NotePad "%SystemRoot%\Application Compatibility Scripts\Install\coffice7.key"

:PostDriveChange


Rem <20><><EFBFBD><EFBFBD>Ŀǰ<C4BF><C7B0><EFBFBD>ڰ<EFBFBD>װģʽ<C4A3>У<EFBFBD><D0A3><EFBFBD><EFBFBD>ijɰ<C4B3>װģʽ<C4A3><CABD>
Set __OrigMode=Install
ChgUsr /query > Nul:
if Not ErrorLevel 101 Goto Begin2
Set __OrigMode=Exec
Change User /Install > Nul:
:Begin2

regini COffice7.key > Nul:

Rem <20><><EFBFBD><EFBFBD>ԭʼģʽ<C4A3><CABD>ִ<EFBFBD>У<EFBFBD><D0A3><EFBFBD><EFBFBD>Ļ<EFBFBD>ִ<EFBFBD><D6B4>ģʽ<C4A3><CABD>
If "%__OrigMode%" == "Exec" Change User /Execute > Nul:
Set __OrigMode=


Rem #########################################################################

Rem
Rem <20>޸ĵ<DEB8>¼<EFBFBD>ű<EFBFBD><C5B1><EFBFBD><EFBFBD>Ա<EFBFBD><D4B1>Ӱ<EFBFBD>װλ<D7B0>ø<EFBFBD><C3B8><EFBFBD> iBase <20><><EFBFBD>ݿ⡣
Rem




..\ACRegL %Temp%\COffice7.Cmd COffice7Loc "HKLM\Software\PerfectOffice\Products\InfoCentral\7" "ExeLocation" "StripChar\2"

If ErrorLevel 1 Goto InstallError

Call %Temp%\COffice7.Cmd 
Del %Temp%\COffice7.Cmd >Nul: 2>&1


..\ACIniUpd /e "%COffice7Loc%\ICWin7\Local\Wpic.ini" Preferences Last_IBase "%RootDrive%\Personal\iBases\Personal\Personal"
If ErrorLevel 1 Goto InstallError


..\acsr "#COFFICE7INST#" "%COffice7Loc%\\" ..\Logon\Template\cofc7usr.Cmd ..\Logon\cofc7usr.Cmd
If ErrorLevel 1 Goto InstallError

goto PostInstallError
:InstallError

Echo.
Echo <20>޷<EFBFBD><DEB7><EFBFBD>ע<EFBFBD><D7A2><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> Corel Office 7 <20><>װλ<D7B0>á<EFBFBD>
Echo <20><><EFBFBD><EFBFBD>֤ Corel Office 7 <20>Ƿ<EFBFBD><C7B7>Ѿ<EFBFBD><D1BE><EFBFBD>װ<EFBFBD><D7B0><EFBFBD>ٴ<EFBFBD><D9B4><EFBFBD><EFBFBD><EFBFBD>
Echo <20><><EFBFBD><EFBFBD><EFBFBD>ű<EFBFBD><C5B1><EFBFBD>
Echo.
Pause
Goto Done

:PostInstallError

Rem #########################################################################

Rem 
Rem  <20><> WordPerfect ģ<><C4A3><EFBFBD><EFBFBD>Ϊֻ<CEAA><D6BB><EFBFBD><EFBFBD>
Rem  <20>⽫ǿ<E2BDAB><C7BF><EFBFBD>û<EFBFBD><C3BB>ڽ<EFBFBD><DABD>и<EFBFBD><D0B8><EFBFBD>֮ǰ<D6AE>ȸ<EFBFBD><C8B8>ơ<EFBFBD>
Rem  <20><>һ<EFBFBD><D2BB><EFBFBD>취<EFBFBD>ǣ<EFBFBD><C7A3><EFBFBD>ÿ<EFBFBD><C3BF><EFBFBD>û<EFBFBD>һ<EFBFBD><D2BB>
Rem  ר<><D7A8>ģ<EFBFBD><C4A3>Ŀ¼<C4BF><C2BC>
Rem

attrib +r %COffice7Loc%\Template\*wpt /s >Nul: 2>&1

Rem #########################################################################

Rem
Rem <20><> COfc7Usr.Cmd <20><><EFBFBD>ӵ<EFBFBD> UsrLogn2.Cmd <20>ű<EFBFBD>
Rem

FindStr /I COfc7Usr %SystemRoot%\System32\UsrLogn2.Cmd >Nul: 2>&1
If Not ErrorLevel 1 Goto Skip1
Echo Call COfc7Usr.Cmd >> %SystemRoot%\System32\UsrLogn2.Cmd
:Skip1

Rem #########################################################################


Rem
Rem  <20><><EFBFBD><EFBFBD> "Personal" Ŀ¼<C4BF><C2BC><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ڣ<EFBFBD><DAA3><EFBFBD><EFBFBD><EFBFBD><EFBFBD>䴴<EFBFBD><E4B4B4> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> 
Rem  <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ִ<EFBFBD>У<EFBFBD>ԭ<EFBFBD><D4AD><EFBFBD>ǹ<EFBFBD><C7B9><EFBFBD>Ա<EFBFBD><D4B1>Ҫ<EFBFBD>ֶ<EFBFBD>ִ<EFBFBD><D6B4><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
Rem  <20><>ʾ<EFBFBD><CABE>һ<EFBFBD><D2BB><EFBFBD><EFBFBD><EFBFBD>衣
Rem  

If Not Exist "%RootDrive%\Personal" Md "%RootDrive%\Personal"

Rem #########################################################################

cls
Echo.
Echo   <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Щ<EFBFBD><D0A9><EFBFBD><EFBFBD><EFBFBD>ֶ<EFBFBD><D6B6><EFBFBD><EFBFBD><EFBFBD> Quattro Pro
Echo   Ĭ<><C4AC>Ŀ¼:
Echo     1) <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>д<EFBFBD><D0B4><EFBFBD><EFBFBD><EFBFBD> 'change user /install'<27><>
Echo     2) <20><><EFBFBD><EFBFBD> Quattro Pro<72><6F>
Echo     3) ѡ<>񡰱༭<F1A1B0B1><E0BCAD>ѡ<EFBFBD><EFBFBD>˵<EFBFBD><CBB5><EFBFBD>Ŀ<EFBFBD><C4BF>
Echo     4) <20><><EFBFBD><EFBFBD><EFBFBD>ļ<EFBFBD>ѡ<EFBFBD>ѡ<EEA1B1><EFBFBD><EEBFA8>
Echo     5) <20><>Ŀ¼<C4BF>ij<EFBFBD> %RootDrive%\Personal<61><6C>
Echo     6) <20>˳<EFBFBD><CBB3><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
Echo     7) <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>д<EFBFBD><D0B4><EFBFBD><EFBFBD><EFBFBD> 'change user /execute'<27><>
Echo.
pause

Echo.
Echo   Ҫ<><D2AA>֤ Corel Office 7 <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>У<EFBFBD><D0A3><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>κ<EFBFBD>
Echo   Ӧ<>ó<EFBFBD><C3B3><EFBFBD>֮ǰ<D6AE><C7B0>Ŀǰ<C4BF><C7B0>¼<EFBFBD><C2BC><EFBFBD>û<EFBFBD><C3BB><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ע<EFBFBD><D7A2><EFBFBD><EFBFBD>
Echo   <20><><EFBFBD><EFBFBD><EFBFBD>µ<EFBFBD>¼<EFBFBD><C2BC>
Echo.
Echo Corel Office 7 <20><><EFBFBD>û<EFBFBD>Ӧ<EFBFBD>ó<EFBFBD><C3B3><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ѽ<EFBFBD><D1BD><EFBFBD>
Pause

:Done