当前位置:编程学习 > VB >>

如何快速的得到对方淘宝旺旺是否在线?

用VB写了一个小软件,但是无法区别出对方旺旺是否在线。

请问有什么办法吗?

例如打开
http://list.taobao.com/browse/shop-14.htm

已知淘宝里面是否在线是用 这样的一句话来表示的
<span class="ww:token" ww:params="nick=caraco旗舰店&tnick=caraco旗艦店&display=inline"></span>

调用的语句如下
http://www.taobao.com/home/js/sys/tbww.js

请帮个忙。

让软件以快速的知道对方是否在线。 --------------------编程问答-------------------- 事实上,我刚刚写好了用WebBrowser打开网页,然后提取文本,就可以知道对方在不在线了。

但我觉得WebBrowser太耗内存,我想用innet 或xmlHTTP来获得静态文本。

有什么办法吗?

给个方案。 --------------------编程问答-------------------- 直接用innet下载网页就ok了

这样的asp生成js的情况

你分析js文件就可以 --------------------编程问答--------------------  下载网页源码再分析就行了  --------------------编程问答-------------------- innet 可以下载源码,而我只想要文本。

就像WebBrowser1.Document.documentElement.innerText --------------------编程问答--------------------
引用 4 楼 qq3959248 的回复:
innet 可以下载源码,而我只想要文本。

就像WebBrowser1.Document.documentElement.innerText


你又想不下载所有文件

又想只要文本

你WebBrowser1.Document.documentElement.innerText
不得打开这个页面 不得下载整个源码?

难道你WebBrowser1可以光下载文本?

你用innet就只有这个方式,你要么就分析这个文本具体在那个文件里,然后只下载那个文件

innet没有只取得文件具体某个部位的函数或者方法 --------------------编程问答-------------------- 用WebBrowser就会下载所有的内容,包括图片等。

而我只想要文本。

inet有没有只提文本的语句。 --------------------编程问答--------------------
引用 6 楼 qq3959248 的回复:
用WebBrowser就会下载所有的内容,包括图片等。

而我只想要文本。

inet有没有只提文本的语句。

inet是下载文件

文本可能包含在很多地方的

如果只是包含在htm文件里

你只要下载那个htm文件就ok,他不会去下载链接里的图片 js这些文件的

他只下载htm --------------------编程问答-------------------- 我用inet 为什么只得到了部分源码,没有全部


Website = Inet1.OpenURL("http://list.taobao.com/browse/shop-14.htm?page=1")  --------------------编程问答-------------------- 这个就不太清楚了

部分ajax不可以用inet直接获得

需要你分析他真实的页面地址

象这样一半的 通常是因为他的另外一半被包含在某个动态文件中

--------------------编程问答-------------------- 算了,我还是用WebBrowser吧。

我知道了用WebBrowser取文本的方法,

你知道WebBrowser取源文件的方法吗?

我立刻付分。

通过这两样,基本上就可以提取我想要的任何东西了。 --------------------编程问答-------------------- 用这个下载网页源码就行拉
Private Declare Function URLDownloadToFile Lib "urlmon" Alias "URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String, ByVal szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long
Sub Command1_Click()   '后台下载
'r = URLDownloadToFile(0, "http://www.54nanren.com.cn/en-us/music/Music_Upload/mianhuatang.wma", "c:\8.Wma", 0, 0)
r = URLDownloadToFile(0, "http://list.taobao.com/browse/shop-14.htm?page=1", "c:\1.html", 0, 0)
If r = 0 Then
MsgBox "下载完毕"
Else
MsgBox "下载失败"
End If

End Sub
--------------------编程问答-------------------- 用webbrowser取html源代码很简单啊,比如 webbrowser1.document.body.innerHtml.
不过webbrowser取html很浪费,占用内存.
用inet取html速度快,效率高.取不到全部html是你方法的问题,应该用 Execute方法,然后在inet的StateChanged事件中通过GetChunk方法获取数据.
用inet就可以非常简单的达到你想要的效果,判断某个旺旺id的在线状态.一时讲不清,具体联系qq 357799172
补充:VB ,  网络编程
CopyRight © 2022 站长资源库 编程知识问答 zzzyk.com All Rights Reserved
部分文章来自网络,