Title = "Login Screen" -- title text
TextA = "User" -- body text
TextB = "Pass"
DefA = ""
DefB = ""
ButtonA = "Login" -- button text
ButtonB = "Cancel" -- button text
Border = 0 -- 0 with border, 1 without border
App = Application.GetWndHandle(); -- app handle, to center the dialog to the app window
Args = "\""..Title.."\",\""..TextA.."\",\""..TextB.."\",\""..DefA.."\",\""..DefB.."\",\""..ButtonA.."\",\""..ButtonB.."\","..Border..","..App
result = DLL.CallFunction("AutoPlay\\Docs\\DLLPerttyDailogs.dll", "ShowPrettyDaulInput", Args, DLL_RETURN_TYPE_STRING, DLL_CALL_STDCALL);
if result ~= "0" and result ~= "" then
tbResults = DelimitedStringToTable(result,"|");
sUsernameMD5 = Crypto.MD5DigestFromString(tbResults[1]);
sPasswordMD5 = Crypto.MD5DigestFromString(tbResults[2]);
local sRet = HTTP.Submit("http://www.google.com/user.php", {username_md5 = sUsernameMD5, password_md5 = sPasswordMD5}, SUBMITWEB_POST, 20, 80, nil, nil);
if sRet ~= "1" then
Dialog.Message("Error", "Wrong user or pass !!!", MB_OK, MB_ICONSTOP);
end
else
Application.Exit(0);
end |
Дружественная тема в Варезнике
Update: ScriptOMatic Tool V1.3 
