Веб-перебор в Excel с VBA застрял с кнопкой загрузки - PullRequest
0 голосов
/ 22 февраля 2020

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

Мне нужно указать код для отправки / нажатия загрузки преуспеть / ввести форму et c. Я пробовал многочисленные комбинации без успеха. Код, который я использую:


    Dim a As String, URL As String
    Set ie = CreateObject("InternetExplorer.Application")
    URL = "https://www.horseracebase.com"
    With ie
        .Visible = True
        .Navigate URL
        Do Until .ReadyState = 4
            DoEvents
        Loop
        .Document.all.Item("Login").Value = "************"
        .Document.all.Item("Password").Value = "******************"

       .Document.forms(4).submit


    End With
    URL = "https://www.horseracebase.com/dailyjockeys.php"

   ie.Navigate URL
   'Stuck with next line
   Set HTMLButton = ie.Document.getElementsByTagName("Download to Excel")
   ' ie.Document.Item("downloadbutton") = Click
    HTMLButton.Click


         <td title="Download the Jockey report">
        <form action="dailyjockeysexcel.php" method="post"><input name="user" type="hiddenvalue="28321">  
         <input name="totem" type="hidden" value="8bb3fe04b9ce63f2c86bf2ee7c30a3313c66dca2">
        **<input title="Download to Excel" class="downloadbutton" type="submit" value="XLS"</form</td>**

Я затем wi sh, чтобы очистить несколько других таблиц. Но как только я отсортировал опцию загрузки, я думаю, что смогу справиться с остальными самостоятельно.

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...