windows-nt/Source/XPSP1/NT/termsrv/admtools/appcmpt/cht/netcom40.cmd

199 lines
6.3 KiB
Batchfile
Raw Permalink Normal View History

2020-09-26 03:20:57 -05:00
@Echo Off
Rem #########################################################################
Rem
Rem <20>ˬd CMD Extensions <20>O<EFBFBD>_<EFBFBD>w<EFBFBD>ҥΡC
Rem
if "A%cmdextversion%A" == "AA" (
call cmd /e:on /c netcom40.cmd
) else (
goto ExtOK
)
goto Done
:ExtOK
Rem #########################################################################
Rem
Rem <20>ˬd %RootDrive% <20>O<EFBFBD>_<EFBFBD>w<EFBFBD>]<5D>w<EFBFBD>A<EFBFBD>ñN<C3B1><4E><EFBFBD>]<5D>w<EFBFBD><77><EFBFBD><EFBFBD><EFBFBD>O<EFBFBD>ɡC
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>o NetScape <20><><EFBFBD><EFBFBD> (4.5x <20>M 4.0x <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><E8A6A1><EFBFBD>P)
Rem
..\ACRegL "%Temp%\NS4VER.Cmd" NS4VER "HKLM\Software\Netscape\Netscape Navigator" "CurrentVersion" "STRIPCHAR(1"
If Not ErrorLevel 1 Goto Cont0
Echo.
Echo <20>L<EFBFBD>k<EFBFBD>q<EFBFBD>n<EFBFBD><6E><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> Netscape Communicator 4 <20><><EFBFBD><EFBFBD><EFBFBD>C
Echo <20>нT<D0BD>{ Communicator <20>O<EFBFBD>_<EFBFBD>w<EFBFBD>w<EFBFBD>ˡA<CBA1>M<EFBFBD><EFBFBD>s<EFBFBD><73><EFBFBD><EFBFBD>
Echo <20>o<EFBFBD>ӫ<EFBFBD><D3AB>O<EFBFBD>ɡC
Echo.
Pause
Goto Done
:Cont0
Call "%Temp%\NS4VER.Cmd"
Del "%Temp%\NS4VER.Cmd" >Nul: 2>&1
if /i "%NS4VER%" LSS "4.5 " goto NS40x
Rem #########################################################################
Rem Netscape 4.5x
Rem
Rem <20>q<EFBFBD>n<EFBFBD><6E><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>o Netscape Communicator 4.5 <20>w<EFBFBD>˦<EFBFBD><CBA6>m<EFBFBD>C
Rem <20>p<EFBFBD>G<EFBFBD><EFBFBD><E4A4A3><EFBFBD>A<EFBFBD>N<EFBFBD><4E><EFBFBD>] Communicator 4.5 <20>å<EFBFBD><C3A5>w<EFBFBD>˨<EFBFBD><CBA8><EFBFBD><EFBFBD>ܿ<EFBFBD><DCBF>~<7E>T<EFBFBD><54><EFBFBD>C
Rem
..\ACRegL "%Temp%\NS45.Cmd" NS40INST "HKCU\Software\Netscape\Netscape Navigator\Main" "Install Directory" "Stripchar\1"
If Not ErrorLevel 1 Goto Cont1
Echo.
Echo <20>L<EFBFBD>k<EFBFBD>q<EFBFBD>n<EFBFBD><6E><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> Netscape Communicator 4.5 <20><><EFBFBD>w<EFBFBD>˦<EFBFBD>
Echo <20>m<EFBFBD>C<EFBFBD>нT<D0BD>{ Communicator <20>O<EFBFBD>_<EFBFBD>w<EFBFBD>w<EFBFBD>ˡA<CBA1>M<EFBFBD><EFBFBD>s<EFBFBD><73><EFBFBD><EFBFBD><EFBFBD>o
Echo <20>ӫ<EFBFBD><D3AB>O<EFBFBD>ɡC
Echo.
Pause
Goto Done
:Cont1
Call "%Temp%\NS45.Cmd"
Del "%Temp%\NS45.Cmd" >Nul: 2>&1
Rem #########################################################################
Rem
Rem Update Com40Usr.Cmd to reflect the default NetScape Users directory and
Rem add it to the UsrLogn2.Cmd script
Rem
..\acsr "#NSUSERDIR#" "%ProgramFiles%\Netscape\Users" ..\Logon\Template\Com40Usr.Cmd ..\Logon\Com40Usr.tmp
..\acsr "#NS40INST#" "%NS40INST%" ..\Logon\Com40Usr.tmp ..\Logon\Com40Usr.tm2
..\acsr "#NS4VER#" "4.5x" ..\Logon\Com40Usr.tm2 ..\Logon\Com40Usr.Cmd
Rem #########################################################################
Rem
Rem <20>N [<5B>ֳt<D6B3>Ұ<EFBFBD>] <20>ϥܽƻs<C6BB><73> netscape <20>w<EFBFBD>˥ؿ<CBA5><D8BF>A
Rem <20><><EFBFBD>{<7B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>N<EFBFBD><4E><EFBFBD>̽ƻs<C6BB><73><EFBFBD>ϥΪ̳]<5D>w<EFBFBD>ɥؿ<C9A5><D8BF>C
Rem
If Exist "%UserProfile%\%App_Data%\Microsoft\Internet Explorer\Quick Launch\Netscape Composer.lnk" copy "%UserProfile%\%App_Data%\Microsoft\Internet Explorer\Quick Launch\Netscape Composer.lnk" "%NS40INST%"
If Exist "%UserProfile%\%App_Data%\Microsoft\Internet Explorer\Quick Launch\Netscape Messenger.lnk" copy "%UserProfile%\%App_Data%\Microsoft\Internet Explorer\Quick Launch\Netscape Messenger.lnk" "%NS40INST%"
If Exist "%UserProfile%\%App_Data%\Microsoft\Internet Explorer\Quick Launch\Netscape Navigator.lnk" copy "%UserProfile%\%App_Data%\Microsoft\Internet Explorer\Quick Launch\Netscape Navigator.lnk" "%NS40INST%"
goto DoUsrLogn
:NS40x
Rem #########################################################################
Rem Netscape 4.0x
Rem
Rem <20>q<EFBFBD>n<EFBFBD><6E><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>o Netscape Communicator 4 <20>w<EFBFBD>˦<EFBFBD><CBA6>m<EFBFBD>C
Rem <20>p<EFBFBD>G<EFBFBD><EFBFBD><E4A4A3><EFBFBD>A<EFBFBD>N<EFBFBD><4E><EFBFBD>] Communicator 4.5 <20>å<EFBFBD><C3A5>w<EFBFBD>˨<EFBFBD><CBA8><EFBFBD><EFBFBD>ܿ<EFBFBD><DCBF>~<7E>T<EFBFBD><54><EFBFBD>C
Rem
..\ACRegL "%Temp%\NS40.Cmd" NS40INST "HKCU\Software\Netscape\Netscape Navigator\Main" "Install Directory" ""
If Not ErrorLevel 1 Goto Cont2
Echo.
Echo <20>L<EFBFBD>k<EFBFBD>q<EFBFBD>n<EFBFBD><6E><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> Netscape Communicator 4 <20>w<EFBFBD>˦<EFBFBD><CBA6>m<EFBFBD>C
Echo <20><><EFBFBD>ˬd Communicator <20>O<EFBFBD>_<EFBFBD>w<EFBFBD>g<EFBFBD>w<EFBFBD>ˡA<CBA1>í<EFBFBD><C3AD>s<EFBFBD><73><EFBFBD><EFBFBD><EFBFBD>o<EFBFBD>ӫ<EFBFBD><D3AB>O<EFBFBD>ɡC
Echo.
Pause
Goto Done
:Cont2
Call "%Temp%\NS40.Cmd"
Del "%Temp%\NS40.Cmd" >Nul: 2>&1
Rem #########################################################################
Rem
Rem <20>N<EFBFBD>w<EFBFBD>]<5D><><EFBFBD>]<5D>w<EFBFBD>ɽƻs<C6BB><73><EFBFBD>t<EFBFBD>κ޲z<DEB2><7A><EFBFBD><EFBFBD><EFBFBD>D<EFBFBD>ؿ<EFBFBD><D8BF>C
Rem <20>o<EFBFBD>ӳ]<5D>w<EFBFBD>ɷ|<7C>b<EFBFBD>ϥΪ̵n<CCB5>J<EFBFBD>ɳQ<C9B3>ƻs<C6BB><73><EFBFBD>ϥΪ̥D<CCA5>ؿ<EFBFBD><D8BF><EFBFBD><EFBFBD>C
Rem <20>p<EFBFBD>G<EFBFBD>q<EFBFBD>Ϊ<EFBFBD><CEAA>w<EFBFBD>]<5D>]<5D>w<EFBFBD>ɤw<C9A4>g<EFBFBD>s<EFBFBD>b<EFBFBD>A<EFBFBD>Ф<EFBFBD><D0A4>n<EFBFBD>мg<D0BC><67><EFBFBD>C
Rem <20>_<EFBFBD>h Admin <20>i<EFBFBD>H<EFBFBD>b<EFBFBD>y<EFBFBD>԰<EFBFBD><D4B0><EFBFBD><EFBFBD>o<EFBFBD>ӫ<EFBFBD><D3AB>O<EFBFBD>ɡA<C9A1>ñN<C3B1>Ҧ<EFBFBD>
Rem <20>L<EFBFBD><4C><EFBFBD>ӤH<D3A4><48><EFBFBD>T<EFBFBD><54><EFBFBD><EFBFBD><EFBFBD>q<EFBFBD>ιw<CEB9>]<5D>]<5D>w<EFBFBD>ɡC
Rem
If Exist %RootDrive%\NS40 Goto Cont3
Echo.
Echo <20>b %RootDrive%\NS40 <20><><EFBFBD><EFBFBD><E4A4A3><EFBFBD>w<EFBFBD>]<5D>]<5D>w<EFBFBD>ɡC<C9A1>а<EFBFBD><D0B0><EFBFBD>
Echo [<5B>ϥΪ̳]<5D>w<EFBFBD>ɺ޲z<DEB2><7A>]<5D>A<EFBFBD>ëإߤ@<40>ӦW<D3A6>٬<EFBFBD> "Default"
Echo <20><><EFBFBD><EFBFBD><EFBFBD>@<40>]<5D>w<EFBFBD>ɡC<C9A1><43><EFBFBD><EFBFBD><EFBFBD>ܿ<EFBFBD><DCBF>J<EFBFBD>]<5D>w<EFBFBD>ɸ<EFBFBD><C9B8>|<EFBFBD>ɡA<EFBFBD>ШϥΤW<EFBFBD><EFBFBD>
Echo <20><><EFBFBD><EFBFBD><EFBFBD>ܪ<EFBFBD><DCAA><EFBFBD><EFBFBD>|<EFBFBD>C<EFBFBD>бN<EFBFBD>Ҧ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>W<EFBFBD>٤ιq<EFBFBD>l<EFBFBD>l<EFBFBD><EFBFBD><EFBFBD>W<EFBFBD>ٶ<EFBFBD><EFBFBD>ثO<EFBFBD>d
Echo <20>ťաC<D5A1>p<EFBFBD>G<EFBFBD><47><EFBFBD><EFBFBD><EFBFBD>L<EFBFBD>]<5D>w<EFBFBD>ɦs<C9A6>b<EFBFBD>A<EFBFBD>ЧR<D0A7><52><EFBFBD><EFBFBD><EFBFBD>̡C<CCA1>b<EFBFBD>z<EFBFBD><7A><EFBFBD><EFBFBD><EFBFBD>o
Echo <20>ǨB<C7A8>J<EFBFBD><4A><EFBFBD>A<EFBFBD>Э<EFBFBD><D0AD>s<EFBFBD><73><EFBFBD><EFBFBD><EFBFBD>o<EFBFBD>ӫ<EFBFBD><D3AB>O<EFBFBD>ɡC
Echo.
Pause
Goto Done
:Cont3
If Exist "%NS40INST%\DfltProf" Goto Cont4
Xcopy "%RootDrive%\NS40" "%NS40INST%\DfltProf" /E /I /K >NUL: 2>&1
:Cont4
Rem #########################################################################
Rem
Rem <20>q [<5B>}<7D>l] <20>\<5C><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>|<7C><> [<5B>ϥΪ̳]<5D>w<EFBFBD>ɺ޲z<DEB2><7A>] <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ϥΪ̪<CEAA>
Rem Ū<><C5AA><EFBFBD>v<EFBFBD><76><EFBFBD>A<EFBFBD>o<EFBFBD>|<7C><><EFBFBD><EFBFBD><EFBFBD>@<40><><EFBFBD>ϥΪ̷s<CCB7>W<EFBFBD>ϥΪ̳]<5D>w<EFBFBD>ɡC
Rem <20>t<EFBFBD>κ޲z<DEB2><7A><EFBFBD><EFBFBD><EFBFBD>M<EFBFBD>i<EFBFBD>H<EFBFBD><48><EFBFBD><EFBFBD><EFBFBD>ϥΪ̳]<5D>w<EFBFBD>ɺ޲z<DEB2><7A><EFBFBD>C
Rem
If Not Exist "%COMMON_PROGRAMS%\Netscape Communicator\Utilities\User Profile Manager.Lnk" Goto Cont5
Cacls "%COMMON_PROGRAMS%\Netscape Communicator\Utilities\User Profile Manager.Lnk" /E /R "Authenticated Users" >Nul: 2>&1
Cacls "%COMMON_PROGRAMS%\Netscape Communicator\Utilities\User Profile Manager.Lnk" /E /R "Users" >Nul: 2>&1
Cacls "%COMMON_PROGRAMS%\Netscape Communicator\Utilities\User Profile Manager.Lnk" /E /R "Everyone" >Nul: 2>&1
:Cont5
If Not Exist "%COMMON_PROGRAMS%\Netscape Communicator Professional Edition\Utilities\User Profile Manager.Lnk" Goto Cont6
Cacls "%COMMON_PROGRAMS%\Netscape Communicator Professional Edition\Utilities\User Profile Manager.Lnk" /E /R "Authenticated Users" >Nul: 2>&1
Cacls "%COMMON_PROGRAMS%\Netscape Communicator Professional Edition\Utilities\User Profile Manager.Lnk" /E /R "Users" >Nul: 2>&1
Cacls "%COMMON_PROGRAMS%\Netscape Communicator Professional Edition\Utilities\User Profile Manager.Lnk" /E /R "Everyone" >Nul: 2>&1
:Cont6
Rem #########################################################################
Rem
Rem <20><><EFBFBD>s Com40Usr.Cmd <20>ӤϬM<CFAC><4D><EFBFBD>ڪ<EFBFBD><DAAA>w<EFBFBD>˥ؿ<CBA5><D8BF><EFBFBD>
Rem <20>N<EFBFBD><4E><EFBFBD>s<EFBFBD>W<EFBFBD><57> UsrLogn2.Cmd <20><><EFBFBD>O<EFBFBD>ɤ<EFBFBD><C9A4>C
Rem
..\acsr "#PROFDIR#" "%NS40INST%\DfltProf" ..\Logon\Template\Com40Usr.Cmd ..\Logon\Com40Usr.tmp
..\acsr "#NS4VER#" "4.0x" ..\Logon\Com40Usr.tmp ..\Logon\Com40Usr.Cmd
:DoUsrLogn
del ..\Logon\Com40Usr.tmp >Nul: 2>&1
del ..\Logon\Com40Usr.tm2 >Nul: 2>&1
FindStr /I Com40Usr %SystemRoot%\System32\UsrLogn2.Cmd >Nul: 2>&1
If Not ErrorLevel 1 Goto Skip1
Echo Call Com40Usr.Cmd >> %SystemRoot%\System32\UsrLogn2.Cmd
:Skip1
Echo.
Echo <20><><EFBFBD>F<EFBFBD><46><EFBFBD><EFBFBD> Netscape Communicator <20><><EFBFBD>T<EFBFBD>ާ@<40>A<EFBFBD>ثe
Echo <20>w<EFBFBD>n<EFBFBD>J<EFBFBD><4A><EFBFBD>ϥΪ̥<CEAA><CCA5><EFBFBD><EFBFBD><EFBFBD><EFBFBD>n<EFBFBD>X<EFBFBD>A<EFBFBD>A<EFBFBD><41><EFBFBD>s<EFBFBD>n<EFBFBD>J<EFBFBD>A<EFBFBD>~<7E><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
Echo <20><><EFBFBD>ε{<7B><><EFBFBD>C
Echo.
Echo Netscape Communicator 4 <20>h<EFBFBD>ϥΪ<CFA5><CEAA><EFBFBD><EFBFBD>ε{<7B><><EFBFBD>վ<EFBFBD><D5BE>B<EFBFBD>z<EFBFBD><7A><EFBFBD><EFBFBD>
Pause
:done