وجود یا عدم وجود عنصر در صفحه

[swith1996]

http://barnamenevis.org/images/icons/icon14.png
با سلام بر اساتید گرامی
چگونه در یک صفحه اینترنتی وجود یک عنصر با آی دی مشخص رو چک کنم؟http://barnamenevis.org/images/icons/icon5.pnghttp://barnamenevis.org/images/icons/icon4.png
http://barnamenevis.org/images/icons/icon5.pngممنون

[محسن واژدی]

سلام علیکم
کد زیر بررسی کنید
Private Sub Command1_Click()
On Error Resume Next
Dim oObjExist As Object
Set oObjExist = WebBrowser1.Document.getElementById("OBJ_NAME")
If Not oObjExist Is Nothing Then
MsgBox "Exist target element!", vbInformation
Else
MsgBox "Not found!", vbExclamation
End If
End Sub

موفق باشید