windows-nt/Source/XPSP1/NT/termsrv/admtools/appcmpt/jpn/msword98.cmd

@Echo Off

Rem #########################################################################
Rem
Rem %RootDrive% <20><><EFBFBD>\<5C><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482>̃X<CC83>N<EFBFBD><4E><EFBFBD>v<EFBFBD>g<EFBFBD>p<EFBFBD>ɐݒ肳<DD92><E882B3><EFBFBD>Ă<EFBFBD><C482>邱<EFBFBD>Ƃ<EFBFBD><C682>m<EFBFBD>F<EFBFBD><46><EFBFBD>܂<EFBFBD><DC82>B
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 #########################################################################

Rem
Rem <20><><EFBFBD>݂̃<DD82><CC83>[<5B>U<EFBFBD>[ <20>e<EFBFBD><65><EFBFBD>v<EFBFBD><76><EFBFBD>[<5B>g<EFBFBD><67><EFBFBD>炷<EFBFBD>ׂẴ<C482><CC83>[<5B>U<EFBFBD>[<5B>̃e<CC83><65><EFBFBD>v<EFBFBD><76><EFBFBD>[<5B>g<EFBFBD>̏ꏊ<CC8F><EA8F8A>
Rem

If Not Exist "%ALLUSERSPROFILE%\%TEMPLATES%\WINWORD8.DOC" copy "%UserProfile%\%TEMPLATES%\WINWORD8.DOC" "%ALLUSERSPROFILE%\%TEMPLATES%\" /Y >Nul: 2>&1

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



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

..\ACRegL %Temp%\O97.Cmd O97INST "HKLM\Software\Microsoft\Office\8.0" "BinDirPath" "STRIPCHAR\1"
If Not ErrorLevel 1 Goto Cont0
Echo.
Echo <20><><EFBFBD>W<EFBFBD>X<EFBFBD>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD><EFBFBD> Word 98 <20>̃C<CC83><43><EFBFBD>X<EFBFBD>g<EFBFBD>[<5B><><EFBFBD>ꏊ<EFBFBD><EA8F8A><EFBFBD>擾<EFBFBD>ł<EFBFBD><C582>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B
Echo Word 98 <20><><EFBFBD>C<EFBFBD><43><EFBFBD>X<EFBFBD>g<EFBFBD>[<5B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482>邱<EFBFBD>Ƃ<EFBFBD><C682>m<EFBFBD>F<EFBFBD><46><EFBFBD>Ă<EFBFBD><C482><EFBFBD><EFBFBD>A<EFBFBD><41><EFBFBD>̃X<CC83>N<EFBFBD><4E><EFBFBD>v<EFBFBD>g
Echo <20><><EFBFBD><EFBFBD><EFBFBD>s<EFBFBD><73><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>B
Echo.
Pause
Goto Done

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

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

Rem
Rem <20><><EFBFBD>ׂẴ<C482><CC83>[<5B>U<EFBFBD>[<5B>p<EFBFBD>̃X<CC83>^<5E>[<5B>g<EFBFBD>A<EFBFBD>b<EFBFBD>v <20><><EFBFBD>j<EFBFBD><6A><EFBFBD>[<5B><><EFBFBD><EFBFBD> Find Fast <20><><EFBFBD>폜<EFBFBD><ED8F9C><EFBFBD>܂<EFBFBD><DC82>B
Rem Find Fast <20>̓<EFBFBD><CD83>\<5C>[<5B>X<EFBFBD><58><EFBFBD>W<EFBFBD><57><EFBFBD>I<EFBFBD>Ɏg<C98E>p<EFBFBD><70><EFBFBD>A<EFBFBD>V<EFBFBD>X<EFBFBD>e<EFBFBD><65><EFBFBD>̃p<CC83>t<EFBFBD>H<EFBFBD>[<5B>}<7D><><EFBFBD>X<EFBFBD>ɉe<C989><65><EFBFBD><EFBFBD><EFBFBD>y<EFBFBD>ڂ<EFBFBD><DA82>܂<EFBFBD><DC82>B
Rem

If Exist "%COMMON_STARTUP%\Microsoft Find Fast.lnk" Del "%COMMON_STARTUP%\Microsoft Find Fast.lnk" >Nul: 2>&1


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

Rem
Rem <20><><EFBFBD>W<EFBFBD>X<EFBFBD>g<EFBFBD><67> <20>L<EFBFBD>[<5B><><EFBFBD>ύX<CF8D><58><EFBFBD>āA<C481>p<EFBFBD>X<EFBFBD><58><EFBFBD><EFBFBD><EFBFBD>[<5B>U<EFBFBD>[<5B>ŗL<C597>̃f<CC83>B<EFBFBD><42><EFBFBD>N<EFBFBD>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD>w<EFBFBD><77><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>悤<EFBFBD>ɂ<EFBFBD><C982>܂<EFBFBD><DC82>B
Rem

Rem <20><><EFBFBD>W<EFBFBD>X<EFBFBD>g<EFBFBD><67> <20>L<EFBFBD>[<5B><><EFBFBD>ύX<CF8D><58><EFBFBD>āA<C481>p<EFBFBD>X<EFBFBD><58><EFBFBD><EFBFBD><EFBFBD>[<5B>U<EFBFBD>[<5B>ŗL<C597>̃f<CC83>B<EFBFBD><42><EFBFBD>N<EFBFBD>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD>w<EFBFBD><77><EFBFBD>悤<EFBFBD><E682A4>
Set __OrigMode=Install
ChgUsr /query > Nul:
if Not ErrorLevel 101 Goto Begin
Set __OrigMode=Exec
Change User /Install > Nul:
:Begin
Set __SharedTools=Shared Tools
If Not "%PROCESSOR_ARCHITECTURE%"=="ALPHA" goto acsrCont1
If Not Exist "%ProgramFiles(x86)%" goto acsrCont1
Set __SharedTools=Shared Tools (x86)
:acsrCont1
..\acsr "#ROOTDRIVE#" "%RootDrive%" Template\MsWord98.Key MsWord98.Tmp
..\acsr "#__SharedTools#" "%__SharedTools%" MsWord98.Tmp MsWord98.Tmp2
..\acsr "#INSTDIR#" "%O97INST%" MsWord98.Tmp2 MsWord98.Tmp3
..\acsr "#MY_DOCUMENTS#" "%MY_DOCUMENTS%" MsWord98.Tmp3 MsWord98.key
Del MsWord98.Tmp >Nul: 2>&1
Del MsWord98.Tmp2 >Nul: 2>&1
Del MsWord98.Tmp3 >Nul: 2>&1
regini MsWord98.key > Nul:

Rem <20><><EFBFBD>܂<EFBFBD><DC82>B
If "%__OrigMode%" == "Exec" Change User /Execute > Nul:
Set __OrigMode=

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

Rem
Rem <20><><EFBFBD>̃<EFBFBD><CC83>[<5B>h<EFBFBD><68><EFBFBD><EFBFBD><EFBFBD>s<EFBFBD><73><EFBFBD>[<5B>h<EFBFBD><68><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ꍇ<EFBFBD>A<EFBFBD><41><EFBFBD>s<EFBFBD><73><EFBFBD>[<5B>h<EFBFBD>ɖ߂<C996><DF82>܂<EFBFBD><DC82>B
Rem UsrLogn2.Cmd <20>X<EFBFBD>N<EFBFBD><4E><EFBFBD>v<EFBFBD>g<EFBFBD>ɒlj<C992><C789><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B
Rem

..\acsr "#INSTDIR#" "%O97INST%" ..\Logon\Template\Wrd98Usr.Cmd ..\Logon\Wrd98Usr.Cmd

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

Echo.
Echo   MS Word 98 <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɍ쓮<C98D><EC93AE><EFBFBD>邽<EFBFBD>߂ɂ́A<CD81><41><EFBFBD>݃<EFBFBD><DD83>O<EFBFBD>I<EFBFBD><49><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482>郆<EFBFBD>[<5B>U<EFBFBD>[<5B>́A 
Echo   <20>A<EFBFBD>v<EFBFBD><76><EFBFBD>P<EFBFBD>[<5B>V<EFBFBD><56><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>s<EFBFBD><73><EFBFBD><EFBFBD><EFBFBD>O<EFBFBD>ɁA<C981><41><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>񃍃O<F1838D83>I<EFBFBD>t<EFBFBD><74><EFBFBD>Ă<EFBFBD><C482><EFBFBD><EFBFBD>ēx<C493><78><EFBFBD>O<EFBFBD>I<EFBFBD><49>
Echo   <20><><EFBFBD><EFBFBD><EFBFBD>K<EFBFBD>v<EFBFBD><76><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B
Echo.
Echo Microsoft Word 98 <20>̃}<7D><><EFBFBD>`<60><><EFBFBD>[<5B>U<EFBFBD>[ <20>A<EFBFBD>v<EFBFBD><76><EFBFBD>P<EFBFBD>[<5B>V<EFBFBD><56><EFBFBD><EFBFBD><EFBFBD>‹<EFBFBD><C28B>ݒ肪<DD92><E882AA><EFBFBD><EFBFBD>
Pause

:Done