Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Автоматическое заполнение логина и пароля / 23 сообщений из 23, страница 1 из 1
15.11.2006, 00:13
    #34128787
Artmoda
Artmoda
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автоматическое заполнение логина и пароля
Использую программу - клиент, загружаемую на своем компьютере, которая просит авторизацию для подключения к сервису в интернете.

Подскажите, можно ли с помощью VBA автоматически заполнять появляющуюся форму для ввода логина и пароля?

То есть, что бы при появлении окошка с определенным названием срабатывал скрипт, заполняющий эти поля.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.11.2006, 00:32
    #34128809
Artmoda
Artmoda
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автоматическое заполнение логина и пароля
Если конкретней, то после загрузки приложения появляется окошко для ввода, но сразу перестает быть активным. Активным становится окно самой программы. То есть скрипт должен срабатывать после появления окошка и переводить его на "первый план", наверное.
Вообще, окошко выглядит как на картинке.

Если не трудно, выложите, пожалуйста, код.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.11.2006, 06:24
    #34128901
orunbek
orunbek
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автоматическое заполнение логина и пароля
А этот вариант?
Код: plaintext
1.
AppActivate "Идентификация пользователя"
SendKeys "Login"
и т.д.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.11.2006, 09:57
    #34129171
Artmoda
Artmoda
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автоматическое заполнение логина и пароля
orunbek, может быть проинструктируешь обычного юзера непрограммиста... кто куды и что к чему?

То есть, создается модуль .bas, затем...

Вот как ни силился обычный пользователь найти тему на этом форуме про заполнение окошка в локальной среде виндов, так и не нашел. Все про заполнение на удаленном ресурсе типа сайта пишут.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.11.2006, 11:01
    #34129398
orunbek
orunbek
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автоматическое заполнение логина и пароля
Например для такого случая
Код: plaintext
1.
2.
3.
4.
5.
6.
Sub Login
    AppActivate "Login", False
    SendKeys "Login", True
    SendKeys "{TAB}", True
    SendKeys "Password", True
    SendKeys "{ENTER}", True
End Sub
Ну думаю все понятно, AppActivate "Login", в данном случае Login - это caption окна, в котором надо автоматом ввести
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.11.2006, 11:02
    #34129400
orunbek
orunbek
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автоматическое заполнение логина и пароля
Код: plaintext
1.
2.
3.
4.
5.
6.
Sub Login
    AppActivate "Login", False
    SendKeys "Admin", True
    SendKeys "{TAB}", True
    SendKeys "super", True
    SendKeys "{ENTER}", True
End Sub
для ясности ;)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.11.2006, 11:24
    #34129482
Artmoda
Artmoda
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автоматическое заполнение логина и пароля
Код ясен, спасибо, но как должен запускаться этот модуль?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.11.2006, 11:30
    #34129512
Artmoda
Artmoda
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автоматическое заполнение логина и пароля
В смысле, что нужно сделать для автоматического срабатывания?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.11.2006, 11:55
    #34129631
orunbek
orunbek
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автоматическое заполнение логина и пароля
ArtmodaВ смысле, что нужно сделать для автоматического срабатывания?
в зависимости от того, где это нужно сделать, как эта прога для входа в систему запускается, и откуда (в смысле на чем) нужно сделать автологин (VBA?)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.11.2006, 12:29
    #34129772
Artmoda
Artmoda
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автоматическое заполнение логина и пароля
Обычный интерфейсный режим Win XP SP2.
Программа запускается из BAT-файла.
Я полагаю, нужен VBS, чтобы в том же батнике прописать запуск скрипта.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.11.2006, 05:46
    #34131933
orunbek
orunbek
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автоматическое заполнение логина и пароля
ArtmodaОбычный интерфейсный режим Win XP SP2.
Программа запускается из BAT-файла.
Я полагаю, нужен VBS, чтобы в том же батнике прописать запуск скрипта.
ну да, это можно проделать и через vbs тоже (а в начале говорили VBA):
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
Option Explicit
Dim objWShell
Set objWShell=CreateObject("WScript.Shell")
objWShell.AppActivate "Login",True
objWShell.SendKeys "User",True
objWShell.SendKeys "{TAB}",True
objWShell.SendKeys "Password",True
objWShell.SendKeys "{ENTER}",True
Set objWShell=Nothing
а в bat'нике:
Код: plaintext
1.
2.
login.exe
autologin.vbs
в начале скрипта VBS, хорошо было бы добавить паузу, а лучше через WMI, ждать до тех пор пока login.exe в списке процесов не появится, и затем через n-секунд (в зависимости от скорости запуска программы), заработает заполнение паролей
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.11.2006, 17:47
    #34134407
Artmoda
Artmoda
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автоматическое заполнение логина и пароля
Чудненько. Работает - это то, что надо.

Только не передает в поля кириллицу. Наверное, нужно в коде скрипта обнести её какими-нибудь символами?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.11.2006, 17:52
    #34134421
Aklin
Aklin
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автоматическое заполнение логина и пароля
orunbekНу думаю все понятно, AppActivate "Login", в данном случае Login - это caption окна, в котором надо автоматом ввести

вапрос по поводу: возможно ли активировать тем самым Paint (mspaint)
(имеется в виду открытие файла mspaint + имя файла и далее сообщение ему команды)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.11.2006, 19:24
    #34134695
Artmoda
Artmoda
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автоматическое заполнение логина и пароля
Спасибо, orunbek.

Проблема с кириллицей решена забавным способом:


Option Explicit
Dim objWShell
Set objWShell=CreateObject("WScript.Shell")
WScript.Sleep 10000
objWShell.AppActivate "Идентификация",True
objWShell.SendKeys "^+2" (Мои сочетания клавиш для перехода на русскую раскладку)
objWShell.SendKeys "Kjuby",True (Kjuby - слово "Логин" напечатанное на англ. раскладке)
objWShell.SendKeys "{TAB}",True
objWShell.SendKeys "^+1" (Мои сочетания клавиш для перехода на англ. раскладку)
objWShell.SendKeys "Password",True
objWShell.SendKeys "{ENTER}",True
Set objWShell=Nothing
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.11.2006, 05:38
    #34135125
orunbek
orunbek
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автоматическое заполнение логина и пароля
Aklin orunbekНу думаю все понятно, AppActivate "Login", в данном случае Login - это caption окна, в котором надо автоматом ввести

вапрос по поводу: возможно ли активировать тем самым Paint (mspaint)
(имеется в виду открытие файла mspaint + имя файла и далее сообщение ему команды)
конечно
Код: plaintext
1.
AppActivate "Paint"
AppActivate "Notepad"
как я уже говорил параметр этой подпрограммы caption активируемого окна, кроме того есть же хэлп
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.11.2006, 05:44
    #34135126
orunbek
orunbek
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автоматическое заполнение логина и пароля
ArtmodaСпасибо, orunbek.

Проблема с кириллицей решена забавным способом:


Option Explicit
Dim objWShell
Set objWShell=CreateObject("WScript.Shell")
WScript.Sleep 10000
objWShell.AppActivate "Идентификация",True
objWShell.SendKeys "^+2" (Мои сочетания клавиш для перехода на русскую раскладку)
objWShell.SendKeys "Kjuby",True (Kjuby - слово "Логин" напечатанное на англ. раскладке)
objWShell.SendKeys "{TAB}",True
objWShell.SendKeys "^+1" (Мои сочетания клавиш для перехода на англ. раскладку)
objWShell.SendKeys "Password",True
objWShell.SendKeys "{ENTER}",True
Set objWShell=Nothing
пожалуйста ;)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.11.2006, 09:00
    #34135285
Aklin
Aklin
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автоматическое заполнение логина и пароля
orunbek
Код: plaintext
1.
AppActivate "Paint"
AppActivate "Notepad"
как я уже говорил параметр этой подпрограммы caption активируемого окна, кроме того есть же хэлп

все равно не выходит, теперь активируется, а ключи не посылаются ни с Wait ни без него.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.11.2006, 10:39
    #34135584
orunbek
orunbek
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автоматическое заполнение логина и пароля
Aklin orunbek
Код: plaintext
1.
AppActivate "Paint"
AppActivate "Notepad"
как я уже говорил параметр этой подпрограммы caption активируемого окна, кроме того есть же хэлп

все равно не выходит, теперь активируется, а ключи не посылаются ни с Wait ни без него.
вы лучше отдельным постом отправьте и поподробнее о своей проблеме
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.11.2006, 14:52
    #34136881
Aklin
Aklin
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автоматическое заполнение логина и пароля
orunbek Aklin orunbek
Код: plaintext
1.
AppActivate "Paint"
AppActivate "Notepad"
как я уже говорил параметр этой подпрограммы caption активируемого окна, кроме того есть же хэлп

все равно не выходит, теперь активируется, а ключи не посылаются ни с Wait ни без него.
вы лучше отдельным постом отправьте и поподробнее о своей проблеме

было дело, не помогло, а сейчас не надо
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Период между сообщениями больше года.
11.08.2010, 10:39
    #36785412
v04odp
v04odp
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автоматическое заполнение логина и пароля
orunbekну да, это можно проделать и через vbs тоже (а в начале говорили VBA):
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
Option Explicit
Dim objWShell
Set objWShell=CreateObject("WScript.Shell")
objWShell.AppActivate "Login",True
objWShell.SendKeys "User",True
objWShell.SendKeys "{TAB}",True
objWShell.SendKeys "Password",True
objWShell.SendKeys "{ENTER}",True
Set objWShell=Nothing
а в bat'нике:
Код: plaintext
1.
2.
login.exe
autologin.vbs
в начале скрипта VBS, хорошо было бы добавить паузу, а лучше через WMI, ждать до тех пор пока login.exe в списке процесов не появится, и затем через n-секунд (в зависимости от скорости запуска программы), заработает заполнение паролей

а можно ли логин и пароль передавать этому скрипту как параметры?
и ещё вопрос, как послать комбинацию клавиш {shift+tab}?
заранее спасибо!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.08.2010, 10:47
    #36785430
Игорь Горбонос
Игорь Горбонос
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автоматическое заполнение логина и пароля
> Автор: v04odp
> а можно ли логин и пароль передавать этому скрипту как параметры?


читать здесь

> и ещё вопрос, как послать комбинацию клавиш {shift+tab}?

читать здесь

Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.08.2010, 10:49
    #36785435
Игорь Горбонос
Игорь Горбонос
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автоматическое заполнение логина и пароля
Ссылки наоборот, нижняя ссылка к верхнему вопросу, а верхняя ссылка - к нижнему

Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.08.2010, 10:56
    #36785457
v04odp
v04odp
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автоматическое заполнение логина и пароля
Большое спасибо! :)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Автоматическое заполнение логина и пароля / 23 сообщений из 23, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]