ке:

Я успешно использовал VBA для следующих целей:

Войдите на сайт, используя getElementsByName

Выберите параметры для отчета, который будет сгенерирован (используя getelementsby ...)

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

Важно отметить - веб-сайт на стороне клиента

Выше была простая часть, сложная часть, как показано ниже:

нажав на изображение GIF внутри iframe, который экспортирует набор данных в CSV

Я пробовал следующее:

Dim idoc As HTMLDocument
Dim iframe As HTMLFrameElement
Dim iframe2 As HTMLDocument

Set idoc = objIE.document
Set iframe = idoc.all("iframename")
Set iframe2 = iframe.contentDocument

    Do Until InStr(1, objIE.document.all("iframename").contentDocument.innerHTML, "img.gif", vbTextCompare) = 0
        DoEvents
    Loop

Чтобы дать некоторый контекст логике выше -

Я получил доступ к основному кадруя получил доступ к iframe по его элементу nameя получил доступ к контенту в iframeЯ попытался найти GIF-изображение, которое нужно нажать, чтобы экспортировать в CSV

Именно в этой строке он говорит: «Объект не поддерживает это свойство или метод»

Также пытался получить доступ к iframe gif с помощью атрибутов a element и href, но это полностью не удалось. Я также попытался получить изображение с исходного URL-адреса, но все это приводит меня к странице, с которой изображение.

примечание: у iframe нет идентификатора и, как ни странно, изображение gif не имеет элемента / события onclick

Окончательное рассмотрение - попытка очистки i-фрейма с использованием R

получить доступ к узлу HTML iframe было просто, однако попытка получить доступ к атрибутам iframe и впоследствии к узлам таблицы оказалась безуспешной. Все, что он возвратил, было "Характером (0)"

library(rvest)
library(magrittr)

Blah <-read_html("web address redacted") %>%
  html_nodes("#iframe")%>%
  html_nodes("#img")%>%
  html_attr("#src")%>%
  #read_html()%>%
  head()
Blah

Как только я включил read_html, в скрипте возвращается следующая ошибка:

Ошибка в if (grepl ("<|>", x)) {: аргумент имеет нулевую длину

Я подозреваю, что это относится к персонажу (0)

Цените любые указания здесь!

Большое спасибо,

HTML

<div align="center"> 
    <table id="table1" style="border-collapse: collapse" width="700" cellspacing="0" cellpadding="0" border="0"> 
        <tbody>
            <tr>
                <td colspan="6"> &nbsp;</td>
            </tr> 
            <tr> 
                <td colspan="6"> 
                    <a href="href redacted">
                        <img src="img.gif" width="38" height="38" border="0" align="right">
                    </a>
                    <strong>x - </strong>
                </td>
            </tr> 
        </tbody>
    </table>
</div>