webbrows中如何触发text 框的onchange事件?

cacu 惠赢网 技术总监/研发总监  2003-12-21 05:13:59
vb中用webbrows打开html后,自动输入数据后,
如何触发text 框的onchange事件?
...全文
4 点赞 收藏 2
写回复
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
cacu 2003-12-21

call item(1).onchenge() 解决,送分
回复
online 2003-12-21
如何触发text 框的onchange事件?
TEXT框是html页面里的

你试试下面这种方法,我没有试过
原理应该是一样的
a.htm
----------------------
<HTML>
<HEAD>
<SCRIPT>
var obj;
</SCRIPT>
</HEAD>
<BODY>
<a href=# onclick="obj.w(); return false;">asdasdsad</a>
</BODY>
</HTML>


建立一个EXE再窗体上放置一个WebBrowser控件,改名为web
Private Sub Form_Load()
web.Navigate "c:\a.htm"
DoEvents
Do While web.Busy
DoEvents
Loop
Set web.Document.ParentWindow.obj = Me
End Sub

Public Sub w()
MsgBox "haha"
End Sub
回复
发动态
发帖子
VB基础类
创建于2007-09-28

7451

社区成员

VB 基础类
申请成为版主
社区公告
暂无公告