120 lines
3.2 KiB
Batchfile
120 lines
3.2 KiB
Batchfile
|
@Echo Off
|
|||
|
|
|
|||
|
|
Rem #########################################################################
|
|||
|
|
|
|||
|
|
Rem
|
|||
|
|
Rem CMD <20>g<EFBFBD><67><EFBFBD>@<40>\<5C><><EFBFBD>L<EFBFBD><4C><EFBFBD>ɂȂ<C982><C882>Ă<EFBFBD><C482>邩<EFBFBD>m<EFBFBD>F<EFBFBD><46><EFBFBD>܂<EFBFBD><DC82>B
|
|||
|
|
Rem
|
|||
|
|
|
|||
|
|
if "A%cmdextversion%A" == "AA" (
|
|||
|
|
call cmd /e:on /c eudora4.cmd
|
|||
|
|
) else (
|
|||
|
|
goto ExtOK
|
|||
|
|
)
|
|||
|
|
goto Done
|
|||
|
|
|
|||
|
|
:ExtOK
|
|||
|
|
|
|||
|
|
Rem #########################################################################
|
|||
|
|
|
|||
|
|
Rem
|
|||
|
|
Rem %RootDrive% <20><><EFBFBD>\<5C><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>āA<C481><41><EFBFBD>̃X<CC83>N<EFBFBD><4E><EFBFBD>v<EFBFBD>g<EFBFBD>p<EFBFBD>ɐݒ肳<DD92><E882B3><EFBFBD>Ă<EFBFBD><C482>邩<EFBFBD>m<EFBFBD>F<EFBFBD><46><EFBFBD>܂<EFBFBD><DC82>B
|
|||
|
|
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>W<EFBFBD>X<EFBFBD>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD><EFBFBD> Eudora <20>̃R<CC83>}<7D><><EFBFBD>h <20><><EFBFBD>C<EFBFBD><43><EFBFBD><EFBFBD><EFBFBD>擾<EFBFBD><E693BE><EFBFBD>܂<EFBFBD><DC82>B
|
|||
|
|
|
|||
|
|
..\ACRegL "%Temp%\EPro4.Cmd" EUDTMP "HKCU\Software\Qualcomm\Eudora\CommandLine" "Current" "STRIPCHAR:1"
|
|||
|
|
|
|||
|
|
If Not ErrorLevel 1 Goto Cont1
|
|||
|
|
Echo.
|
|||
|
|
Echo <20><><EFBFBD>W<EFBFBD>X<EFBFBD>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD><EFBFBD> Eudora <20>̃R<CC83>}<7D><><EFBFBD>h <20><><EFBFBD>C<EFBFBD><43><EFBFBD><EFBFBD><EFBFBD>擾<EFBFBD>ł<EFBFBD><C582>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B
|
|||
|
|
Echo Eudora Pro 4.0 <20><><EFBFBD>C<EFBFBD><43><EFBFBD>X<EFBFBD>g<EFBFBD>[<5B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482>邩<EFBFBD>ǂ<EFBFBD><C782><EFBFBD><EFBFBD>m<EFBFBD>F<EFBFBD><46><EFBFBD>Ă<EFBFBD><C482><EFBFBD><EFBFBD>A<EFBFBD><41><EFBFBD>̃X<CC83>N<EFBFBD><4E><EFBFBD>v<EFBFBD>g<EFBFBD><67>
|
|||
|
|
Echo <20>Ď<EFBFBD><C48E>s<EFBFBD><73><EFBFBD>Ă<EFBFBD><C482><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>B
|
|||
|
|
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>W<EFBFBD>X<EFBFBD>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD><EFBFBD> Eudora Pro 4.0 <20>C<EFBFBD><43><EFBFBD>X<EFBFBD>g<EFBFBD>[<5B><> <20>f<EFBFBD>B<EFBFBD><42><EFBFBD>N<EFBFBD>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD>擾<EFBFBD>ł<EFBFBD><C582>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B
|
|||
|
|
Echo Eudora Pro 4.0 <20><><EFBFBD>C<EFBFBD><43><EFBFBD>X<EFBFBD>g<EFBFBD>[<5B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482>邱<EFBFBD>Ƃ<EFBFBD><C682>m<EFBFBD>F<EFBFBD><46><EFBFBD>Ă<EFBFBD><C482>̃X<CC83>N<EFBFBD><4E><EFBFBD>v<EFBFBD>g<EFBFBD><67>
|
|||
|
|
Echo <20>Ď<EFBFBD><C48E>s<EFBFBD><73><EFBFBD>Ă<EFBFBD><C482><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>B
|
|||
|
|
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>̃A<CC83>v<EFBFBD><76><EFBFBD>P<EFBFBD>[<5B>V<EFBFBD><56><EFBFBD><EFBFBD><EFBFBD>݊<EFBFBD><DD8A><EFBFBD><EFBFBD>X<EFBFBD>N<EFBFBD><4E><EFBFBD>v<EFBFBD>g<EFBFBD>s<F091B18D><73><EFBFBD><EFBFBD><EFBFBD>O<EFBFBD><4F> Eudora 4.0 <20><><EFBFBD><EFBFBD><EFBFBD>s<EFBFBD><73><EFBFBD><EFBFBD>
|
|||
|
|
Echo <20><><EFBFBD><EFBFBD><EFBFBD>Ȃ<CE82><C882>܂<EFBFBD><DC82><EFBFBD><EFBFBD>BEudora <20>̎<EFBFBD><CC8E>s<EFBFBD><73><EFBFBD>A<EFBFBD>X<EFBFBD>^<5E>[<5B>g <20><><EFBFBD>j<EFBFBD><6A><EFBFBD>[<5B><> Eudora Pro <20>t<EFBFBD>H<EFBFBD><48><EFBFBD>_
|
|||
|
|
Echo <20>ɂ<EFBFBD><C982><EFBFBD> Eudora Pro <20>̃V<CC83><56><EFBFBD>[<5B>g <20>J<EFBFBD>b<EFBFBD>g<EFBFBD>̃v<CC83><76><EFBFBD>p<EFBFBD>e<EFBFBD>B<EFBFBD><42><EFBFBD>J<EFBFBD><4A><EFBFBD>A<EFBFBD><41><EFBFBD><EFBFBD><EFBFBD>N<EFBFBD><4E><EFBFBD><EFBFBD>
|
|||
|
|
Echo %RootDrive%\eudora.ini
|
|||
|
|
Echo <20><><EFBFBD>lj<EFBFBD><C789><EFBFBD><EFBFBD>Ă<EFBFBD><C482><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD>N<EFBFBD><4E><EFBFBD>͎<EFBFBD><CD8E>̂悤<CC82>ɂȂ<C982><C882>܂<EFBFBD>:
|
|||
|
|
Echo "%EudoraInstDir%\Eudora.exe" %RootDrive%\eudora.ini
|
|||
|
|
Echo.
|
|||
|
|
Pause
|
|||
|
|
Goto Done
|
|||
|
|
|
|||
|
|
:Cont0
|
|||
|
|
|
|||
|
|
Rem
|
|||
|
|
Rem <20><><EFBFBD>W<EFBFBD>X<EFBFBD>g<EFBFBD><67> <20>L<EFBFBD>[<5B><><EFBFBD>ύX<CF8D><58><EFBFBD>āA<C481>p<EFBFBD>X<EFBFBD><58><EFBFBD><EFBFBD><EFBFBD>[<5B>U<EFBFBD>[<5B>ŗL<C597>̃f<CC83>B<EFBFBD><42><EFBFBD>N<EFBFBD>g<EFBFBD><67>
|
|||
|
|
Rem <20><><EFBFBD>w<EFBFBD><77><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>悤<EFBFBD>ɂ<EFBFBD><C982>܂<EFBFBD><DC82>B
|
|||
|
|
Rem
|
|||
|
|
|
|||
|
|
Rem <20><><EFBFBD>݁A<DD81>C<EFBFBD><43><EFBFBD>X<EFBFBD>g<EFBFBD>[<5B><> <20><><EFBFBD>[<5B>h<EFBFBD>łȂ<C582><C882>ꍇ<EFBFBD>A<EFBFBD>C<EFBFBD><43><EFBFBD>X<EFBFBD>g<EFBFBD>[<5B><> <20><><EFBFBD>[<5B>h<EFBFBD>ɕύX<CF8D><58><EFBFBD>܂<EFBFBD><DC82>B
|
|||
|
|
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><CC83>[<5B>h<EFBFBD><68><EFBFBD><EFBFBD><EFBFBD>s<EFBFBD><73><EFBFBD>[<5B>h<EFBFBD><68><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ꍇ<EFBFBD>A<EFBFBD><41><EFBFBD>s<EFBFBD><73><EFBFBD>[<5B>h<EFBFBD>ɖ߂<C996><DF82>܂<EFBFBD><DC82>B
|
|||
|
|
If "%__OrigMode%" == "Exec" Change User /Execute > Nul:
|
|||
|
|
Set __OrigMode=
|
|||
|
|
|
|||
|
|
Rem descmap.pce <20>̃A<CC83>N<EFBFBD>Z<EFBFBD>X<EFBFBD><58><EFBFBD><EFBFBD><C282>X<EFBFBD>V<EFBFBD><56><EFBFBD>܂<EFBFBD><DC82>B
|
|||
|
|
cacls "%EudoraInstDir%\descmap.pce" /E /G "Terminal Server User":R >NUL: 2>&1
|
|||
|
|
|
|||
|
|
Rem #########################################################################
|
|||
|
|
|
|||
|
|
Echo.
|
|||
|
|
Echo Eudora Pro 4.0 <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɍ쓮<C98D><EC93AE><EFBFBD><EFBFBD><EFBFBD>ɂ́A<CD81><41><EFBFBD>݃<EFBFBD><DD83>O<EFBFBD>I<EFBFBD><49><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482><EFBFBD>
|
|||
|
|
Echo <20><><EFBFBD>[<5B>U<EFBFBD>[<5B>̓A<CD83>v<EFBFBD><76><EFBFBD>P<EFBFBD>[<5B>V<EFBFBD><56><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>s<EFBFBD><73><EFBFBD><EFBFBD><EFBFBD>O<EFBFBD>ɁA<C981><41><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>O<F1838D83>I<EFBFBD>t<EFBFBD><74><EFBFBD><EFBFBD>
|
|||
|
|
Echo <20><><EFBFBD><EFBFBD><EFBFBD>ēx<C493><78><EFBFBD>O<EFBFBD>I<EFBFBD><49><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>K<EFBFBD>v<EFBFBD><76><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B
|
|||
|
|
Echo.
|
|||
|
|
Echo Eudora 4.0 <20>̃}<7D><><EFBFBD>`<60><><EFBFBD>[<5B>U<EFBFBD>[ <20>A<EFBFBD>v<EFBFBD><76><EFBFBD>P<EFBFBD>[<5B>V<EFBFBD><56><EFBFBD><EFBFBD><EFBFBD><EFBFBD><C28B>ݒ肪<DD92><E882AA><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B
|
|||
|
|
Pause
|
|||
|
|
|
|||
|
|
:done
|