125 lines
3.7 KiB
Batchfile
125 lines
3.7 KiB
Batchfile
|
@Echo Off
|
|||
|
|
|||
|
Rem #########################################################################
|
|||
|
|
|||
|
Rem
|
|||
|
Rem <20><><EFBFBD><EFBFBD>֤ %RootDrive% <20>Ѿ<EFBFBD><D1BE><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ã<EFBFBD><C3A3><EFBFBD>Ϊ<EFBFBD><CEAA><EFBFBD><EFBFBD><EFBFBD>ű<EFBFBD><C5B1><EFBFBD><EFBFBD>øñ<C3B8><C3B1><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
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><D7A2><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ȡ Office 95 <20>İ<EFBFBD>װλ<D7B0>á<EFBFBD><C3A1><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ҳ<EFBFBD><D2B2><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
Rem <20><><EFBFBD>ٶ<EFBFBD> Office û<>а<EFBFBD>װ<EFBFBD><D7B0><EFBFBD><EFBFBD>ʾ<EFBFBD><CABE><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ϣ<EFBFBD><CFA2>
|
|||
|
Rem
|
|||
|
|
|||
|
..\ACRegL %Temp%\O95.Cmd O95INST "HKLM\Software\Microsoft\Microsoft Office\95\InstallRoot" "" ""
|
|||
|
If Not ErrorLevel 1 Goto Cont0
|
|||
|
|
|||
|
..\ACRegL %Temp%\O95.Cmd O95INST "HKLM\Software\Microsoft\Microsoft Office\95\InstallRootPro" "" ""
|
|||
|
If Not ErrorLevel 1 Goto Cont0
|
|||
|
|
|||
|
Echo.
|
|||
|
Echo <20><EFBFBD><DEB7><EFBFBD>ע<EFBFBD><D7A2><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> Office 95 <20><>װλ<D7B0>á<EFBFBD>
|
|||
|
Echo <20><><EFBFBD><EFBFBD>֤ Office 95 <20>Ƿ<EFBFBD><C7B7>Ѿ<EFBFBD><D1BE><EFBFBD>װ<EFBFBD><D7B0><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
Echo <20><><EFBFBD><EFBFBD><EFBFBD>ű<EFBFBD><C5B1><EFBFBD>
|
|||
|
Echo.
|
|||
|
Pause
|
|||
|
Goto Done
|
|||
|
|
|||
|
:Cont0
|
|||
|
Call %Temp%\O95.Cmd
|
|||
|
Del %Temp%\O95.Cmd >Nul: 2>&1
|
|||
|
|
|||
|
Rem #########################################################################
|
|||
|
|
|||
|
Rem
|
|||
|
Rem <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD><C3BB>ġ<EFBFBD><C4A1><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>˵<EFBFBD>ɾ<EFBFBD><C9BE><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ٲ<EFBFBD><D9B2>ҡ<EFBFBD><D2A1><EFBFBD>
|
|||
|
Rem <20><><EFBFBD><EFBFBD><EFBFBD>ٲ<EFBFBD><D9B2>ҡ<EFBFBD><D2A1><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Դ<EFBFBD><D4B4><EFBFBD><EFBFBD>Ӱ<EFBFBD><D3B0>ϵͳ<CFB5><CDB3><EFBFBD>ܡ<EFBFBD><DCA1><EFBFBD>Ҫ
|
|||
|
Rem ͬʱ<CDAC><CAB1><EFBFBD>鵱ǰ<E9B5B1>û<EFBFBD><C3BB>˵<EFBFBD><CBB5><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD><C3BB>˵<EFBFBD><CBB5><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ٲ<EFBFBD><D9B2>ҡ<EFBFBD>
|
|||
|
Rem <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ĸ<EFBFBD><C4B8>˵<EFBFBD>ȡ<EFBFBD><C8A1><EFBFBD><EFBFBD>ϵͳ<CFB5>Ƿ<EFBFBD><C7B7>ѷ<EFBFBD><D1B7><EFBFBD>ִ<EFBFBD><D6B4>
|
|||
|
Rem ģʽ<C4A3><CABD>
|
|||
|
Rem
|
|||
|
|
|||
|
If Not Exist "%USER_STARTUP%\Microsoft Office <20><><EFBFBD>ݹ<EFBFBD><DDB9><EFBFBD><EFBFBD><EFBFBD>.lnk" Goto Cont1
|
|||
|
Del "%USER_STARTUP%\Microsoft Office <20><><EFBFBD>ݹ<EFBFBD><DDB9><EFBFBD><EFBFBD><EFBFBD>.lnk" >Nul: 2>&1
|
|||
|
:Cont1
|
|||
|
|
|||
|
If Not Exist "%COMMON_STARTUP%\Microsoft Office <20><><EFBFBD>ݹ<EFBFBD><DDB9><EFBFBD><EFBFBD><EFBFBD>.lnk" Goto Cont2
|
|||
|
Del "%COMMON_STARTUP%\Microsoft Office <20><><EFBFBD>ݹ<EFBFBD><DDB9><EFBFBD><EFBFBD><EFBFBD>.lnk" >Nul: 2>&1
|
|||
|
:Cont2
|
|||
|
|
|||
|
|
|||
|
Rem #########################################################################
|
|||
|
|
|||
|
Rem
|
|||
|
Rem <20><> PowerPoint <20><> Binder <20>ļ<EFBFBD><C4BC><EFBFBD><EFBFBD>Ƶ<EFBFBD><C6B5><EFBFBD><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>Ŀ¼<C4BF><C2BC><EFBFBD>Ա<EFBFBD>
|
|||
|
Rem <20><><EFBFBD>û<EFBFBD><C3BB><EFBFBD>¼ʱ<C2BC><CAB1><EFBFBD>Ը<EFBFBD><D4B8>Ƶ<EFBFBD>ÿ<EFBFBD><C3BF><EFBFBD>û<EFBFBD><C3BB><EFBFBD><EFBFBD><EFBFBD>Ŀ¼
|
|||
|
Rem
|
|||
|
|
|||
|
If Not Exist "%ALLUSERSPROFILE%\%TEMPLATES%\BINDER70.OBD" copy "%UserProfile%\%TEMPLATES%\BINDER70.OBD" "%ALLUSERSPROFILE%\%TEMPLATES%\" /Y >Nul: 2>&1
|
|||
|
If Not Exist "%ALLUSERSPROFILE%\%TEMPLATES%\PPT70.PPT" copy "%UserProfile%\%TEMPLATES%\PPT70.PPT" "%ALLUSERSPROFILE%\%TEMPLATES%" /Y >Nul: 2>&1
|
|||
|
|
|||
|
|
|||
|
Rem #########################################################################
|
|||
|
|
|||
|
Rem
|
|||
|
Rem <20><><EFBFBD><EFBFBD>ע<EFBFBD><D7A2><EFBFBD><EFBFBD><EFBFBD>ʹ·<CAB9><C2B7>ָ<EFBFBD><D6B8><EFBFBD>û<EFBFBD><C3BB><EFBFBD><EFBFBD>е<EFBFBD>Ŀ¼<C4BF><C2BC>
|
|||
|
Rem
|
|||
|
|
|||
|
Rem <20><><EFBFBD><EFBFBD>Ŀǰ<C4BF><C7B0><EFBFBD>ڰ<EFBFBD>װģʽ<C4A3>У<EFBFBD><D0A3><EFBFBD><EFBFBD>ijɰ<C4B3>װģʽ<C4A3><CABD>
|
|||
|
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\Office95.Key Office95.Tmp
|
|||
|
..\acsr "#__SharedTools#" "%__SharedTools%" Office95.Tmp Office95.Tmp2
|
|||
|
..\acsr "#INSTDIR#" "%O95INST%" Office95.Tmp2 Office95.Tmp3
|
|||
|
..\acsr "#MY_DOCUMENTS#" "%MY_DOCUMENTS%" Office95.Tmp3 Office95.Key
|
|||
|
Del Office95.Tmp >Nul: 2>&1
|
|||
|
Del Office95.Tmp2 >Nul: 2>&1
|
|||
|
Del Office95.Tmp3 >Nul: 2>&1
|
|||
|
regini Office95.key > Nul:
|
|||
|
|
|||
|
Rem <20><><EFBFBD><EFBFBD>ԭʼģʽ<C4A3><CABD>ִ<EFBFBD>У<EFBFBD><D0A3><EFBFBD><EFBFBD>Ļ<EFBFBD>ִ<EFBFBD><D6B4>ģʽ<C4A3><CABD>
|
|||
|
If "%__OrigMode%" == "Exec" Change User /Execute > Nul:
|
|||
|
Set __OrigMode=
|
|||
|
|
|||
|
Rem #########################################################################
|
|||
|
|
|||
|
Rem
|
|||
|
Rem <20><><EFBFBD><EFBFBD> Ofc95Usr.Cmd <20><><EFBFBD><EFBFBD>ӳʵ<D3B3>ʰ<EFBFBD>װĿ¼<C4BF><C2BC>
|
|||
|
Rem <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ӵ<EFBFBD> UsrLogn2.Cmd <20>ű<EFBFBD>
|
|||
|
Rem
|
|||
|
|
|||
|
..\acsr "#INSTDIR#" "%O95INST%" ..\Logon\Template\Ofc95Usr.Cmd ..\Logon\Ofc95Usr.Cmd
|
|||
|
|
|||
|
FindStr /I Ofc95Usr %SystemRoot%\System32\UsrLogn2.Cmd >Nul: 2>&1
|
|||
|
If Not ErrorLevel 1 Goto Skip1
|
|||
|
Echo Call Ofc95Usr.Cmd >> %SystemRoot%\System32\UsrLogn2.Cmd
|
|||
|
:Skip1
|
|||
|
|
|||
|
Rem #########################################################################
|
|||
|
|
|||
|
Echo.
|
|||
|
Echo Ҫ<><D2AA>֤ Office 95 <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>У<EFBFBD><D0A3><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>κ<EFBFBD>
|
|||
|
Echo Office 95 Ӧ<>ó<EFBFBD><C3B3><EFBFBD>֮ǰ<D6AE><C7B0>Ŀǰ<C4BF><C7B0>¼<EFBFBD><C2BC><EFBFBD>û<EFBFBD><C3BB><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
Echo <20><>ע<EFBFBD><D7A2><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>µ<EFBFBD>¼<EFBFBD><C2BC>
|
|||
|
Echo.
|
|||
|
Echo Microsoft Office 95 <20><><EFBFBD>û<EFBFBD>Ӧ<EFBFBD>ó<EFBFBD><C3B3><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ѽ<EFBFBD><D1BD><EFBFBD>
|
|||
|
Pause
|
|||
|
|
|||
|
:Done
|