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

afeionline

onlycxb 发表于 2014-10-21 17:04

    St = Split(Split(St, "<div class=""mark"">")(1), "</div>")(0)
    arr = Split(St, "<tr align='center'>")


这个什么意思

afeionline

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

If tb(i).classname = "menu_layout2" Or tb(i).classname = "listone_layout" Or tb(i).classname = "listtwo_layout" Or tb(i).classname = "menu_content_small2" Then

这个我用fillder抓出来一堆东西，怎么分析是这几个关键字的？请问？
看了不少HTML和JAVASCRIPT 感觉还是没系统没明白为啥这么取的？谢谢！

liucqa

oceanintergy 发表于 2015-6-8 21:23
@liuqca，@wcymiss，两位大神，能否行行好，也出出x-amf格式的网页采集教程哈

改学c#吧

afeionline

@wcymiss 菜鸟一枚，刚刚开始的作业二：网站：http://www.caac.gov.cn/S1/GNCX/
操作：点击“查询”，获取航班信息数据。
看到下面代码：Set tb = html.all.tags("div")  (疑问3：不明白这里为什么用DIV？)
        For i = 0 To tb.Length - 1
            If tb(i).classname = "menu_layout2" Or tb(i).classname = "listone_layout" Or tb(i).classname = "listtwo_layout" Or tb(i).classname = "menu_content_small2" Then
(疑问4：不明白这里为什么用menu_layout2、listone_layout、listtwo_layout和menu_content_small2)
                n = n + 1
                For j = 0 To tb(i).childnodes.Length - 1  （childnodes是DIV的子标签吗？）
                    Cells(n, j + 1) = tb(i).childnodes(j).innertext
                Next

            End If
        Next
    End With
End Sub

没明白为什么取menu_layout2、listone_layout、listtwo_layout和menu_content_small2？？？
用fillder取的代码很乱，网页上面直接查看代码的更看不出来了？？

afeionline

VBA万岁 发表于 2014-10-24 15:26
多谢onlycxb大侠，经你的指点，增加了如下代码，终于通过：
.Send "{type:'各省福彩'}

有空我再学习下，谢谢VBA万岁。您就是我的万岁爷啊~

williamsmile

wcymiss 发表于 2014-10-24 12:07
提取数据-下载文件
知道下载文件的真实地址，就能很方便的用xmlhttp或winhttp下载文件。

请教吴姐，如果知道下载的文件类型为msword，那么按二进制把 responseBody直接存成 *.doc文件，是否就可以被word程序打开？

小鸟飞在天上

wcymiss 发表于 2014-10-21 11:25
vba网抓常用方法：

1、xmlhttp/winhttp法：

send 后面的参数怎么确定啊，小白求指点

wzb5566

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

说出了我的心声，很羡慕高手们的代码，无形中增添了自己的压力。。。

yjjjxf

吴姐  如果一个网站 登录后还要 点击两下才能得到数据 怎么才能模拟点击呢?
第一下点击的元素:
<h4 class="">订单查询 </h4>
第二下点击的元素:
<a href="javascript:top.addTab('确认发货','/expresscrm/erp/goodsList/goodsList.do?op=list&reviewState=2')">确认发货(<span id="state2">29</span>)</a>

wcymiss

在xmlhttp和winhttp里，没有什么“点击”的概念，所有的网页操作，都转化为post和get。fiddler就是很直白的体现了这种转化。所以，只要在开启fiddler的情况下，操作网页直到网页显示所需数据，然后分析fiddler的内容，将所需的字段填入xmlhtt或winhttp的参数里，即可获取数据。