128 lines
4 KiB
Batchfile
128 lines
4 KiB
Batchfile
|
@Echo Off
|
|||
|
|
|||
|
Rem #########################################################################
|
|||
|
|
|||
|
Rem
|
|||
|
Rem %RootDrive%<25><> <20><><EFBFBD><EFBFBD><EFBFBD>Ǿ<EFBFBD><C7BE><EFBFBD><EFBFBD><EFBFBD> Ȯ<><C8AE><EFBFBD>ϰ<EFBFBD> <20><> <20><>ũ<EFBFBD><C5A9>Ʈ<EFBFBD><C6AE> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>մϴ<D5B4>.
|
|||
|
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><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>ø<EFBFBD><C3B8><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>ø<EFBFBD> <20><>ġ<EFBFBD><C4A1> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>մϴ<D5B4>.
|
|||
|
Rem
|
|||
|
|
|||
|
If Not Exist "%ALLUSERSPROFILE%\%TEMPLATES%\EXCEL8.XLS" copy "%UserProfile%\%TEMPLATES%\EXCEL8.XLS" "%ALLUSERSPROFILE%\%TEMPLATES%\" /Y >Nul: 2>&1
|
|||
|
|
|||
|
|
|||
|
Rem #########################################################################
|
|||
|
|
|||
|
Rem
|
|||
|
Rem <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ʈ<EFBFBD><C6AE><EFBFBD><EFBFBD><EFBFBD><EFBFBD> Excel 97 <20><>ġ <20><>ġ<EFBFBD><C4A1> <20><><EFBFBD><EFBFBD><EFBFBD>ϴ<EFBFBD>. <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>,
|
|||
|
Rem Office<63><65> <20><>ġ<EFBFBD>Ǿ<EFBFBD> <20><><EFBFBD><EFBFBD> <20>ʴ<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>ϰ<EFBFBD> <20><><EFBFBD><EFBFBD> <20><EFBFBD><DEBD><EFBFBD><EFBFBD><EFBFBD> ǥ<><C7A5><EFBFBD>մϴ<D5B4>.
|
|||
|
Rem
|
|||
|
|
|||
|
..\ACRegL %Temp%\O97.Cmd O97INST "HKLM\Software\Microsoft\Office\8.0" "BinDirPath" "STRIPCHAR\1"
|
|||
|
If Not ErrorLevel 1 Goto Cont0
|
|||
|
Echo.
|
|||
|
Echo <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ʈ<EFBFBD><C6AE><EFBFBD><EFBFBD><EFBFBD><EFBFBD> Excel 97 <20><>ġ <20><>ġ<EFBFBD><C4A1> <20>˻<EFBFBD><CBBB><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>߽<EFBFBD><DFBD>ϴ<EFBFBD>.
|
|||
|
Echo Excel 97<39><37> <20><>ġ<EFBFBD>Ǿ<EFBFBD> <20>ִ<EFBFBD><D6B4><EFBFBD> Ȯ<><C8AE><EFBFBD>ϰ<EFBFBD> <20><> <20><>ũ<EFBFBD><C5A9>Ʈ<EFBFBD><C6AE>
|
|||
|
Echo <20>ٽ<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>Ͻʽÿ<CABD>.
|
|||
|
Echo.
|
|||
|
Pause
|
|||
|
Goto Done
|
|||
|
|
|||
|
:Cont0
|
|||
|
Call %Temp%\O97.Cmd
|
|||
|
Del %Temp%\O97.Cmd >Nul: 2>&1
|
|||
|
|
|||
|
Rem #########################################################################
|
|||
|
|
|||
|
Rem
|
|||
|
Rem <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>ڿ<EFBFBD> <20><><EFBFBD><EFBFBD> [<5B><><EFBFBD><EFBFBD>] <20><EFBFBD><DEB4><EFBFBD><EFBFBD><EFBFBD> [<5B><><EFBFBD><EFBFBD> ã<><C3A3>]<5D><> <20><><EFBFBD><EFBFBD><EFBFBD>մϴ<D5B4>. [<5B><><EFBFBD><EFBFBD> ã<><C3A3>]<5D><>
|
|||
|
Rem <20><><EFBFBD>ҽ<EFBFBD><D2BD><EFBFBD> <20><><EFBFBD><EFBFBD> <20>ʿ<EFBFBD><CABF>ϹǷ<CFB9> <20>ý<EFBFBD><C3BD><EFBFBD> <20><><EFBFBD>ɿ<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>ݴϴ<DDB4>.
|
|||
|
Rem
|
|||
|
|
|||
|
If Exist "%COMMON_STARTUP%\Microsoft Find Fast.lnk" Del "%COMMON_STARTUP%\Microsoft Find Fast.lnk" >Nul: 2>&1
|
|||
|
|
|||
|
Rem #########################################################################
|
|||
|
|
|||
|
Rem
|
|||
|
Rem Powerpoint <20><> Excel <20>߰<EFBFBD> <20><><EFBFBD>ɿ<EFBFBD> <20>ʿ<EFBFBD><CABF><EFBFBD> MsForms.Twd <20><> RefEdit.Twd <20><><EFBFBD><EFBFBD>
|
|||
|
Rem (<28><><EFBFBD><EFBFBD>/HTML<4D><4C> <20><><EFBFBD><EFBFBD>, <20><>)<29><> <20><><EFBFBD><EFBFBD><EFBFBD>ϴ<EFBFBD>. <20><> <20><> <20>ϳ<EFBFBD><CFB3><EFBFBD> <20><><EFBFBD>α<CEB1><D7B7><EFBFBD>
|
|||
|
Rem <20><><EFBFBD><EFBFBD><EFBFBD>Ǹ<EFBFBD> <20><> <20><><EFBFBD>α<CEB1><D7B7><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>ʿ<EFBFBD><CABF><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>Ͱ<EFBFBD> <20><><EFBFBD><EFBFBD> <20>ִ<EFBFBD>
|
|||
|
Rem <20><><EFBFBD>Ϸ<EFBFBD> <20>ٲߴϴ<DFB4>.
|
|||
|
Rem
|
|||
|
|
|||
|
If Exist %systemroot%\system32\MsForms.Twd Goto Cont2
|
|||
|
Copy Nul: %systemroot%\system32\MsForms.Twd >Nul: 2>&1
|
|||
|
Cacls %systemroot%\system32\MsForms.Twd /E /P "Authenticated Users":F >Nul: 2>&1
|
|||
|
:Cont2
|
|||
|
|
|||
|
If Exist %systemroot%\system32\RefEdit.Twd Goto Cont3
|
|||
|
Copy Nul: %systemroot%\system32\RefEdit.Twd >Nul: 2>&1
|
|||
|
Cacls %systemroot%\system32\RefEdit.Twd /E /P "Authenticated Users":F >Nul: 2>&1
|
|||
|
:Cont3
|
|||
|
|
|||
|
Rem #########################################################################
|
|||
|
|
|||
|
Rem
|
|||
|
Rem <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ʈ<EFBFBD><C6AE> Ű<><C5B0> <20><><EFBFBD><EFBFBD><EFBFBD>Ͽ<EFBFBD> <20><><EFBFBD>ΰ<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
Rem <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><CDB8><EFBFBD> <20><><EFBFBD><EFBFBD>Ű<EFBFBD><C5B0><EFBFBD><EFBFBD> <20>մϴ<D5B4>.
|
|||
|
Rem
|
|||
|
|
|||
|
Rem <20><><EFBFBD><EFBFBD> <20><>ġ <20><><EFBFBD>忡 <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><>ġ <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>մϴ<D5B4>.
|
|||
|
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\MsExcl97.Key MsExcl97.Tmp
|
|||
|
..\acsr "#__SharedTools#" "%__SharedTools%" MsExcl97.Tmp MsExcl97.Tmp2
|
|||
|
..\acsr "#INSTDIR#" "%O97INST%" MsExcl97.Tmp2 MsExcl97.Tmp3
|
|||
|
..\acsr "#MY_DOCUMENTS#" "%MY_DOCUMENTS%" MsExcl97.Tmp3 MsExcl97.key
|
|||
|
Del MsExcl97.Tmp >Nul: 2>&1
|
|||
|
Del MsExcl97.Tmp2 >Nul: 2>&1
|
|||
|
Del MsExcl97.Tmp3 >Nul: 2>&1
|
|||
|
|
|||
|
regini MsExcl97.key > Nul:
|
|||
|
|
|||
|
Rem <20><><EFBFBD><EFBFBD> <20><><EFBFBD>尡 <20><><EFBFBD><EFBFBD> <20><><EFBFBD>忴<EFBFBD><E5BFB4><EFBFBD><EFBFBD>, <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>ٽ<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>մϴ<D5B4>.
|
|||
|
If "%__OrigMode%" == "Exec" Change User /Execute > Nul:
|
|||
|
Set __OrigMode=
|
|||
|
|
|||
|
Rem #########################################################################
|
|||
|
|
|||
|
Rem
|
|||
|
Rem Exl97Usr.Cmd<6D><64> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ʈ<EFBFBD>Ͽ<EFBFBD> <20><><EFBFBD><EFBFBD> <20><>ġ <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><CDB8><EFBFBD> <20>ݿ<EFBFBD><DDBF>ϰ<EFBFBD> <20≯<EFBFBD>
|
|||
|
Rem UsrLogn2.Cmd <20><>ũ<EFBFBD><C5A9>Ʈ<EFBFBD><C6AE> <20>߰<EFBFBD><DFB0>մϴ<D5B4>.
|
|||
|
Rem
|
|||
|
|
|||
|
..\acsr "#INSTDIR#" "%O97INST%" ..\Logon\Template\Exl97Usr.Cmd ..\Logon\Exl97Usr.Cmd
|
|||
|
|
|||
|
FindStr /I Exl97Usr %SystemRoot%\System32\UsrLogn2.Cmd >Nul: 2>&1
|
|||
|
If Not ErrorLevel 1 Goto Skip1
|
|||
|
Echo Call Exl97Usr.Cmd >> %SystemRoot%\System32\UsrLogn2.Cmd
|
|||
|
:Skip1
|
|||
|
|
|||
|
Echo.
|
|||
|
Echo MS Excel 97<39><37> <20>ùٸ<C3B9><D9B8><EFBFBD> <20>۾<EFBFBD><DBBE>ϱ<EFBFBD> <20><><EFBFBD><EFBFBD>
|
|||
|
Echo <20><><EFBFBD><EFBFBD> <20>αµǾ<C2B5> <20>ִ<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>ڰ<EFBFBD> <20>α<CEB1><D7BF><EFBFBD><EFBFBD>ϰ<EFBFBD> <20>ٽ<EFBFBD> <20>α<CEB1><D7BF><EFBFBD> <20><>
|
|||
|
Echo <20><><EFBFBD><EFBFBD> <20><><EFBFBD>α<CEB1><D7B7><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>ؾ<EFBFBD> <20>մϴ<D5B4>.
|
|||
|
Echo.
|
|||
|
Echo Microsoft Excel 97 <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD>α<CEB1> <20><><EFBFBD><EFBFBD> <20>Ϸ<EFBFBD>
|
|||
|
Pause
|
|||
|
|
|||
|
:Done
|