119 lines
3.4 KiB
Batchfile
119 lines
3.4 KiB
Batchfile
|
@echo off
|
|||
|
|
|
|||
|
|
|
|||
|
|
Rem #########################################################################
|
|||
|
|
|
|||
|
|
Rem
|
|||
|
|
Rem <20>b<EFBFBD>ϥΪ̥D<CCA5>ؿ<EFBFBD><D8BF><EFBFBD><EFBFBD>إߦs<DFA6><73><EFBFBD><EFBFBD><EFBFBD>ε{<7B><><EFBFBD><EFBFBD><EFBFBD>w
|
|||
|
|
Rem <20><><EFBFBD>ƪ<EFBFBD><C6AA>ؿ<EFBFBD><D8BF>C
|
|||
|
|
Rem
|
|||
|
|
|
|||
|
|
call TsMkUDir "%RootDrive%\Office95"
|
|||
|
|
|
|||
|
|
Rem #########################################################################
|
|||
|
|
|
|||
|
|
Rem <20>ˬd<CBAC>O<EFBFBD>_<EFBFBD>o<EFBFBD>ӫ<EFBFBD><D3AB>O<EFBFBD>ɬO<C9AC>b Alpha <20>W<EFBFBD><57><EFBFBD><EFBFBD><EFBFBD>C<EFBFBD>p<EFBFBD>G<EFBFBD>O<EFBFBD>A<EFBFBD>N<EFBFBD>]<5D>w<EFBFBD>A<EFBFBD><41><EFBFBD><EFBFBD><EFBFBD>@<40>Τu<CEA4><75><EFBFBD>C
|
|||
|
|
rem
|
|||
|
|
rem
|
|||
|
|
Set __SharedTools=Shared Tools
|
|||
|
|
If Not "%PROCESSOR_ARCHITECTURE%"=="ALPHA" goto acsrCont1
|
|||
|
|
If Not Exist "%ProgramFiles(x86)%" goto acsrCont1
|
|||
|
|
Set __SharedTools=Shared Tools (x86)
|
|||
|
|
:acsrCont1
|
|||
|
|
|
|||
|
|
|
|||
|
|
Rem #########################################################################
|
|||
|
|
|
|||
|
|
Rem
|
|||
|
|
Rem <20>b<EFBFBD>ϥΪ̥ؿ<CCA5><D8BF><EFBFBD><EFBFBD>إ<EFBFBD> Custom.dic <20>ɮסC
|
|||
|
|
Rem
|
|||
|
|
|
|||
|
|
If Not Exist "%RootDrive%\Office95\Custom.Dic" Copy Nul: "%RootDrive%\Office95\Custom.Dic" >Nul: 2>&1
|
|||
|
|
|
|||
|
|
Rem #########################################################################
|
|||
|
|
|
|||
|
|
REM
|
|||
|
|
REM <20><><EFBFBD>o<EFBFBD>ؿ<EFBFBD><D8BF>W<EFBFBD>٤θ<D9A4><CEB8>|<7C>C
|
|||
|
|
REM
|
|||
|
|
|
|||
|
|
|
|||
|
|
..\ACRegL "%Temp%\Proj95_1.Cmd" DictPath "HKLM\Software\Microsoft\%__SharedTools%\Proofing Tools\Spelling\1033\Normal" "Dictionary" "StripChar\1"
|
|||
|
|
If ErrorLevel 1 Goto Done
|
|||
|
|
Call %Temp%\Proj95_1.Cmd
|
|||
|
|
Del %Temp%\Proj95_1.Cmd >Nul: 2>&1
|
|||
|
|
|
|||
|
|
..\ACRegL "%Temp%\Proj95_3.Cmd" DictName "HKLM\Software\Microsoft\%__SharedTools%\Proofing Tools\Spelling\1033\Normal" "Dictionary" "StripPath"
|
|||
|
|
If ErrorLevel 1 Goto Done
|
|||
|
|
Call %Temp%\Proj95_3.Cmd
|
|||
|
|
Del %Temp%\Proj95_3.Cmd >Nul: 2>&1
|
|||
|
|
|
|||
|
|
Rem #########################################################################
|
|||
|
|
|
|||
|
|
REM
|
|||
|
|
REM <20>p<EFBFBD>G<EFBFBD><47><EFBFBD>|<7C><><EFBFBD>n<EFBFBD><6E><EFBFBD>]<5D>w<EFBFBD>ܧ<EFBFBD><DCA7>í<EFBFBD><C3AD>]<5D>A
|
|||
|
|
REM <20>ӥB<D3A5>S<EFBFBD>w<EFBFBD>˨<EFBFBD><CBA8>L<EFBFBD><4C> MS Office <20><><EFBFBD>γn<CEB3>骺<EFBFBD>ܡA
|
|||
|
|
REM <20>o<EFBFBD>i<EFBFBD><69><EFBFBD>|<7C>o<EFBFBD>͡C
|
|||
|
|
|
|||
|
|
If "%DictPath%"=="%RootDrive%\Office95" Goto GetDictionary
|
|||
|
|
|
|||
|
|
..\ACRegL "%Temp%\Proj95_2.Cmd" Dictionary "HKLM\Software\Microsoft\%__SharedTools%\Proofing Tools\Spelling\1033\Normal" "Dictionary" ""
|
|||
|
|
If ErrorLevel 1 Goto Done
|
|||
|
|
Call %Temp%\Proj95_2.Cmd
|
|||
|
|
Del %Temp%\Proj95_2.Cmd >Nul: 2>&1
|
|||
|
|
|
|||
|
|
REM <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ӨϥΪ̦P<CCA6>ɨϥγo<CEB3>ӵ{<7B><><EFBFBD>X<EFBFBD>C
|
|||
|
|
REM <20>o<EFBFBD>|<7C><><EFBFBD><EFBFBD><EFBFBD>ϥΪ<CFA5> A <20>b<EFBFBD>ϥΪ<CFA5> B <20><><EFBFBD><EFBFBD> DictPath <20><>
|
|||
|
|
REM <20>ܧC
|
|||
|
|
..\ACRegL "%Temp%\Proj95_7.Cmd" OrigDictPath "HKLM\Software\Microsoft\%__SharedTools%\Proofing Tools\Spelling\1033\Normal" "Dictionary" "StripChar\1"
|
|||
|
|
If ErrorLevel 1 Goto Done
|
|||
|
|
Call %Temp%\Proj95_7.Cmd
|
|||
|
|
Del %Temp%\Proj95_7.Cmd >Nul: 2>&1
|
|||
|
|
if "%OrigDictPath%"=="%RootDrive%\Office95" Goto GetDictionary
|
|||
|
|
|
|||
|
|
..\acsr "#DICTNAME#" "%DictName%" Template\prj95Usr.key %Temp%\Proj95_4.tmp
|
|||
|
|
..\acsr "#ROOTDRIVE#" "%RootDrive%" %Temp%\Proj95_4.tmp %Temp%\Proj95_5.tmp
|
|||
|
|
..\acsr "#DICTIONARY#" "%Dictionary%" %Temp%\Proj95_5.tmp %Temp%\Proj95_6.tmp
|
|||
|
|
..\acsr "#__SharedTools#" "%__SharedTools%" %Temp%\Proj95_6.tmp %Temp%\Prj95Usr.Key
|
|||
|
|
|
|||
|
|
Rem <20>ܧ<EFBFBD><DCA7>n<EFBFBD><6E><EFBFBD><EFBFBD><EFBFBD>X<EFBFBD>A<EFBFBD>N<EFBFBD><4E><EFBFBD>|<7C><><EFBFBD>V<EFBFBD>ϥΪ̩ҫ<CCA9><D2AB>w<EFBFBD><77><EFBFBD>ؿ<EFBFBD><D8BF>C
|
|||
|
|
regini %Temp%\prj95Usr.key > Nul:
|
|||
|
|
|
|||
|
|
Del %Temp%\Proj95_4.tmp >Nul: 2>&1
|
|||
|
|
Del %Temp%\Proj95_5.tmp >Nul: 2>&1
|
|||
|
|
Del %Temp%\Proj95_6.tmp >Nul: 2>&1
|
|||
|
|
Del %Temp%\prj95Usr.key >Nul: 2>&1
|
|||
|
|
|
|||
|
|
goto CopyDictionary
|
|||
|
|
|
|||
|
|
|
|||
|
|
Rem #########################################################################
|
|||
|
|
|
|||
|
|
REM
|
|||
|
|
REM <20>p<EFBFBD>G<EFBFBD>ؿ<EFBFBD><D8BF><EFBFBD><EFBFBD>g<EFBFBD>å<EFBFBD><C3A5>ܧ<EFBFBD><DCA7>A<EFBFBD>N<EFBFBD>q<EFBFBD>n<EFBFBD><6E><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
REM <20><><EFBFBD>l<EFBFBD>W<EFBFBD>٤θ<D9A4><CEB8>|<7C>C
|
|||
|
|
REM
|
|||
|
|
|
|||
|
|
:GetDictionary
|
|||
|
|
|
|||
|
|
..\ACRegL "%Temp%\Proj95_6.Cmd" Dictionary "HKLM\Software\Microsoft\%__SharedTools%\Proofing Tools\Spelling\1033\Normal" "OrigDictionary" ""
|
|||
|
|
If ErrorLevel 1 Goto SpellError
|
|||
|
|
|
|||
|
|
Call %Temp%\Proj95_6.Cmd
|
|||
|
|
Del %Temp%\Proj95_6.Cmd >Nul: 2>&1
|
|||
|
|
|
|||
|
|
Rem #########################################################################
|
|||
|
|
|
|||
|
|
REM
|
|||
|
|
REM <20>N<EFBFBD>ؿ<EFBFBD><D8BF>ƻs<C6BB><73><EFBFBD>ϥΪ̥ؿ<CCA5><D8BF>C
|
|||
|
|
REM
|
|||
|
|
|
|||
|
|
:CopyDictionary
|
|||
|
|
|
|||
|
|
If Exist "%RootDrive%\Office95\%DictName%" goto Cont1
|
|||
|
|
If Not Exist "%Dictionary%" goto Cont1
|
|||
|
|
Copy "%Dictionary%" "%RootDrive%\Office95\%DictName%" >Nul: 2>&1
|
|||
|
|
|
|||
|
|
:Cont1
|
|||
|
|
|
|||
|
|
|
|||
|
|
:Done
|