get all Form Item Names with webbrowser control
This will get all Form Item Names with webbrowser control.
Original Author: Andrew PLaisted
Code
Public Function GetAllFormNames(doc As HTMLDocument, Form As Integer) As String
Dim innames(20) As String
Dim max As Integer
max = doc.Forms(Form).length
For i = 0 To max
If Not (doc.Forms(Form).Item(i) Is Nothing) Then
innames(i) = doc.Forms(Form).Item(i).name
Debug.Print innames(i)
End If
Next i
End Function
Loading Comments ...
Comments
No comments have been added for this post.
You must be logged in to make a comment.