151 lines
4.8 KiB
Batchfile
151 lines
4.8 KiB
Batchfile
|
@Echo Off
|
|||
|
|
|||
|
Cls
|
|||
|
|
|||
|
Call "%SystemRoot%\Application Compatibility Scripts\ChkRoot.Cmd"
|
|||
|
If "%_CHKROOT%" == "FAIL" Goto Done
|
|||
|
|
|||
|
Echo.
|
|||
|
Echo.
|
|||
|
Echo Administrator <20>ݭn<DDAD>N Access <20>u<EFBFBD>@<40>ؿ<EFBFBD><D8BF>ܧ<EFBFBD><DCA7><EFBFBD><EFBFBD>ϥΪ̪<CEAA>
|
|||
|
Echo Office <20>p<EFBFBD>H<EFBFBD>ؿ<EFBFBD><D8BF>A<EFBFBD>~<7E><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>o<EFBFBD>ӫ<EFBFBD><D3AB>O<EFBFBD>ɡC
|
|||
|
Echo.
|
|||
|
Echo <20><><EFBFBD><EFBFBD><EFBFBD>o<EFBFBD>Ӿާ@<40><><EFBFBD>A<EFBFBD>Ы<EFBFBD><D0AB><EFBFBD><EFBFBD>@<40><><EFBFBD><EFBFBD><EFBFBD>~<7E><><EFBFBD>C
|
|||
|
Echo.
|
|||
|
Echo <20>_<EFBFBD>h<EFBFBD>AAdministrator <20>ݭn<DDAD><6E><EFBFBD><EFBFBD><EFBFBD>U<EFBFBD>C<EFBFBD>B<EFBFBD>J:
|
|||
|
Echo <20>Ұ<EFBFBD> MS Access<73>A<EFBFBD>ñq [View] <20>\<5C><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> [Options]
|
|||
|
Echo <20>N [Default Database Directory] <20>ܧ<EFBFBD><DCA7><EFBFBD> "%RootDrive%\OFFICE43"
|
|||
|
Echo <20><><EFBFBD><EFBFBD> MS Access
|
|||
|
Echo.
|
|||
|
Echo <20>`<60>N<EFBFBD>ƶ<EFBFBD>: <20>z<EFBFBD>ݭn<DDAD>إߤ@<40>ӷs<D3B7><73><EFBFBD><EFBFBD><EFBFBD>Ʈw<C6AE>A<EFBFBD>~<7E><><EFBFBD>Ѿ\ [View] <20>\<5C><><EFBFBD><EFBFBD><EFBFBD>C
|
|||
|
Echo.
|
|||
|
Echo <20><><EFBFBD><EFBFBD><EFBFBD>o<EFBFBD>ǨB<C7A8>J<EFBFBD><4A><EFBFBD>A<EFBFBD>Ы<EFBFBD><D0AB><EFBFBD><EFBFBD>N<EFBFBD><4E><EFBFBD>~<7E><>...
|
|||
|
|
|||
|
Pause > NUL:
|
|||
|
|
|||
|
Echo.
|
|||
|
Echo <20>p<EFBFBD>G<EFBFBD>z<EFBFBD>N MS Office 4.3 <20>w<EFBFBD>˦b "%SystemDrive%\MSOFFICE" <20>H<EFBFBD>~<7E><><EFBFBD>ؿ<EFBFBD><D8BF>A
|
|||
|
Echo <20>N<EFBFBD><4E><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>s Ofc43ins.cmd<6D>C
|
|||
|
Echo.
|
|||
|
Echo <20>Ы<EFBFBD><D0AB><EFBFBD><EFBFBD>N<EFBFBD><4E><EFBFBD>}<7D>l<EFBFBD><6C><EFBFBD>s 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 <20>`<60>N: CACLS <20><><EFBFBD>O<EFBFBD>u<EFBFBD><75><EFBFBD>b NTFS <20>榡<EFBFBD><E6A6A1><EFBFBD>ϺФ<CFBA><D0A4>Τ<EFBFBD><CEA4><EFBFBD><EFBFBD><EFBFBD><EFBFBD>C
|
|||
|
Rem
|
|||
|
|
|||
|
Rem <20>p<EFBFBD>G<EFBFBD>ثe<D8AB><65><EFBFBD>O<EFBFBD>w<EFBFBD>˼Ҧ<CBBC><D2A6>A<EFBFBD>N<EFBFBD>ܧw<F3A6A8A6>˼Ҧ<CBBC><D2A6>C
|
|||
|
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>p<EFBFBD>G<EFBFBD><47><EFBFBD>ӬO<D3AC><4F><EFBFBD><EFBFBD><EFBFBD>Ҧ<EFBFBD><D2A6>A<EFBFBD>N<EFBFBD>N<EFBFBD>ܦ^<5E><><EFBFBD><EFBFBD><EFBFBD>Ҧ<EFBFBD><D2A6>C
|
|||
|
If "%__OrigMode%" == "Exec" Change User /Execute > Nul:
|
|||
|
Set __OrigMode=
|
|||
|
|
|||
|
Rem
|
|||
|
Rem <20><><EFBFBD>s Office 4.3 <20><> INI <20>ɮ<EFBFBD>
|
|||
|
Rem
|
|||
|
|
|||
|
Rem <20>b msoffice.ini <20><><EFBFBD>]<5D>w Excel <20>u<EFBFBD>@<40>ؿ<EFBFBD> (<28>p<EFBFBD>G<EFBFBD>q Office <20>u<EFBFBD><75><EFBFBD>C<EFBFBD><43>
|
|||
|
Rem <20>Ұ<EFBFBD> Excel) Office Toolbar <20>зdz]<5D>w<EFBFBD>|<7C>N Excel <20><><EFBFBD>b Word <20><><EFBFBD>m
|
|||
|
Rem <20><><EFBFBD><EFBFBD><EFBFBD>C <20>p<EFBFBD>G msoffice.ini <20><><EFBFBD>s<EFBFBD>b<EFBFBD>A<EFBFBD>|<7C>N<EFBFBD><4E><EFBFBD>إߦb%SystemRoot% <20>ؿ<EFBFBD><D8BF><EFBFBD><EFBFBD>C
|
|||
|
Rem
|
|||
|
|
|||
|
..\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 Update the WIN.INI
|
|||
|
Rem
|
|||
|
|
|||
|
..\Aciniupd /e "Win.ini" "MS Proofing Tools" "Custom Dict 1" "%RootDrive%\OFFICE43\Custom.dic"
|
|||
|
|
|||
|
Rem
|
|||
|
Rem <20>إ<EFBFBD> Artgalry <20><><EFBFBD>Ƨ<EFBFBD><C6A7><EFBFBD><EFBFBD>ϥ<EFBFBD><CFA5>v<EFBFBD><76><EFBFBD>C
|
|||
|
Rem
|
|||
|
|
|||
|
cacls "%SystemRoot%\Msapps\Artgalry" /E /G "Terminal Server User":F > NUL: 2>&1
|
|||
|
|
|||
|
Rem
|
|||
|
Rem <20>ܧ<EFBFBD> MSQuery <20><><EFBFBD>Ƨ<EFBFBD><C6A7><EFBFBD><EFBFBD>ϥ<EFBFBD><CFA5>v<EFBFBD><76><EFBFBD>C
|
|||
|
Rem
|
|||
|
|
|||
|
cacls "%SystemRoot%\Msapps\MSQUERY" /E /G "Terminal Server User":C > NUL: 2>&1
|
|||
|
|
|||
|
Rem
|
|||
|
Rem <20>N Msacc20.ini <20>ƻs<C6BB><73><EFBFBD>t<EFBFBD>κz<DEB2><7A><EFBFBD><EFBFBD> windows <20>ؿ<EFBFBD><D8BF>A<EFBFBD>]<5D><><EFBFBD>t<EFBFBD>κz<DEB2><7A><EFBFBD><EFBFBD><EFBFBD>ɮO<D7AC>ª<EFBFBD><C2AA><EFBFBD><EFBFBD>C
|
|||
|
Rem
|
|||
|
|
|||
|
Copy "%SystemRoot%\Msacc20.ini" "%UserProfile%\Windows\" > NUL: 2>&1
|
|||
|
|
|||
|
Rem <20>إߤ@<40>ӵ<EFBFBD><D3B5>]<5D>ɮסAInstaller <20>~<7E><><EFBFBD>|<7C><><EFBFBD>n<EFBFBD><6E><EFBFBD><EFBFBD><EFBFBD>X<EFBFBD>i<EFBFBD><69><EFBFBD>Ǽ<EFBFBD><C7BC>C
|
|||
|
|
|||
|
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 <20>t<EFBFBD>κz<DEB2><7A><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>n<EFBFBD>X<EFBFBD>A<EFBFBD>A<EFBFBD><41><EFBFBD>s<EFBFBD>n<EFBFBD>J<EFBFBD>A<EFBFBD>~<7E><><EFBFBD><EFBFBD><EFBFBD>ܧ<EFBFBD><DCA7>ͮġC
|
|||
|
Echo <20>n<EFBFBD>J<EFBFBD><4A><EFBFBD>A<EFBFBD>t<EFBFBD>κz<DEB2><7A><EFBFBD>]<5D><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>U<EFBFBD>C<EFBFBD>B<EFBFBD>J<EFBFBD>A<EFBFBD>~<7E><><EFBFBD><EFBFBD><EFBFBD>l<EFBFBD><6C>
|
|||
|
Echo Clip Art Gallery:
|
|||
|
Echo <20><><EFBFBD><EFBFBD> Word <20>ÿ<EFBFBD><C3BF><EFBFBD> [<5B><><EFBFBD>J<EFBFBD><4A><EFBFBD><EFBFBD>]<5D>C
|
|||
|
Echo <20><><EFBFBD><EFBFBD> Microsoft ClipArt Gallery<72>C
|
|||
|
Echo <20><> [<5B>T<EFBFBD>w] <20>ӶפJ<D7A4><4A><EFBFBD>ܪ<EFBFBD> clipart<72>C
|
|||
|
Echo <20><><EFBFBD><EFBFBD> ClipArt Gallery <20><> Word<72>C
|
|||
|
Echo.
|
|||
|
Echo <20>t<EFBFBD>κz<DEB2><7A><EFBFBD>i<EFBFBD>H<EFBFBD><48><EFBFBD>C<EFBFBD>ӨϥΪ̫<CEAA><CCAB>w<EFBFBD>ߤ@<40>ʪ<EFBFBD><CAAA>w<EFBFBD>]<5D>ؿ<EFBFBD><D8BF>A<EFBFBD>B<EFBFBD>J<EFBFBD>p<EFBFBD>U:
|
|||
|
Echo.
|
|||
|
Echo 1) <20>ηƹ<CEB7><C6B9>k<EFBFBD><6B><EFBFBD><EFBFBD> [<5B>}<7D>l] <20>\<5C><><EFBFBD><EFBFBD><EFBFBD>C
|
|||
|
Echo 2) <20>b<EFBFBD><62><EFBFBD><EFBFBD><EFBFBD>\<5C><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> [<5B>s<EFBFBD><73><EFBFBD>Ҧ<EFBFBD><D2A6>ϥΪ<CFA5>] <20>ӱҰ<D3B1><D2B0>ɮ<EFBFBD><C9AE>`<60>ޡC
|
|||
|
Echo 3) <20>b<EFBFBD>ɮ<EFBFBD><C9AE>`<60>ޥk<DEA5>赡<EFBFBD>椤<EFBFBD><E6A4A4> [<5B>{<7B><><EFBFBD><EFBFBD>] <20><><EFBFBD>Ƨ<EFBFBD><C6A7>W<EFBFBD><57><EFBFBD><EFBFBD><EFBFBD>U<EFBFBD>C
|
|||
|
Echo 4) <20>ηƹ<CEB7><C6B9>k<EFBFBD><6B><EFBFBD>A<EFBFBD>b<EFBFBD>ɮ<EFBFBD><C9AE>`<60>ޥk<DEA5>赡<EFBFBD>椤<EFBFBD><E6A4A4> Microsoft Office <20>ϥܤW<DCA4><57><EFBFBD><EFBFBD><EFBFBD>U<EFBFBD>C
|
|||
|
Echo 5) <20>b<EFBFBD>ɮ<EFBFBD><C9AE>`<60>ޥk<DEA5>赡<EFBFBD>椤<EFBFBD><E6A4A4> Microsoft PowerPoint <20>ϥܤW<DCA4><57><EFBFBD>@<40>U<EFBFBD>C
|
|||
|
Echo 6) <20>b<EFBFBD><62><EFBFBD><EFBFBD><EFBFBD>\<5C><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> [<5B><><EFBFBD>e]<5D>C
|
|||
|
Echo 7) <20><><EFBFBD><EFBFBD> [<5B><><EFBFBD>|] <20><><EFBFBD><EFBFBD><DEBC>ҡA<D2A1>ñN [<5B>Ұʦb:] <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>ܧ<EFBFBD><DCA7><EFBFBD>
|
|||
|
Echo %%RootDrive%%\My Documents<74>C
|
|||
|
Echo 8) <20><><EFBFBD><EFBFBD> [<5B>T<EFBFBD>w]<5D>C
|
|||
|
Echo.
|
|||
|
Echo <20>`<60>N: <20>C<EFBFBD>ӨϥΪ̳<CEAA><CCB3><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>D<EFBFBD>ؿ<EFBFBD><D8BF><EFBFBD> %%RootDrive%%<EFBFBD>C
|
|||
|
Echo %%RootDrive%%\My Documents <20>u<EFBFBD>O<EFBFBD>@<40>ӫ<EFBFBD>ij<EFBFBD>ȡC
|
|||
|
Echo.
|
|||
|
Pause
|
|||
|
Echo Microsoft Office 4.3 <20>h<EFBFBD>ϥΪ<CFA5><CEAA><EFBFBD><EFBFBD>ε{<7B><><EFBFBD>վ<EFBFBD><D5BE>B<EFBFBD>z<EFBFBD><7A><EFBFBD><EFBFBD><EFBFBD>C
|
|||
|
Echo.
|
|||
|
Pause
|
|||
|
|
|||
|
:Done
|