|
|
@@ -254,8 +254,6 @@ begin
|
|
|
|
|
|
{$IFDEF _mLoginNoPW}
|
|
|
sName := PHPWeb.GetNameFromURLProtocol(ParamStr(1));
|
|
|
- if sName[1] = '%' then
|
|
|
- sName := UTF8Decode(HttpDecode(sName));
|
|
|
|
|
|
if sName = '' then // 表示手工运行的
|
|
|
begin
|
|
|
@@ -267,6 +265,8 @@ begin
|
|
|
// For Test only!
|
|
|
// Application.MessageBox(PChar(ParamStr(1) + #10#13 + sName), '系统提示', MB_OK + MB_ICONINFORMATION);
|
|
|
// Application.Terminate;
|
|
|
+ if sName[1] = '%' then
|
|
|
+ sName := UTF8Decode(HttpDecode(sName));
|
|
|
|
|
|
case PHPWeb.Login(sName, '', 2, sInfo, sURL) of
|
|
|
ltLoginFail:
|
