vb6.0 使用webbrowser控件调用网页内容
一般的网页用Web.Document.All.Item("passwd").Value="556677"可以实现向网页中名为PSAAWD的文件框输入556677但我碰到一...
一般的网页用
Web.Document.All.Item("passwd").Value = "556677"
可以实现向网页中名为PSAAWD的文件框输入556677
但我碰到一个复杂点的网页,上面那句代码就不好用了,
我现在一直测试的是一个带TOP区,左侧菜单区,右侧操作区的网页
我要处理的是右侧操作区的文本框。
请高人指点迷津。。。 展开
Web.Document.All.Item("passwd").Value = "556677"
可以实现向网页中名为PSAAWD的文件框输入556677
但我碰到一个复杂点的网页,上面那句代码就不好用了,
我现在一直测试的是一个带TOP区,左侧菜单区,右侧操作区的网页
我要处理的是右侧操作区的文本框。
请高人指点迷津。。。 展开
3个回答
展开全部
你在窗体上放一个Command按钮,一个WebBrowser控件并拉大一点,然后把代码放进去。
运行效果是,进入QQ注册页面,并自动在验证码框里输入字。 代码很简单,关键就是getElementsByName的写法:
Private Sub Command1_Click()
Dim objDoc
Set objDoc = WebBrowser1.Document
objDoc.getElementsByName("verifycode")(0).Value = "找到了"
objDoc.getElementsByName("verifycode")(0).Focus
End Sub
Private Sub Form_Load()
WebBrowser1.Navigate "http://reg.qq.com/"
End Sub
运行效果是,进入QQ注册页面,并自动在验证码框里输入字。 代码很简单,关键就是getElementsByName的写法:
Private Sub Command1_Click()
Dim objDoc
Set objDoc = WebBrowser1.Document
objDoc.getElementsByName("verifycode")(0).Value = "找到了"
objDoc.getElementsByName("verifycode")(0).Focus
End Sub
Private Sub Form_Load()
WebBrowser1.Navigate "http://reg.qq.com/"
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
你首先要对网页进行分析,如果有frame部件,则应该先取部件,再调用如上代码。
我用的是opera进行网页进行分析。
因为你提供的信息不太详细,所以只能如上回答。
我用的是opera进行网页进行分析。
因为你提供的信息不太详细,所以只能如上回答。
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
试着回答一下,可能的原因是在.all.item上
因为复杂的网点,可能有多个document,或多个item元素。不象简单的网页是一对一的。
建议在同一个区域使用这个方法。
因为复杂的网点,可能有多个document,或多个item元素。不象简单的网页是一对一的。
建议在同一个区域使用这个方法。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询