59 lines
1.6 KiB
Batchfile
59 lines
1.6 KiB
Batchfile
|
|
|||
|
|
|
|||
|
|
rem
|
|||
|
|
rem <20>ھھ<DABE><DABE><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>]<5D>w __ProgramFiles <20>ܼ<EFBFBD>
|
|||
|
|
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>b<EFBFBD>ϥΪ̥D<CCA5>ؿ<EFBFBD><D8BF><EFBFBD><EFBFBD>إ<EFBFBD><D8A5><EFBFBD><EFBFBD>ε{<7B><><EFBFBD><EFBFBD><EFBFBD>w<EFBFBD><77><EFBFBD><EFBFBD>
|
|||
|
|
Rem <20>Ҧb<D2A6>ؿ<EFBFBD><D8BF>C
|
|||
|
|
Rem
|
|||
|
|
|
|||
|
|
call TsMkUDir "%RootDrive%\Office95"
|
|||
|
|
call TsMkuDir "%RootDrive%\Office95\Startup"
|
|||
|
|
|
|||
|
|
|
|||
|
|
|
|||
|
|
|
|||
|
|
|
|||
|
|
call TsMkUDir "%RootDrive%\Office95\Templates"
|
|||
|
|
|
|||
|
|
|
|||
|
|
call TsMkuDir "%RootDrive%\Office95\XLStart"
|
|||
|
|
|
|||
|
|
Rem
|
|||
|
|
Rem <20>p<EFBFBD>G<EFBFBD>t<EFBFBD>Τu<CEA4><75><EFBFBD>C<EFBFBD><43><EFBFBD>s<EFBFBD>b<EFBFBD>ϥΪ̥D<CCA5>ؿ<EFBFBD><D8BF><EFBFBD><EFBFBD>A
|
|||
|
|
Rem <20>N<EFBFBD>N<EFBFBD><4E><EFBFBD>ƻs<C6BB><73><EFBFBD>ϥΪ̥D<CCA5>ؿ<EFBFBD><D8BF>C
|
|||
|
|
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>N<EFBFBD><4E><EFBFBD>u<EFBFBD>Ϯw<CFAE>ɮƻs<C6BB><73><EFBFBD>ϥΪ̥ؿ<CCA5><D8BF>C
|
|||
|
|
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>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 <20>N PowerPoint <20>Τ<EFBFBD><CEA4>ƻs<C6BB><73><EFBFBD>ϥΪ̥ؿ<CCA5><D8BF>C
|
|||
|
|
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
|