2017-02-22 42 views
0

Мне нужно войти на сайт. Каждый раз, когда я делаю учетные данные с помощью VBA, после события click, он говорит, что пароль неверен.Войти на сайт с VBA, т.е.

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

который является причиной? Shound Я вставляю учетные данные, используя случайное событие нажатия клавиши? Каков правильный синтаксис для этого?

благодаря

смотрите ниже HTML код и то, что я написал в VBA

Set ie = CreateObject("InternetExplorer.Application") 
    With ie 
     .Visible = True 
     .navigate "sss.html" 

    Do Until .ReadyState = 4 
     DoEvents 
    Loop 
    .Document.all.Item("login").Value = "username" 
    .Document.all.Item("password").Value = "password" 
Set elems = ie.Document.getElementsByTagName("button") 
For Each e In elems 
    If (e.innerHTML = "Confirm") Then 
     e.Click 
     Exit For 
    End If 
Next e 

<input type="text" ng-model="login" class="form-control ng-pristine ng-valid ng-touched" id="login" placeholder="Enter login (email)"> 
<input type="password" ng-model="password" class="form-control ng-pristine ng-valid ng-touched" id="password" placeholder="Password"> 
<button class="btn btn-default" ng-click="authenticate()" notranslate="">Confirm</button> 
+0

Я бы предположил, что к входам подключен некоторый обработчик событий, который вызывает эту проблему - ожидается, что пользователи будут печатать, а вы не печатаете ... Без URL-адреса, хотя сложно сделать полезные предложения. –

+0

пробовал. Не работает. дайте мне ошибку, говоря, что метод или свойство не поддерживается объектом – nwtn

+0

URL-адрес здесь http://my.nuvap.com/home.html#/login – nwtn

ответ

0

этот сайт хочет, чтобы вы на самом деле ввести своё имя пользователя/пароль, а на самом деле нажмите на кнопку «Подтвердить», вы можете имитировать он с SendKeys

так вместо установки value и зацикливание для кнопочного элемента, используйте этот код:

.Document.all.Item("login").focus 
SendKeys "username", True 
.Document.all.Item("password").focus 
SendKeys "password", True 
SendKeys "{TAB}", True 
SendKeys "~", True 

надеюсь, что это поможет.