Question

怎么用sendmessage向webbrowser指定位置发送消息

请教高手
在程序中包含一webbrowser控件 现要向web控件中指定位置发送鼠标左键点击消息

用sendmessage 不要用mouse_event的 谢谢高手指点
继续加分难道真的无解?

以前曾看过一个代码说到了webbrowser句柄的问题 现在找不到了 没有高手该怎么做到吗

或者其他方式可以点击网页内的一个FLASH的指定位置的替代方法也可以

Answer 1

在WebBrowser1上自动百度：asdfasdf
参考下
部件里面选择 Microsoft HTML Object Library和 Microsoft Internert Controls
Private Sub Command1_Click()
Dim objDoc As HTMLDocument
Set objDoc = Me.WebBrowser1.Document
objDoc.getElementById("sb").Click
End Sub
Private Sub Form_Load()
Me.WebBrowser1.Navigate ("www.baidu.com")
End Sub
Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
Dim objDoc As HTMLDocument
Set objDoc = Me.WebBrowser1.Document
objDoc.getElementById("kw").innerText = "asdfasdf"
End Sub

我这个实现了在自动打开百度，然后自动点击百度的搜索按钮搜索 asdfasdf 虽然不是用sendmessage 但是能实现你的功能啊！

Answer 2

..网页又没有句柄 怎么sendmessage啊。。
webbrowser句柄 和 webbrowser里网页的句柄差远了 搞清楚

Answer 3

可以选择广播