89 lines
2.7 KiB
Batchfile
89 lines
2.7 KiB
Batchfile
|
|
|||
|
|
Rem #########################################################################
|
|||
|
|
|
|||
|
|
Rem
|
|||
|
|
Rem <20><> "Microsoft Office Shortcut Bar.lnk" <20>ļ<EFBFBD><C4BC><EFBFBD> Office <20><>װ<EFBFBD><D7B0>Ŀ¼
|
|||
|
|
Rem <20><><EFBFBD>Ƶ<EFBFBD><C6B5><EFBFBD>ǰ<EFBFBD>û<EFBFBD><C3BB>ġ<EFBFBD><C4A1><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>˵<EFBFBD><CBB5><EFBFBD>
|
|||
|
|
Rem
|
|||
|
|
|
|||
|
|
If Exist "%RootDrive%\Office97" Goto Skip0
|
|||
|
|
If Exist "%USER_STARTUP%\Microsoft Office Shortcut Bar.lnk" Goto Skip0
|
|||
|
|
If Not Exist "#INSTDIR#\Microsoft Office Shortcut Bar.lnk" Goto Skip0
|
|||
|
|
Copy "#INSTDIR#\Microsoft Office Shortcut Bar.lnk" "%USER_STARTUP%\Microsoft Office Shortcut Bar.lnk" >Nul: 2>&1
|
|||
|
|
:Skip0
|
|||
|
|
|
|||
|
|
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%\Office97"
|
|||
|
|
call TsMkUDir "%RootDrive%\Office97\Startup"
|
|||
|
|
|
|||
|
|
|
|||
|
|
|
|||
|
|
call TsMkUDir "%RootDrive%\Office97\Templates"
|
|||
|
|
|
|||
|
|
call TsMkuDir "%RootDrive%\Office97\XLStart"
|
|||
|
|
call TsMkUDir "%RootDrive%\%MY_DOCUMENTS%"
|
|||
|
|
|
|||
|
|
Rem
|
|||
|
|
Rem <20><><EFBFBD><EFBFBD>Щ<EFBFBD>ļ<EFBFBD><C4BC><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD><C3BB><EFBFBD>ģ<EFBFBD>帴<EFBFBD>Ƶ<EFBFBD><C6B5><EFBFBD>ǰ<EFBFBD>û<EFBFBD>ģ<EFBFBD><C4A3>λ<EFBFBD><CEBB>
|
|||
|
|
Rem
|
|||
|
|
|
|||
|
|
If Not Exist "%UserProfile%\%TEMPLATES%\WINWORD8.DOC" copy "%ALLUSERSPROFILE%\%TEMPLATES%\WINWORD8.DOC" "%UserProfile%\%TEMPLATES%\" /Y >Nul: 2>&1
|
|||
|
|
If Not Exist "%UserProfile%\%TEMPLATES%\EXCEL8.XLS" copy "%ALLUSERSPROFILE%\%TEMPLATES%\EXCEL8.XLS" "%UserProfile%\%TEMPLATES%\" /Y >Nul: 2>&1
|
|||
|
|
If Not Exist "%UserProfile%\%TEMPLATES%\BINDER.OBD" copy "%ALLUSERSPROFILE%\%TEMPLATES%\BINDER.OBD" "%UserProfile%\%TEMPLATES%\" /Y >Nul: 2>&1
|
|||
|
|
|
|||
|
|
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%\Office97\ShortCut Bar" Goto Skip1
|
|||
|
|
If Not Exist "#INSTDIR#\Office\ShortCut Bar" Goto Skip1
|
|||
|
|
Xcopy "#INSTDIR#\Office\ShortCut Bar" "%RootDrive%\Office97\ShortCut Bar" /E /I >Nul: 2>&1
|
|||
|
|
:Skip1
|
|||
|
|
|
|||
|
|
Rem
|
|||
|
|
Rem <20><><EFBFBD><EFBFBD> Forms Ŀ¼<C4BF>Ա<EFBFBD> Outlook <20><><EFBFBD>Խ<EFBFBD> Word <20><><EFBFBD><EFBFBD><EFBFBD>༭<EFBFBD><E0BCAD>ʹ<EFBFBD><CAB9>
|
|||
|
|
Rem
|
|||
|
|
|
|||
|
|
If Exist "%RootDrive%\Windows\Forms" Goto Skip2
|
|||
|
|
If Not Exist "%SystemRoot%\Forms" Goto Skip2
|
|||
|
|
Xcopy "%SystemRoot%\Forms" "%RootDrive%\Windows\Forms" /e /i >Nul: 2>&1
|
|||
|
|
:Skip2
|
|||
|
|
|
|||
|
|
Rem
|
|||
|
|
Rem <20><> ARTGALRY.CAG <20><><EFBFBD>Ƶ<EFBFBD><C6B5>û<EFBFBD><C3BB><EFBFBD> Windows Ŀ¼
|
|||
|
|
Rem
|
|||
|
|
|
|||
|
|
If Exist "%RootDrive%\Windows\ArtGalry.Cag" Goto Skip3
|
|||
|
|
If Not Exist "%SystemRoot%\ArtGalry.Cag" Goto Skip3
|
|||
|
|
Copy "%SystemRoot%\ArtGalry.Cag" "%RootDrive%\Windows\ArtGalry.Cag" >Nul: 2>&1
|
|||
|
|
:Skip3
|
|||
|
|
|
|||
|
|
Rem
|
|||
|
|
Rem <20><> Custom.dic <20>ļ<EFBFBD><C4BC><EFBFBD><EFBFBD>Ƶ<EFBFBD><C6B5>û<EFBFBD><C3BB><EFBFBD>Ŀ¼
|
|||
|
|
Rem
|
|||
|
|
|
|||
|
|
If Exist "%RootDrive%\Office97\Custom.Dic" Goto Skip4
|
|||
|
|
If Not Exist "#INSTDIR#\Office\Custom.Dic" Goto Skip4
|
|||
|
|
Copy "#INSTDIR#\Office\Custom.Dic" "%RootDrive%\Office97\Custom.Dic" >Nul: 2>&1
|
|||
|
|
:Skip4
|
|||
|
|
|
|||
|
|
Rem
|
|||
|
|
Rem <20><><EFBFBD><EFBFBD>ͼ<EFBFBD><CDBC><EFBFBD>ļ<EFBFBD><C4BC><EFBFBD><EFBFBD>û<EFBFBD>Ŀ¼
|
|||
|
|
Rem
|
|||
|
|
|
|||
|
|
If Exist "%RootDrive%\Office97\GR8GALRY.GRA" Goto Skip5
|
|||
|
|
If Not Exist "#INSTDIR#\Office\GR8GALRY.GRA" Goto Skip5
|
|||
|
|
Copy "#INSTDIR#\Office\GR8GALRY.GRA" "%RootDrive%\Office97\GR8GALRY.GRA" >Nul: 2>&1
|
|||
|
|
:Skip5
|
|||
|
|
|
|||
|
|
If Exist "%RootDrive%\Office97\XL8GALRY.XLS" Goto Skip6
|
|||
|
|
If Not Exist "#INSTDIR#\Office\XL8GALRY.XLS" Goto Skip6
|
|||
|
|
Copy "#INSTDIR#\Office\XL8GALRY.XLS" "%RootDrive%\Office97\XL8GALRY.XLS" >Nul: 2>&1
|
|||
|
|
:Skip6
|
|||
|
|
|