2017-02-03 15 views
1

Я использую VBA для взаимодействия с веб-сайтом в IE.Вызов onclick JS-события на веб-сайте с помощью VBA

В рамках этого мне нужно нажать кнопку там, но простой .Click не работает, как мне нужно триггером на OnClick событие JS за этой кнопкой.

Может ли кто-нибудь здесь рассказать мне, как я могу достичь этого, либо путем имитации щелчка и запуска события, либо путем прямого вызова события JS?

Это должно произойти после кода ниже VBA.

Мой код VBA:

Dim IE As Object 
Dim MyURL As String 
Dim varResults As New DataObject 

varResults.SetText TxtSql.Text 
varResults.PutInClipboard 
Unload FrmResults 

Set IE = CreateObject("InternetExplorer.Application") 

MyURL = "https://myFirstUrl" 

IE.Navigate MyURL 
IE.Visible = True 

While IE.busy 
    DoEvents 
Wend 

Application.Wait (Now + TimeValue("0:00:02")) ' to allow time for loading the page 

OnClick JS событие за кнопкой:

javascript:document.forms.jobProfileForm.action='https://mySecondUrl';document.forms.jobProfileForm.submit() 

баттона HTML:

<input class="normalbttn" id="editProfileBttn" value="Edit Profile" onclick="theAboveJS" type="button"></input> 

ответ

0

Попробуйте это:

IE.Document.getelementbyid("editProfileBttn").fireevent ("onclick")

+0

Спасибо, Скотт! Я пробовал это, но никакой разницы - он не вызывает кнопку/событие и не загружает страницу в текстовое поле. – Mike

 Смежные вопросы

  • Нет связанных вопросов^_^