2017-10-28 108 views
0

我需要您的帮助:-)检查HTML中是否存在ID

我需要检查HTML代码中是否存在具有“提交”ID的标记。 我这样做:

If Not oie.Document.getelementbyid("submit") Is Nothing Then 
MsgBox oie.Document.getelementbyid("submit") 
Else: MsgBox "not found" 
End If 

但是这样的检查将正常工作只有在“提交” ID是在代码中,如果没有任何的代码,那么错误“运行时错误所需的424对象”。

如何检查ID是否存在,并在代码中出现ID“submit”时进行DO WHILE循环?

+0

我试试:'如果则IsObject(oie.Document.getelementbyid( “提交”))然后 MSGBOX oie.Document.getelementbyid( “提交”)否则 中:MsgBox “未找到” 结束If'和它的工作原理为了我。这是否正确的代码来检查ID存在? – footballplayer

回答

0

我不熟悉处理HTML元素,但也许这样的事情可能会为你完成这项工作吗?

Dim hElement as variant 'Declare it as the actual object name unlike what I've done, if you're using early binding' 

On error resume next 
Set hElement = 
oie.Document.getelementbyid("submit") 
On error goto 0 

If not (hElement is nothing) then 

或者,也许你可以通过HTML元素的页面上收集循环,并检查他们的身份证/其他一些属性,是独一无二的,你要寻找的“提交”元素?

喜欢的东西:

Dim hElement as variant 
Dim SubmitExists as boolean 
SubmitExists = false 

For each hElement in oie.document.HTMLelements 

SubmitExists = (hElement.ID = "Submit") 

Next hElement 

我并不是说会有一个名为“HTML元素”收集和所谓的“ID”的元素属性(我做起来作为一个例子来说明的原则)。检查收集和属性实际名称的最佳位置是Microsoft的文档或对象浏览器。