2017-10-28 40 views
0

私はあなたの助けが必要です:-)HTML内にIDの存在を確認してください

「送信」IDを持つタグの存在をHTMLコードでチェックする必要があります。 私はこれを実行します。

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

のが、「提出」IDコードである場合にのみ、および任意のコードに存在しない場合は、エラー「実行時エラー424オブジェクトが必要なチェックが正常に動作します"

IDに「submit」というコードが表示されているときに、IDの存在を確認してサイクルを繰り返すにはどうすればよいですか?

+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要素のコレクションをループができ、あなたが探している「送信」要素に一意である彼らのID /他のいくつかのプロパティをチェック!

何かのように:

Dim hElement as variant 
Dim SubmitExists as boolean 
SubmitExists = false 

For each hElement in oie.document.HTMLelements 

SubmitExists = (hElement.ID = "Submit") 

Next hElement 

私は「HTMLelements」と呼ばれるコレクションと「ID」と呼ばれる要素のプロパティがあるだろうとは言わないよ(私は原理を実証する例として、それらを作りました)。コレクションとプロパティの実際の名前を確認するには、Microsoftのドキュメントまたはオブジェクトエクスプローラが最適です。

関連する問題