易截截图软件、单文件、免安装、纯绿色、仅160KB

如何用VB采集部分网页数据

要采集的页面：http://city.qzone.qq.com/html/user/searchpro.htm#mod=0&act=city&cd=120000&pg=1

我想把搜索出来的QQ都采集出来，该怎么做。看了下代码好像不是普通的那种，网址里把1改成2没用。
是不是要会员才行？你的连接我用浏览器浏览会变成：
http://city.qzone.qq.com/html/user/searchpro.htm#mod=0&act=city&cd=120000

不要会员的，那个后面的pg=1基本的无效的，不管改成2还是3都是在第一页，当点击底部的页码1234时浏览器地址会变化1234等等

学习
学习
再学习
引用
http://city.qzone.qq.com/json.php?mod=sososearch&act=page&type=city&jsontype=str&callback=searchProCb&xb=1&nl=3&cd=120000&pg=7

得到的是下面一串东西：
searchProCb({"responseHeader": {"status":"0","QTime":"8"},"response": {"numFound":"10000000","currentNum":"10000","results":[],"CorrectPin": [],"SimilarWords": []}});
引用
http://city.qzone.qq.com/json.php?mod=sososearch&act=page&type=city&jsontype=str&callback=searchProCb&xb=1&nl=3&cd=120000&pg=7

知道了，其实这个我也抓包抓到的，测试的时候也将引用页放进去了，只是sendata有点问题，现在好了，不过还是谢谢你
学习


相关问答：

vb打印问题


Printer.ScaleMode = 6
6表示毫米
Printer.PaperSize = vbPRPSA4

'初始坐标
x = 1
y = 4


'最大的线筐
Printer.DrawStyle = 0
Printer.Line (x, y)-(x + 132.5, y) ......

vb打印问题

大家好，问个vb打印问题


printer.print "dsff"
.....
....


Printer.EndDoc


打印成功后我将执行

sqlstr = "update vc_yh set pr=' 已打印 ', ......

vb中可选参数的问题

function multi(a as integer,b as integer,optional third)
  dim n as integer
  n = a * b
if not ismissing (third) then
    n = n * thid
end if
multi = n
end fu ......

关于用vb处理txt的问题

由于每月从别的公司送来一个txt文件，格式如下：
   
0023939608011黄根养                                & ......

VB如何阻止某程序运行。？

比如进程加载新的程序。

在其运行之前阻止。

然后允许后放行。


比如程序主文件路径是c:\test\test.exe，建立内容任意的文件c:\test\test.exe.manifest。

就是不知道程序文件路径。

设� ......
© 2009 ej38.com All Rights Reserved. 关于E健网 | 联系我们 | 站点地图 | 赣ICP备09004571号