VBA Submit Button Нажав

Question

Я получаю ошибку времени выполнения «438» (объект не поддерживает это свойство или метод) при попытке щелкнуть по кнопке с помощью VBA на веб-сайте PHP, и я искал поисковые запросы для последние несколько часов и не могу найти способ обойти его.

Этот код ниже делает все, что мне нужно, но не могу найти, как нажать на кнопку без нее не удается, попробовал следующее:

IE.Document.getElementsByName("Calculate").Click 
IE.Document.getElementsByID 
IE.Document.getElementsByClassName 

и т.д. все терпят неудачу.

код для кнопки, как я вижу ниже:

<button onclick="calculate();" class="btn btn-primary">Calculate</button> 

Так при использовании ByClassName я использовал BTN BTN первичной и по имени я Calculate. Я теряю голову сейчас, какие-то идеи? Код ниже:

p.s используя IE11 если это имеет значение.

Sub testWeb() 
    Dim sht As Worksheet 
    Dim IE As Object 

    Dim Item As Variant 
    Dim objElement As Object 

    Set sht = ActiveSheet 
    Set IE = CreateObject("InternetExplorer.Application") 
    'Open IE 
    IE.Visible = True 
    IE.Navigate "http://www.doogal.co.uk/DrivingDistances.php" 

    'Wait until site is loaded 
    Do While IE.ReadyState <> 4 'READYSTATE_COMPLETE 
     DoEvents 
    Loop 


    IE.Document.getElementById("startLocs").Value = "TEST" 
    IE.Document.getElementById("endLocs").Value = "TEST1" 
    IE.Document.getElementsByName("Calculate").Click 

    IE.Document.forms(1).submit  


End Sub 

Answer 1

У вас есть 2 номера с кодом отправлено.

1. Метод .getElementsByName возвращает коллекцию элементов. Вам нужно будет выяснить, какой элемент является элементом, который вы хотите щелкнуть. Так что ваш код должен быть что-то вроде этого:

   IE.Document.getElementsByName("Calculate").Item(5).Click

2. Если HTML вы вывесили от фактического места, то <BUTTON> не имеет name свойства, так что он не будет в коллекции элементов возвращается getElementsByName.

Возможно, вам придется исследовать другой метод поиска вашего элемента DOM. IDK, сколько кнопок находится в форме, и я не знаю, какой класс назначен каждой кнопке, но, возможно, вы можете сделать getElementsByTagName, затем проведите через каждый item, глядя на свой .class или вы можете getElementsByClassName и пропустите эту коллекцию, пока не найдете элемент кнопки .type.