vb 关于webbrowser控件获取网页文本问题
关于webbrowser控件问题 我需要提取网页上指定文本，这些文本有的是a标签有的不是。 用查找网页元素的办法判断i的值来查找，可以找到a标签的，但是有的时候会出错。 不是a标签的找不到，因为这些文本不是固定的。
我在想能不能提取网页的html源码，然后找，实在想不出来，求高手指点〒_〒
A标签找出来会有三条重复的，用static定义变量过滤掉其它的两个，但是这样的话，如果网页刷新的话新的网页指定A标签就提取不到了。
其它的不是A标签的。因为字数不是固定的，内容也不是固定的，所以用innerText属性找不出来。 呜呜~我都快哭了~
还是不太明白你的问题，把你的网页地址和想要获取的元素贴出来吧；
追问
我要获取的一个是A标签的 聊天通讯这四个字
另外的文字不是A标签 是那边的更新时间。
因为网页上的文本会随时变化 没有定点用字符串函数找不到
聊天通讯这个标签很容易就可以找到，直接根据innertext属性或href属性就可以找到；
更新日期的话，是固定的啊，只是后面的日期不固定，也很容易就可以得到啊；
我再搞搞看 第一次接触这个控件不会弄。谢谢哈~
如何从VB的WebBrowser控件中获取网页文字
Function HtmlStr$(Url$) '提取网页源码函数 Dim XmlHttp Set XmlHttp = CreateObject("Microsoft.XMLHTTP") XmlHttp.Open "GET", Url, False XmlHttp.send If XmlHttp.ReadyState = 4 Then HtmlStr = StrConv(XmlHttp.ResponseBody, vbUnicode) Set XmlHttp = NothingEnd FunctionPrivate Sub ...
用VB webbrowse控件浏览网页,如何取得网页上 的数据 ?
1.使用WebBrowser控件浏览 2.从WebBrowser获得document进行DOM处理.(WebBrowse的document也可以直接进行DOM处理,只是功能少点)代码示例:WebBrowser1.Silent = True WebBrowser1.Navigate "网页的网址"Do Until WebBrowser1.ReadyState = 4 '等待加载完毕 DoEvents Loop '以下的语句需要引用mshtml 才能使用 ...
用VB的webbrowser作的浏览器获取文本框
set vdoc=webbrowser1.document for i=0 to vdoc.all.length-1 if Ucase(vdoc.all(i).tagname)="INPUT" then set vTag=vdoc.all(i)if vtag.type="text" then if vtag.name="文本框的NAME" then msgbox vtag.value'这样就可以读到的 end if end if end if next 随手写的,大致就...
vb.net的Webbrowser1.Document通过GetElementsByTagName("a"),如 ...
另一个简单点的方法是，假如HTML里面有个文本框是 则VB.NET里写 text=web.Document.GetElementById("TESTID").GetAttribute("value")则得到text="TEXTBOX"
使用VB6.0 如何获取网站中 ul 下的 li 的 span 里面的文本内容 并输出...
VB6中用WebBrowser控件打开网页，然后这样来获取：Text1.Text = Replace(WebBrowser1.Document.querySelector("ul#lottery_list li:first-child span:last-child").innerHTML, ",", "") '获取ul的第一个li中的最后一个span的内容并把逗号去掉 ...
vb中如何实现提取网页内容
在vb窗体上加入webBrowser控件，并加入一个时钟控件，设置为200毫秒，加入一个文本框 Private Sub Form_Load()webBrowser1.Silent = True'屏蔽脚本错误提示 End Sub Private Sub Command1_Click()webBrowser1.Navigate "http:\/\/www.baidu.com" '打开网址 Timer1.Enabled = True End Sub Private ...
VB获得指定网页中的部分内容
首先要在窗体中添加webbrowser控件,我在这儿将这个控件命名为web1，你要设置，网页必须在该控件中打开。。其次再添加一个按钮和文本框。然后为按钮添加如下代码：Set oDoc = Web1.Document Set oTxtRgn = oDoc.selection.createRange txtwyxs.Text = oTxtRgn.Text 在程序运行过程中只要你在Web中...
vb 获取网页文本框内容
private sub command1_click text1=webBrowser1.document.getelementbyid("1").value 或：text1=webBrowser1.document.getelementsbyname("1")(0).value end sub 可把上述代码写到WebBrowser1_DownloadComplete事件中 需要将ID设为唯一的，如果有多个tag的ID为"1"（这是网页设计所不允许但不是完全...
VB获取网页特定内容
用WebBrowser控件 你把HTML代码保存成文件,然后 用webbrowser.navigate FileName 然后那个控件就能看到网页了 部件-microsoft internet Controls
VB 获取指定网页文本框的内容
Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)If InStr(URL, "\/\/") = 0 Then Exit Sub Timer1.Enabled = True Timer1_Timer End Sub 如果不添加Timer，你可以参考上述代码进行修改。如楼上所言，这个网站上显示的时间，其实就是你的本机时间：Private Sub ...
