你可以通过VBA获取元素(GetElementBySrc)

在VBA中,是否可以有一个GetElementBySrc命令?

我的macros正在input数据到网页文本框,然后点击search。

我有一个循环的function,直到Internet Explorer处于就绪状态,但Internet Explorer在search完成/结果页加载之前处于就绪状态。

在search页面上出现一个图像“processing.gif”,等待结果显示。 我想我可能会有更多的运气,如果我可以写一个“If … Then”命令,将等待,直到图像不再在search页面上。

我试图find的标签会说

<img alt="search" src"images/processing.gif" /> 

额外的思考

我在想这样的事情

 Do If IE.Document.GetElementsByTagName("img").Attributes("src").Value = "images/processing.gif" Is Nothing Then Exit Do Else DoEvents End If Loop 

这是我在类似情况下使用的…

 Do Until InStr(1, ie.Document.body.innerhtml, "images/processing.gif", vbTextCompare) = 0 DoEvents Loop 

你可以抓住img元素,只是循环,直到你也获得了无限的文本

 dim imgElm for each imgElm in ie.Document.getElementsByTagName("img") if imgElm.innertext = "images/processing.gif" then 'do something exit for end if next