- Code: Select all
Dim i As Integer
For i = 0 To WebBrowser1.Document.GetElementsByTagName("input").Count - 1
If WebBrowser1.Document.GetElementsByTagName("input").Item(i).GetAttribute("type") = "submit" Then
If WebBrowser1.Document.GetElementsByTagName("input").Item(i).GetAttribute("value") = "Deposit" Then
WebBrowser1.Document.GetElementsByTagName("input").Item(i).RaiseEvent("onclick")
End If
End If
I used "RaiseEvent("onclick")" but I am not exactly sure how to use it. Any help is appreciated.


