WedX - журнал о программировании и компьютерных науках

VBA Откройте веб-страницу, войдите в систему и получите открытую страницу


Привет всем, в моем небольшом приложении Access & VBA функция открывает веб-страницу, заполняет имя пользователя и пароль, а затем входит в систему.

Как я могу прочитать текстовое поле и другое содержимое с открытой веб-страницы сразу после входа в систему, а не на новой веб-странице с той же ссылкой на открытую?

Это мой код.

Поблагодарить всех

Private Sub myButton_Click()
Dim IE As Object
Dim IEDoc As HTMLDocument

Set IE = CreateObject("InternetExplorer.application")
Set IEDoc = IE.Document
IE.Navigate "https://mylogin.com"
Do While IE.Busy: DoEvents: Loop
While IE.ReadyState <> READYSTATE_COMPLETE
DoEvents
Wend

With IEDoc
       .getElementsByName("userid")(0).Value = "user"
       .getElementsByName("password")(0).Value = "password"
       .getElementById("btn_login").Click
End With

'At this point, I would  read a text field from the new opened page, after login, in the same browser (not from a new webpage with the same link)
23.04.2017

Ответы:


1

вы добавляете ожидание страницы ответа на кнопку нажатия, затем вы получаете доступ к значению текстового поля по его имени

Private Sub myButton_Click()
Dim IE As Object
Dim IEDoc As HTMLDocument

Set IE = CreateObject("InternetExplorer.application")
Set IEDoc = IE.Document
IE.Navigate "https://mylogin.com"
Do While IE.Busy: DoEvents: Loop
While IE.ReadyState <> READYSTATE_COMPLETE
DoEvents
Wend

With IEDoc
       .getElementsByName("userid")(0).Value = "user"
       .getElementsByName("password")(0).Value = "password"
       .getElementById("btn_login").Click
End With

'At this point, I would  read a text field from the new opened page, after login, in the same browser (not from a new webpage with the same link)
Do While IE.Busy: DoEvents: Loop
While IE.ReadyState <> READYSTATE_COMPLETE
    DoEvents
Wend
With IEDoc
       msgbox .getElementsByName("thetextfield").Value
End With
23.04.2017
Новые материалы

Объяснение документов 02: BERT
BERT представил двухступенчатую структуру обучения: предварительное обучение и тонкая настройка. Во время предварительного обучения модель обучается на неразмеченных данных с помощью..

Как проанализировать работу вашего классификатора?
Не всегда просто знать, какие показатели использовать С развитием глубокого обучения все больше и больше людей учатся обучать свой первый классификатор. Но как только вы закончите..

Работа с цепями Маркова, часть 4 (Машинное обучение)
Нелинейные цепи Маркова с агрегатором и их приложения (arXiv) Автор : Бар Лайт Аннотация: Изучаются свойства подкласса случайных процессов, называемых дискретными нелинейными цепями Маркова..

Crazy Laravel Livewire упростил мне создание электронной коммерции (панель администратора и API) [Часть 3]
Как вы сегодня, ребята? В этой части мы создадим CRUD для данных о продукте. Думаю, в этой части я не буду слишком много делиться теорией, но чаще буду делиться своим кодом. Потому что..

Использование машинного обучения и Python для классификации 1000 сезонов новичков MLB Hitter
Чему может научиться машина, глядя на сезоны новичков 1000 игроков MLB? Это то, что исследует это приложение. В этом процессе мы будем использовать неконтролируемое обучение, чтобы..

Учебные заметки: создание моего первого пакета Node.js
Это мои обучающие заметки, когда я научился создавать свой самый первый пакет Node.js, распространяемый через npm. Оглавление Глоссарий I. Новый пакет 1.1 советы по инициализации..

Забудьте о Matplotlib: улучшите визуализацию данных с помощью умопомрачительных функций Seaborn!
Примечание. Эта запись в блоге предполагает базовое знакомство с Python и концепциями анализа данных. Привет, энтузиасты данных! Добро пожаловать в мой блог, где я расскажу о невероятных..


Для любых предложений по сайту: [email protected]