Список проголосовавших за комментарий "Можно и на QLua написать. Просто запускаешь Квик и он сам логинится.<br/> <br/> <p> — Автологин терминала QUIK<br/> — © <a href="/r.php?u=http%3A%2F%2Fqui2dde.ru%2F&s=3943177816">qui2dde.ru/</a><br/> — Версия: 1.0<br/> ScriptPath = getScriptPath()<br/> package.cpath = ScriptPath.."\\w32.dll;"<br/> local w32 = require(«w32»)</p><p> — логин и пароль для терминала<br/> QUIK_LOGIN = "****"<br/> QUIK_PASSW = "****"</p><p><br/> function FindLoginWindow()<br/> hLoginWnd = w32.FindWindow("", «Идентификация пользователя»)<br/> if hLoginWnd == 0 then<br/> hLoginWnd = w32.FindWindow("", «User identification»)<br/> end<br/> return hLoginWnd<br/> end</p><p>timeout = 1000 — таймаут между попытками поиска окна логина<br/> is_run = true</p><p>function OnStop()<br/> timeout = 1<br/> is_run = false<br/> end</p><p>function main()<br/> while is_run do<br/> sleep(timeout)</p><p>if isConnected() == 0 then<br/> <br/> local hLoginWnd = FindLoginWindow()<br/> if hLoginWnd ~= 0 then</p><p>local hServer = w32.FindWindowEx(hLoginWnd, 0, "", "")<br/> local hLogin = w32.FindWindowEx(hLoginWnd, hServer, "", "")<br/> local nPassw = w32.FindWindowEx(hLoginWnd, hLogin, "", "")<br/> local nBtnOk = w32.FindWindowEx(hLoginWnd, nPassw, "", "")</p><p>w32.SetWindowText(hLogin, QUIK_LOGIN)<br/> w32.SetWindowText(nPassw, QUIK_PASSW)</p><p>w32.SetFocus(nBtnOk)<br/> w32.PostMessage(nBtnOk, w32.BM_CLICK, 0, 0)<br/> <br/> end<br/> end</p><p>end<br/> end</p>"