59 lines
1.6 KiB
Batchfile
59 lines
1.6 KiB
Batchfile
|
|
|||
|
|
|
|||
|
|
rem
|
|||
|
|
rem <20><><EFBFBD>ݻ<EFBFBD><DDBB><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> __ProgramFiles <20><><EFBFBD><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><><EFBFBD>û<EFBFBD><C3BB><EFBFBD><EFBFBD><EFBFBD>Ŀ¼<C4BF><C2BC>ΪӦ<CEAA>ó<EFBFBD><C3B3><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
Rem <20><><EFBFBD><EFBFBD>Ŀ¼<C4BF><C2BC>
|
|||
|
|
Rem
|
|||
|
|
|
|||
|
|
call TsMkUDir "%RootDrive%\Office95"
|
|||
|
|
call TsMkuDir "%RootDrive%\Office95\Startup"
|
|||
|
|
|
|||
|
|
|
|||
|
|
|
|||
|
|
|
|||
|
|
|
|||
|
|
call TsMkUDir "%RootDrive%\Office95\Templates"
|
|||
|
|
|
|||
|
|
|
|||
|
|
call TsMkuDir "%RootDrive%\Office95\XLStart"
|
|||
|
|
|
|||
|
|
Rem
|
|||
|
|
Rem <20><>ϵͳ<CFB5><CDB3><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ƶ<EFBFBD><C6B5>û<EFBFBD><C3BB><EFBFBD><EFBFBD><EFBFBD>Ŀ¼<C4BF><C2BC><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
Rem <20>Ѿ<EFBFBD><D1BE><EFBFBD><EFBFBD>ڡ<EFBFBD>
|
|||
|
|
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><> ClipArt Gallery <20>ļ<EFBFBD><C4BC><EFBFBD><EFBFBD>Ƶ<EFBFBD><C6B5>û<EFBFBD><C3BB><EFBFBD>Ŀ¼
|
|||
|
|
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>û<EFBFBD><C3BB><EFBFBD>Ŀ¼<C4BF>д<EFBFBD><D0B4><EFBFBD> Custom.dic <20>ļ<EFBFBD>
|
|||
|
|
Rem
|
|||
|
|
|
|||
|
|
If Not Exist "%RootDrive%\Office95\Custom.Dic" Copy Nul: "%RootDrive%\Office95\Custom.Dic" >Nul: 2>&1
|
|||
|
|
|
|||
|
|
Rem
|
|||
|
|
Rem <20><> PowerPoint <20><> Binder <20>ļ<EFBFBD><C4BC><EFBFBD><EFBFBD>Ƶ<EFBFBD><C6B5>û<EFBFBD><C3BB><EFBFBD>Ŀ¼
|
|||
|
|
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
|