75 lines
1.9 KiB
Batchfile
75 lines
1.9 KiB
Batchfile
|
@Echo Off
|
|||
|
|
|||
|
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 #########################################################################
|
|||
|
|
|||
|
..\ACRegL "%Temp%\PB6.Cmd" PB6INST "HKCU\Software\ODBC\ODBC.INI\Powersoft Demo DB V6" "DataBaseFile" "STRIPCHAR\1"
|
|||
|
If Not ErrorLevel 1 Goto Cont0
|
|||
|
Echo.
|
|||
|
Echo <20><EFBFBD><DEB7><EFBFBD>ע<EFBFBD><D7A2><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>л<EFBFBD><D0BB><EFBFBD> PowerBuilder 6.0 <20><>װλ<D7B0>á<EFBFBD>
|
|||
|
Echo ȷ<><C8B7><EFBFBD>Ƿ<EFBFBD> PowerBuilder 6.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
|
|||
|
|
|||
|
:Cont0
|
|||
|
Call "%Temp%\PB6.Cmd"
|
|||
|
Del "%Temp%\PB6.Cmd" >Nul: 2>&1
|
|||
|
|
|||
|
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 "#ROOTDRIVE#" "%RootDrive%" Template\pwrbldr6.Key pwrbldr6.key
|
|||
|
|
|||
|
regini pwrbldr6.key > Nul:
|
|||
|
|
|||
|
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 #########################################################################
|
|||
|
|
|||
|
Rem
|
|||
|
Rem <20><><EFBFBD><EFBFBD> PBld6Usr.Cmd <20>Է<EFBFBD>ӳ<EFBFBD><D3B3><EFBFBD><EFBFBD><EFBFBD>İ<EFBFBD>װĿ¼
|
|||
|
Rem <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ӵ<EFBFBD> UsrLogn2.Cmd <20><><EFBFBD><EFBFBD><EFBFBD>ű<EFBFBD><C5B1><EFBFBD>
|
|||
|
Rem
|
|||
|
|
|||
|
..\acsr "#INSTDIR#" "%PB6INST%" ..\Logon\Template\PBld6Usr.Cmd ..\Logon\PBld6Usr.cmd
|
|||
|
|
|||
|
FindStr /I PBld6Usr %SystemRoot%\System32\UsrLogn2.Cmd >Nul: 2>&1
|
|||
|
If Not ErrorLevel 1 Goto Skip1
|
|||
|
Echo Call PBld6Usr.Cmd >> %SystemRoot%\System32\UsrLogn2.Cmd
|
|||
|
:Skip1
|
|||
|
|
|||
|
Rem #########################################################################
|
|||
|
|
|||
|
Echo.
|
|||
|
Echo Ϊ<>˱<EFBFBD>֤ PowerBuilder 6.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> PowerBuilder 6.0 <20><>
|
|||
|
Echo.
|
|||
|
Echo Eudora 4.0 <20><><EFBFBD>û<EFBFBD>Ӧ<EFBFBD>ó<EFBFBD><C3B3><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ϡ<EFBFBD>
|
|||
|
Pause
|
|||
|
|
|||
|
:done
|