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

@Echo Off

Cls

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

Echo.
Echo <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ű<EFBFBD>֮ǰ<D6AE><C7B0><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ԱӦ<D4B1>ý<EFBFBD> Access <20><><EFBFBD><EFBFBD>Ŀ¼
Echo <20>ij<EFBFBD><C4B3>û<EFBFBD><C3BB><EFBFBD> Office ר<><D7A8>Ŀ¼<C4BF><C2BC>
Echo.
Echo һ<><D2BB><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>밴<EFBFBD><EBB0B4><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
Echo.
Echo <20><><EFBFBD>򣬹<EFBFBD><F2A3ACB9><EFBFBD>ԱӦ<D4B1><D3A6>ִ<EFBFBD><D6B4><EFBFBD><EFBFBD><EFBFBD>в<EFBFBD><D0B2><EFBFBD>s:
Echo     <20><><EFBFBD><EFBFBD> MS Access <20><><EFBFBD>ӡ<EFBFBD><D3A1>鿴<EFBFBD><E9BFB4><EFBFBD>˵<EFBFBD>ѡ<EFBFBD><D1A1><EFBFBD><EFBFBD>ѡ<EFBFBD>
Echo     <20><><EFBFBD><EFBFBD>Ĭ<EFBFBD><C4AC><EFBFBD><EFBFBD><EFBFBD>ݿ<EFBFBD>Ŀ¼<C4BF><C2BC><EFBFBD>ij<EFBFBD> "%RootDrive%\OFFICE43"
Echo     <20>˳<EFBFBD> MS Access
Echo.
Echo ע<><D7A2>: <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ҫ<EFBFBD><D2AA><EFBFBD><EFBFBD><EFBFBD>µ<EFBFBD><C2B5><EFBFBD><EFBFBD>ݿ<EFBFBD><DDBF><EFBFBD><EFBFBD>ܿ<EFBFBD><DCBF><EFBFBD><EFBFBD><EFBFBD><EFBFBD>鿴<EFBFBD><E9BFB4><EFBFBD>˵<EFBFBD><CBB5><EFBFBD>
Echo.
Echo <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Щ<EFBFBD><D0A9><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>밴<EFBFBD><EBB0B4><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>...

Pause > NUL:

Echo.
Echo <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> MS Office 4.3 <20><>װ<EFBFBD><D7B0><EFBFBD><EFBFBD>Ŀ¼<C4BF><C2BC><EFBFBD><EFBFBD> "%SystemDrive%\MSOFFICE"<EFBFBD><EFBFBD> 
Echo <20><><EFBFBD><EFBFBD>Ҫ<EFBFBD><D2AA><EFBFBD><EFBFBD> Ofc43ins.cmd<6D><64>
Echo.
Echo <20>밴<EFBFBD><EBB0B4><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʼ<EFBFBD><CABC><EFBFBD><EFBFBD> Ofc43ins.cmd ...
Echo.
Pause > NUL:
Notepad Ofc43ins.cmd
Pause

Call ofc43ins.cmd

..\acsr "#OFC43INST#" "%OFC43INST%" ..\Logon\Template\ofc43usr.cmd ..\Logon\ofc43usr.cmd
..\acsr "#SYSTEMROOT#" "%SystemRoot%" ..\Logon\Template\ofc43usr.key ..\Logon\Template\ofc43usr.bak
..\acsr "#OFC43INST#" "%OFC43INST%" ..\Logon\Template\ofc43usr.bak ..\Logon\ofc43usr.key
Del /F /Q ..\Logon\Template\ofc43usr.bak

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 <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 Begin
Set __OrigMode=Exec
Change User /Install > Nul:
:Begin

regini Office43.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 <20><><EFBFBD><EFBFBD> Office 4.3 <20><> INI <20>ļ<EFBFBD>
Rem

Rem <20><> Office <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> Excel ʱ<><CAB1><EFBFBD><EFBFBD> msoffice.ini <20><> 
Rem Ϊ<><CEAA><EFBFBD><EFBFBD><EFBFBD>ù<EFBFBD><C3B9><EFBFBD>Ŀ¼<C4BF><C2BC>Office <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ı<EFBFBD>׼<EFBFBD><D7BC><EFBFBD>ý<EFBFBD> Excel 
Rem <20><><EFBFBD>ڵڶ<DAB5>λ<EFBFBD><CEBB><EFBFBD><EFBFBD> Word <20><><EFBFBD>档<EFBFBD><E6A1A3><EFBFBD><EFBFBD> msoffice.ini <20>в<EFBFBD><D0B2><EFBFBD><EFBFBD>ڣ<EFBFBD> 
Rem <20><><EFBFBD><EFBFBD> %SystemRoot% <20>´<EFBFBD><C2B4><EFBFBD>

..\Aciniupd /e "Msoffice.ini" "ToolbarOrder" "MSApp1" "1,1,"
..\Aciniupd /e "Msoffice.ini" "ToolbarOrder" "MSApp2" "2,1,,%RootDrive%\office43"

..\Aciniupd /e "Word6.ini" "Microsoft Word" USER-DOT-PATH "%RootDrive%\OFFICE43\WINWORD"
..\Aciniupd /e "Word6.ini" "Microsoft Word" WORKGROUP-DOT-PATH "%OFC43INST%\WINWORD\TEMPLATE"
..\Aciniupd /e "Word6.ini" "Microsoft Word" INI-PATH "%RootDrive%\OFFICE43\WINWORD"
..\Aciniupd /e "Word6.ini" "Microsoft Word" DOC-PATH "%RootDrive%\OFFICE43"
..\Aciniupd /e "Word6.ini" "Microsoft Word" AUTOSAVE-PATH "%RootDrive%\OFFICE43"

..\Aciniupd /e "Excel5.ini" "Microsoft Excel" DefaultPath "%RootDrive%\OFFICE43"
..\Aciniupd /e "Excel5.ini" "Spell Checker" "Custom Dict 1" "%RootDrive%\OFFICE43\Custom.dic"

..\Aciniupd /k "Msacc20.ini" Libraries "WZTABLE.MDA" "%RootDrive%\OFFICE43\ACCESS\WZTABLE.MDA"
..\Aciniupd /k "Msacc20.ini" Libraries "WZLIB.MDA" "%RootDrive%\OFFICE43\ACCESS\WZLIB.MDA"
..\Aciniupd /k "Msacc20.ini" Libraries "WZBLDR.MDA" "%RootDrive%\OFFICE43\ACCESS\WZBLDR.MDA"
..\Aciniupd /e "Msacc20.ini" Options "SystemDB" "%RootDrive%\OFFICE43\ACCESS\System.MDA"

Rem
Rem <20><><EFBFBD><EFBFBD> WIN.INI
Rem

..\Aciniupd /e "Win.ini" "MS Proofing Tools" "Custom Dict 1" "%RootDrive%\OFFICE43\Custom.dic"

Rem
Rem <20><><EFBFBD><EFBFBD> Artgalry <20>ļ<EFBFBD><C4BC>е<EFBFBD>Ȩ<EFBFBD><C8A8>
Rem

cacls "%SystemRoot%\Msapps\Artgalry" /E /G "Terminal Server User":F > NUL: 2>&1

Rem
Rem <20><><EFBFBD><EFBFBD> MSQuery <20>ļ<EFBFBD><C4BC>е<EFBFBD>Ȩ<EFBFBD><C8A8>
Rem

cacls "%SystemRoot%\Msapps\MSQUERY" /E /G "Terminal Server User":C > NUL: 2>&1

Rem
Rem <20><>Ϊ<EFBFBD><CEAA><EFBFBD><EFBFBD>Ա<EFBFBD><D4B1> Msacc20.ini <20>Ǿɵģ<C9B5><C4A3><EFBFBD><EFBFBD>临<EFBFBD>Ƶ<EFBFBD><C6B5><EFBFBD><EFBFBD><EFBFBD>Ա<EFBFBD><D4B1> Windows Ŀ¼<C4BF><C2BC>
Rem

Copy "%SystemRoot%\Msacc20.ini" "%UserProfile%\Windows\" > NUL: 2>&1

Rem <20><><EFBFBD><EFBFBD>һ<EFBFBD><D2BB>α<EFBFBD>ļ<EFBFBD><C4BC><EFBFBD><EFBFBD>Ա㰲װ<E3B0B2><D7B0><EFBFBD><EFBFBD><EFBFBD>޷<EFBFBD><DEB7><EFBFBD><EFBFBD><EFBFBD>ע<EFBFBD><D7A2><EFBFBD><EFBFBD><EFBFBD>

Copy NUL: "%UserProfile%\Windows\Ofc43usr.dmy" > NUL: 2>&1
attrib +h "%UserProfile%\Windows\Ofc43usr.dmy" > NUL: 2>&1

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

Echo.
Echo Ҫʹ<D2AA>Ķ<EFBFBD><C4B6><EFBFBD>Ч<EFBFBD><D0A7><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ԱӦ<D4B1><D3A6><EFBFBD><EFBFBD>ע<EFBFBD><D7A2><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>µ<EFBFBD>¼<EFBFBD><C2BC>
Echo   <20><>¼<EFBFBD>󣬹<EFBFBD><F3A3ACB9><EFBFBD>Ա<EFBFBD><D4B1>Ӧ<EFBFBD><D3A6>ִ<EFBFBD><D6B4><EFBFBD><EFBFBD><EFBFBD>в<EFBFBD><D0B2><EFBFBD><EFBFBD><EFBFBD>
Echo   <20><>ʼ<EFBFBD><CABC> ClipArt Gallery:
Echo       <20><><EFBFBD><EFBFBD> Word <20><>ѡ<EFBFBD>񡰲<EFBFBD><F1A1B0B2><EFBFBD><EFBFBD><EFBFBD><EFBFBD>󡱡<EFBFBD>
Echo       ѡ<><D1A1> Microsoft ClipArt Gallery<72><79>
Echo       <20><><EFBFBD><EFBFBD>ȷ<EFBFBD><C8B7><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʾ<EFBFBD>ļ<EFBFBD><C4BC><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
Echo       <20>˳<EFBFBD> ClipArt Gallery <20><> Word.
Echo.
Echo Microsoft Office 4.3 <20><><EFBFBD>û<EFBFBD>Ӧ<EFBFBD>ó<EFBFBD><C3B3><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ѽ<EFBFBD><D1BD><EFBFBD><EFBFBD><EFBFBD>
Echo.
Pause

:Done