52 lines
1.8 KiB
Batchfile
52 lines
1.8 KiB
Batchfile
|
|
|||
|
|
rem
|
|||
|
|
rem <20>R<EFBFBD><52><EFBFBD>s<EFBFBD><73><EFBFBD>[<5B>^<5E>̎<EFBFBD><CC8E>ނɉ<DE82><C989><EFBFBD><EFBFBD><EFBFBD> __ProgramFiles <20>̒l<CC92><6C><EFBFBD>ݒ肵<DD92>܂<EFBFBD><DC82>B
|
|||
|
|
rem
|
|||
|
|
Set __ProgramFiles=%ProgramFiles%
|
|||
|
|
If Not "%PROCESSOR_ARCHITECTURE%"=="ALPHA" goto acsrCont1
|
|||
|
|
If Not Exist "%ProgramFiles(x86)%" goto acsrCont1
|
|||
|
|
Set __ProgramFiles=%Program Files(x86)%
|
|||
|
|
:acsrCont1
|
|||
|
|
Rem
|
|||
|
|
Rem <20><><EFBFBD>[<5B>U<EFBFBD>[<5B>̃z<CC83>[<5B><> <20>f<EFBFBD>B<EFBFBD><42><EFBFBD>N<EFBFBD>g<EFBFBD><67><EFBFBD>ɃA<C983>v<EFBFBD><76><EFBFBD>P<EFBFBD>[<5B>V<EFBFBD><56><EFBFBD><EFBFBD><EFBFBD>ŗL<C597>̃f<CC83>[<5B>^
|
|||
|
|
Rem <20>̃f<CC83>B<EFBFBD><42><EFBFBD>N<EFBFBD>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD>쐬<EFBFBD><EC90AC><EFBFBD>܂<EFBFBD><DC82>B
|
|||
|
|
Rem
|
|||
|
|
|
|||
|
|
call TsMkUDir "%RootDrive%\Office95"
|
|||
|
|
call TsMkuDir "%RootDrive%\Office95\Startup"
|
|||
|
|
call TsMkUDir "%RootDrive%\Office95\Template"
|
|||
|
|
|
|||
|
|
call TsMkuDir "%RootDrive%\Office95\XLStart"
|
|||
|
|
|
|||
|
|
Rem
|
|||
|
|
Rem <20><><EFBFBD>[<5B>U<EFBFBD>[<5B>̃z<CC83>[<5B><> <20>f<EFBFBD>B<EFBFBD><42><EFBFBD>N<EFBFBD>g<EFBFBD><67><EFBFBD>Ƀc<C983>[<5B><><EFBFBD>o<EFBFBD>[<5B><><EFBFBD>R<EFBFBD>s<EFBFBD>[<5B><><EFBFBD>܂<EFBFBD><DC82>B
|
|||
|
|
Rem <20><><EFBFBD>ɃR<C983>s<EFBFBD>[<5B><><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482><EFBFBD><EFBFBD>ꍇ<EFBFBD>̓R<CD83>s<EFBFBD>[<5B><><EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B
|
|||
|
|
Rem
|
|||
|
|
|
|||
|
|
If Exist "%RootDrive%\Office95\ShortCut Bar" Goto Skip1
|
|||
|
|
If Not Exist "#INSTDIR#\Office\ShortCut Bar" Goto Skip1
|
|||
|
|
Xcopy "#INSTDIR#\Office\ShortCut Bar" "%RootDrive%\Office95\ShortCut Bar" /E /I >Nul: 2>&1
|
|||
|
|
:Skip1
|
|||
|
|
|
|||
|
|
Rem
|
|||
|
|
Rem <20><><EFBFBD>[<5B>U<EFBFBD>[<5B>̃f<CC83>B<EFBFBD><42><EFBFBD>N<EFBFBD>g<EFBFBD><67><EFBFBD>փN<D683><4E><EFBFBD>b<EFBFBD>v <20>A<EFBFBD>[<5B>g <20>M<EFBFBD><4D><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>[<5B>̃t<CC83>@<40>C<EFBFBD><43><EFBFBD><EFBFBD><EFBFBD>R<EFBFBD>s<EFBFBD>[<5B><><EFBFBD>܂<EFBFBD><DC82>B
|
|||
|
|
Rem
|
|||
|
|
|
|||
|
|
If Exist "%RootDrive%\Windows\ArtGalry.Cag" Goto Skip2
|
|||
|
|
If Not Exist "%__ProgramFiles%\Common Files\Microsoft Shared\Artgalry\ArtGalry.cag" Goto Skip2
|
|||
|
|
Copy "%__ProgramFiles%\Common Files\Microsoft Shared\Artgalry\ArtGalry.cag" "%RootDrive%\Windows\ArtGalry.Cag" >Nul: 2>&1
|
|||
|
|
:Skip2
|
|||
|
|
|
|||
|
|
Rem
|
|||
|
|
Rem <20><><EFBFBD>[<5B>U<EFBFBD>[<5B>̃f<CC83>B<EFBFBD><42><EFBFBD>N<EFBFBD>g<EFBFBD><67><EFBFBD><EFBFBD> Custom.dic <20>t<EFBFBD>@<40>C<EFBFBD><43><EFBFBD><EFBFBD><EFBFBD>쐬<EFBFBD><EC90AC><EFBFBD>܂<EFBFBD><DC82>B
|
|||
|
|
Rem
|
|||
|
|
|
|||
|
|
If Not Exist "%RootDrive%\Office95\Custom.Dic" Copy Nul: "%RootDrive%\Office95\Custom.Dic" >Nul: 2>&1
|
|||
|
|
|
|||
|
|
Rem
|
|||
|
|
Rem <20><><EFBFBD>[<5B>U<EFBFBD>[<5B>̃f<CC83>B<EFBFBD><42><EFBFBD>N<EFBFBD>g<EFBFBD><67><EFBFBD><EFBFBD> PowerPoint <20>ƁA<C681>o<EFBFBD>C<EFBFBD><43><EFBFBD>_ <20>t<EFBFBD>@<40>C<EFBFBD><43><EFBFBD><EFBFBD><EFBFBD>R<EFBFBD>s<EFBFBD>[<5B><><EFBFBD>܂<EFBFBD><DC82>B
|
|||
|
|
Rem
|
|||
|
|
|
|||
|
|
If Not Exist "%UserProfile%\%TEMPLATES%\BINDER70.OBD" copy "%ALLUSERSPROFILE%\%TEMPLATES%\BINDER70.OBD" "%UserProfile%\%TEMPLATES%\" /Y >Nul: 2>&1
|
|||
|
|
If Not Exist "%UserProfile%\%TEMPLATES%\PPT70.PPT" copy "%ALLUSERSPROFILE%\%TEMPLATES%\PPT70.PPT" "%UserProfile%\%TEMPLATES%\" /Y >Nul: 2>&1
|