不懂html也来学网抓（xmlhttp/winhttp+fiddler）

VBA万岁

suwenkai 发表于 2014-10-21 22:39
第二题

以前只知道对html.all.tags("table")中的行及单元格进行循环，今方知还可对html.all.tags("div")的行列进行循环。
Mark如附件：
获取航班信息数据.zip (1.86 MB, 下载次数: 735)

2014-10-22 17:09 上传

点击文件名下载附件

VBA万岁

wcymiss 发表于 2014-10-22 06:58
继续唠叨Cookie。。。

33楼的例子里，Cookie值的最初来源，来自服务器返回的回应头信息的“Set-Cookie” ...

好喜欢并期待着吴姐的唠叨......

ak47ok

每次回帖、谢谢！辛苦了。

ak47ok

wcymiss 发表于 2014-10-21 11:33
个人偏爱fiddler的原因：（唠叨话，可略过）

1、fiddler不需要寄生在浏览器中，且可抓到多个浏览器的包。 ...

请教吴姐： fiddler 与 httpwatch 如何比较？我一直在用httpwatch。
谢谢！

oyxm727

不懂啊
要学的东西真多

浮华、缠绕指尖

ak47ok 发表于 2014-10-22 21:18
请教吴姐： fiddler 与 httpwatch 如何比较？我一直在用httpwatch。
谢谢！

也是一个道理。。抓数据之前最好清缓存，都差不多。。

renahu

VBA万岁 发表于 2014-10-22 17:14
好喜欢并期待着吴姐的唠叨......

从抓下来的一大团数据中用split摘出一个一个的有用信息，有什么规律吗？数据一大团，对于新手来说都晕菜了，高手给举个例子讲解一下，谢谢

renahu

renahu 发表于 2014-10-22 22:48
从抓下来的一大团数据中用split摘出一个一个的有用信息，有什么规律吗？数据一大团，对于新手来说都晕菜了 ...

看见别的同学的作业那么漂亮，真羡慕，期待新课。。。

VBA万岁

renahu 发表于 2014-10-22 22:48
从抓下来的一大团数据中用split摘出一个一个的有用信息，有什么规律吗？数据一大团，对于新手来说都晕菜了 ...

我也是新手，一同期待wcymiss老师更多更精彩的讲解......

wcymiss

之前提过，QQ软件也可以用Fiddler抓包。
我们来抓抓群成员的清单。
1、打开fiddler，打开群聊天窗口，“群设置”-“修改我的群名片”，等待出现了群成员列表后抓包结束。
2、在fiddler里搜索任意一个群成员的昵称或群名片（最好是纯英文的）或QQ号，确认数据网页。
看下数据网页的参数和Cookie：




经过测试，只需群号、qq号、bkn、skey这几个值就ok。
代码如下：

1. Sub Main()
   
2.     Const gc As String = "" '群号
   
3.     Const bkn As String = "" '从fiddler中获取
   
4.     Const uin As String = "" 'QQ号
   
5.     Const skey As String = "" '从fiddler中获取
   
6.     Dim strText As String
   
7.     With CreateObject("WinHttp.WinHttpRequest.5.1")
   
8.         .Open "GET", "http://qinfo.clt.qq.com/cgi-bin/qun_info/get_group_members_new?gc=" & gc & "&bkn=" & bkn, False
   
9.         .setRequestHeader "Cookie", "uin=o" & uin & "; skey=" & skey
   
10.         .Send
    
11.         strText = .responsetext
    
12.         Debug.Print strText
    
13.     End With
    
14. End Sub

复制代码

QQ群管的很多操作都可以抓包。比如，踢人，同意人员入群，上传群文件，管理群文件，等等。“bkn、skey在手，QQ群管不用愁”。