Здравствуйте. брокер китфинанс. как сделать автоматический ввод пароля? пробовал пользовать код http://quik2dde.ru/viewtopic.php?id=80 с использованием библиотеки w32, но не могу разобраться именами окон. как их определить? соединение ssl-pro титул окна (верхняя строка) SignalComSSLPro ниже текст Введите пароль к секретному ключу
Валентин пишет: Здравствуйте. брокер китфинанс. как сделать автоматический ввод пароля? пробовал пользовать код http://quik2dde.ru/viewtopic.php?id=80 с использованием библиотеки w32, но не могу разобраться именами окон. как их определить? соединение ssl-pro титул окна (верхняя строка) SignalComSSLPro ниже текст Введите пароль к секретному ключу
Добрый день,
Рекомендуем ознакомиться с веткой форума, где рассматривалась данная тема: http://forum-archive.quik.ru/forum/iwr/34416/ На данный момент готовых решений по автоматической авторизации предоставить не сможем.
Set SH = CreateObject("WScript.Shell")
SH.Run "info.exe"
Set locator = CreateObject("WbemScripting.SWbemLocator")
Set service = locator.ConnectServer()
Set props = service.ExecQuery("sel ect * fr om Win32_Process where name = 'info.exe'")
For Each objProcess in props
SH.AppActivate objProcess.ProcessId
Next
WScript.Sleep 5000
SH.SendKeys "пароль"
SH.SendKeys "{Enter}"
WScript.Sleep 1000
SH.SendKeys "{Enter}"
WScript.Sleep 1000
SH.SendKeys "пароль"
SH.SendKeys "{Enter}"
этот файл vbs кидается в папку с info.exe. сам vbs можно запускать каким нибудь планировщиком. (nncron, вин планировщик) при первоначальном запуске скрипт вводит пароль, давит ентер, давит ентер на следующем окне, опять вводит пароль и давит ентер (у меня пароль надо вводить два раза). собственно, вот.
Set SH = CreateObject( "WScript.Shell" )
SH.Run "info.exe"
Set locator = CreateObject( "WbemScripting.SWbemLocator" )
Set service = locator.ConnectServer ()
Set props = service.ExecQuery ( "sel ect * fr om Win32_Process where name = 'info.exe'" )
For Each objProcess in props
SH.AppActivate objProcess.ProcessId
Next
WScript.Sleep 5000
SH.SendKeys "пароль"
SH.SendKeys "{Enter}"
WScript.Sleep 1000
SH.SendKeys "{Enter}"
WScript.Sleep 1000
SH.SendKeys "пароль"
SH.SendKeys "{Enter}"
этот файл vbs кидается в папку с info.exe. сам vbs можно запускать каким нибудь планировщиком. (nncron, вин планировщик) при первоначальном запуске скрипт вводит пароль, давит ентер, давит ентер на следующем окне, опять вводит пароль и давит ентер (у меня пароль надо вводить два раза). собственно, вот.