VB如何在操作网页? 10

我想用VB在网页中操作,动作比较简单,就是在网页中的一个输入口输入几个文字,然后点确定,感觉像发帖机,但不需要像发帖机那么复杂,请教教如何做... 我想用VB在网页中操作,动作比较简单,就是在网页中的一个输入口输入几个文字,然后点确定,感觉像发帖机,但不需要像发帖机那么复杂,请教教如何做 展开
 我来答
smile520莉
推荐于2016-08-28 · TA获得超过6523个赞
知道小有建树答主
回答量:1029
采纳率:52%
帮助的人:202万
展开全部
用VB打开网页有多种方法:
方法1)可用Shell函数执行一个可执行文件explorer.exe来打开网页。

Shell 函数,
执行一个可执行文件,返回一个 Variant
(Double),如果成功的话,代表这个程序的任务 ID,若不成功,则会返回 0。
Private Sub Command2_Click()
Shell "explorer.exe http://www.xxxx.com"
End Sub
方法2)使用WebBrowser直接建立浏览器。
在 Visual Basic 里还可以向工程中增加其它类型的 Internet 功能,包括:
Visual Basic 应用程序的 Internet 扩展。可以使用一些特殊控件,它们提供了和Internet 有关的功能。这些控件包括
Internet Transfer 控件、 WebBrowser 控件,以及 WinSock 控件。
Private Sub Command1_Click()
WebBrowser1.Navigate "http://www.xxx.com"
End Sub
mijing2000
2011-05-25 · TA获得超过282个赞
知道小有建树答主
回答量:372
采纳率:0%
帮助的人:314万
展开全部
Dim vDoc, vTag As Object
Dim i As Integer

Set vDoc = WebBrowser1.Document

For i = 0 To vDoc.All.length - 1
If UCase(vDoc.All(i).tagName) = "这里写你输入口的标签" Then
Set vTag = vDoc.All(i)
If vTag.id = "查源码,找id或者type之类的,想精确点,就再加个条件" Then vTag.value=“要输入的数据”
End If
Next i
End Sub

点击按钮的话,一样的,只要把方法改成vtag.click
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
Boksian
2011-05-25 · 超过31用户采纳过TA的回答
知道答主
回答量:199
采纳率:0%
帮助的人:93.4万
展开全部
如果是程序中就找到窗口句柄 如果是标准网页 就要看你想用怎样的方式实现了 是用控件还是直接调用IE ?
本回答被网友采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 1条折叠回答
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式