I want to invisibly control webbrowser control iwebbrowser2 in form

How to send a click to webbrowser control iwebbrowser2 control it clicks ok on simple html but if there is iframe or frame then it does not click on it



Any suggestions?

I don’t want to click by parsing html code body.outerhtml, tagname ("A").click





Private Sub Command2_Click()



Dim lHandle As Long

lHandle = GetHandle(ie)

MsgBox lHandle



SendClick lHandle, Val(Text2.Text), Val(Text3.Text)

End Sub



Public Sub SendClick(lnghWND As Long, X As Long, Y As Long)

Dim lngResult As Long

Dim lnglParam As Long

lnglParam = (Y * &H10000) + X

lngResult = SendMessage(lnghWND, WM_LBUTTONDOWN, 0&, ByVal lnglParam)

lngResult = SendMessage(lnghWND, WM_LBUTTONUP, 0&, ByVal lnglParam)

txtlog.Text = lnghWND & " " & X & " " & Y & vbCrLf & txtlog.Text

End Sub