118 lines
2.7 KiB
Batchfile
118 lines
2.7 KiB
Batchfile
|
@Echo Off
|
|||
|
|
|
|||
|
|
Rem #########################################################################
|
|||
|
|
|
|||
|
|
Rem
|
|||
|
|
Rem ȷ<><C8B7><EFBFBD>Ƿ<EFBFBD> CMD <20><>չ<EFBFBD><D5B9><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
Rem
|
|||
|
|
|
|||
|
|
if "A%cmdextversion%A" == "AA" (
|
|||
|
|
call cmd /e:on /c eudora4.cmd
|
|||
|
|
) else (
|
|||
|
|
goto ExtOK
|
|||
|
|
)
|
|||
|
|
goto Done
|
|||
|
|
|
|||
|
|
:ExtOK
|
|||
|
|
|
|||
|
|
Rem #########################################################################
|
|||
|
|
|
|||
|
|
Rem
|
|||
|
|
Rem ȷ<><C8B7><EFBFBD>Ƿ<EFBFBD> %RootDrive% <20>ѱ<EFBFBD><D1B1><EFBFBD><EFBFBD>ã<EFBFBD><C3A3><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ڸ<EFBFBD><DAB8><EFBFBD><EFBFBD><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 <20><>ע<EFBFBD><D7A2><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>л<EFBFBD><D0BB><EFBFBD> Eudora <20><><EFBFBD><EFBFBD><EFBFBD>й<EFBFBD><D0B9><EFBFBD>
|
|||
|
|
|
|||
|
|
..\ACRegL "%Temp%\EPro4.Cmd" EUDTMP "HKCU\Software\Qualcomm\Eudora\CommandLine" "Current" "STRIPCHAR:1"
|
|||
|
|
|
|||
|
|
If Not ErrorLevel 1 Goto Cont1
|
|||
|
|
Echo.
|
|||
|
|
Echo <20><EFBFBD><DEB7><EFBFBD>ע<EFBFBD><D7A2><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>л<EFBFBD><D0BB><EFBFBD> Eudora Pro 4.0 <20><><EFBFBD><EFBFBD><EFBFBD>й<EFBFBD><D0B9>ߡ<EFBFBD>
|
|||
|
|
Echo ȷ<><C8B7><EFBFBD>Ƿ<EFBFBD> Eudora Pro 4.0 <20>ѱ<EFBFBD><D1B1><EFBFBD>װ<EFBFBD><D7B0><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>и<EFBFBD><D0B8><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ű<EFBFBD><C5B1><EFBFBD>
|
|||
|
|
Echo
|
|||
|
|
Echo.
|
|||
|
|
Pause
|
|||
|
|
Goto Done
|
|||
|
|
|
|||
|
|
:Cont1
|
|||
|
|
Call %Temp%\EPro4.Cmd
|
|||
|
|
Del %Temp%\EPro4.Cmd >Nul: 2>&1
|
|||
|
|
set EudCmd=%EUDTMP:~0,-2%
|
|||
|
|
|
|||
|
|
..\ACRegL "%Temp%\EPro4.Cmd" EUDTMP "HKCU\Software\Qualcomm\Eudora\CommandLine" "Current" "STRIPCHAR:2"
|
|||
|
|
|
|||
|
|
If Not ErrorLevel 1 Goto Cont2
|
|||
|
|
Echo.
|
|||
|
|
Echo <20><EFBFBD><DEB7><EFBFBD>ע<EFBFBD><D7A2><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>л<EFBFBD><D0BB><EFBFBD> Eudora Pro 4.0 <20>İ<EFBFBD>װĿ¼<C4BF><C2BC>
|
|||
|
|
Echo ȷ<><C8B7><EFBFBD>Ƿ<EFBFBD> Eudora Pro 4.0 <20>ѱ<EFBFBD><D1B1><EFBFBD>װ<EFBFBD><D7B0><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>и<EFBFBD><D0B8><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ű<EFBFBD><C5B1><EFBFBD>
|
|||
|
|
Echo
|
|||
|
|
Echo.
|
|||
|
|
Pause
|
|||
|
|
Goto Done
|
|||
|
|
|
|||
|
|
:Cont2
|
|||
|
|
Call %Temp%\EPro4.Cmd
|
|||
|
|
Del %Temp%\EPro4.Cmd >Nul: 2>&1
|
|||
|
|
|
|||
|
|
Set EudoraInstDir=%EUDTMP:~0,-13%
|
|||
|
|
|
|||
|
|
Rem #########################################################################
|
|||
|
|
|
|||
|
|
If Exist "%EudoraInstDir%\descmap.pce" Goto Cont0
|
|||
|
|
Echo.
|
|||
|
|
Echo <20>ڼ<EFBFBD><DABC><EFBFBD>ִ<EFBFBD><D6B4><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ӧ<EFBFBD>ó<EFBFBD><C3B3><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ű<EFBFBD>֮ǰ<D6AE><C7B0><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>һ<EFBFBD><D2BB> Eudora 4.0<EFBFBD><EFBFBD>
|
|||
|
|
Echo <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> Eudora ֮<><EFBFBD><F3A3ACB8><EFBFBD> Eudora Pro <20>ļ<EFBFBD><C4BC><EFBFBD> Eudora Pro <20><><EFBFBD>ݷ<EFBFBD>ʽ<EFBFBD><CABD>Ŀ<EFBFBD><C4BF><EFBFBD><EFBFBD><EFBFBD>ԡ<EFBFBD>
|
|||
|
|
Echo <20><> %RootDrive%\eudora.ini <20><><EFBFBD>ӵ<EFBFBD>Ŀ<EFBFBD><C4BF>֮<EFBFBD><D6AE><EFBFBD><EFBFBD>
|
|||
|
|
Echo <20><>Ϊ:
|
|||
|
|
Echo "%EudoraInstDir%\Eudora.exe" %RootDrive%\eudora.ini
|
|||
|
|
Echo.
|
|||
|
|
Pause
|
|||
|
|
Goto Done
|
|||
|
|
|
|||
|
|
:Cont0
|
|||
|
|
|
|||
|
|
Rem
|
|||
|
|
Rem <20><><EFBFBD><EFBFBD>ע<EFBFBD><D7A2><EFBFBD><EFBFBD><EFBFBD>·<EEBDAB><C2B7>ָ<EFBFBD><D6B8><EFBFBD>û<EFBFBD><C3BB>ض<EFBFBD>
|
|||
|
|
Rem Ŀ¼<C4BF><C2BC>
|
|||
|
|
Rem
|
|||
|
|
|
|||
|
|
Rem <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ǰ<EFBFBD><C7B0><EFBFBD><EFBFBD><EFBFBD>ڰ<EFBFBD>װģʽ<C4A3><CABD><EFBFBD>ı䵽<C4B1><E4B5BD>װģʽ<C4A3><CABD>
|
|||
|
|
Set __OrigMode=Install
|
|||
|
|
ChgUsr /query > Nul:
|
|||
|
|
if Not ErrorLevel 101 Goto Begin
|
|||
|
|
Set __OrigMode=Exec
|
|||
|
|
Change User /Install > Nul:
|
|||
|
|
:Begin
|
|||
|
|
|
|||
|
|
..\acsr "#INSTDIR#" "%EudoraInstDir%" Template\Eudora4.Key Eudora4.tmp
|
|||
|
|
..\acsr "#ROOTDRIVE#" "%RootDrive%" Eudora4.tmp Eudora4.key
|
|||
|
|
|
|||
|
|
regini eudora4.key > Nul:
|
|||
|
|
del eudora4.tmp
|
|||
|
|
del eudora4.key
|
|||
|
|
|
|||
|
|
Rem <20><><EFBFBD><EFBFBD>ԭ<EFBFBD><D4AD><EFBFBD><EFBFBD>ִ<EFBFBD><D6B4>ģʽ<C4A3><CABD><EFBFBD>ı<EFBFBD><C4B1><EFBFBD>ִ<EFBFBD><D6B4>ģʽ<C4A3><CABD>
|
|||
|
|
If "%__OrigMode%" == "Exec" Change User /Execute > Nul:
|
|||
|
|
Set __OrigMode=
|
|||
|
|
|
|||
|
|
Rem <20><><EFBFBD><EFBFBD> descmap.pce <20>Ϸ<EFBFBD><CFB7><EFBFBD>Ȩ<EFBFBD>ޡ<EFBFBD>
|
|||
|
|
cacls "%EudoraInstDir%\descmap.pce" /E /G "Terminal Server User":R >NUL: 2>&1
|
|||
|
|
|
|||
|
|
Rem #########################################################################
|
|||
|
|
|
|||
|
|
Echo.
|
|||
|
|
Echo Ϊ<>˱<EFBFBD>֤ Eudora Pro 4.0 <20><><EFBFBD><EFBFBD>ȷ<EFBFBD><C8B7><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ǰ<EFBFBD><C7B0>¼<EFBFBD>û<EFBFBD>
|
|||
|
|
Echo <20><><EFBFBD><EFBFBD>ע<EFBFBD><D7A2><EFBFBD>Լ<EFBFBD><D4BC><EFBFBD><EFBFBD>µ<EFBFBD>¼<EFBFBD><C2BC>Ȼ<EFBFBD><C8BB><EFBFBD><EFBFBD><EFBFBD><EFBFBD> Eudora Pro 4.0 <20><>
|
|||
|
|
Echo.
|
|||
|
|
Echo Eudora 4.0 <20><><EFBFBD>û<EFBFBD>Ӧ<EFBFBD>ó<EFBFBD><C3B3><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ϡ<EFBFBD>
|
|||
|
|
Pause
|
|||
|
|
|
|||
|
|
:done
|