蓝天、html2013、ccwan大师看到进来看看 xmlhttp法不能翻页或IE法不能获取完整源代码

bailanhong · 发表于 2015-4-9 20:59

本帖最后由 bailanhong 于 2015-4-10 21:15 编辑

对于这个网页20150331上海松江钟贾山（http://www.cfh.ac.cn/Album/ShowAlbum.aspx?albumid=4b7af393-99db-4461-a7c5-daa98b9384e5&Username=arisaema），（用户名：ceshi，密码：123456），使用xmlhttp法怎么翻页？或者使用IE发怎么能获取所有源文件？

bailanhong · 发表于 2015-4-10 21:17

请大师们帮帮忙

liucqa · 发表于 2015-4-10 23:35

用fiddler抓包看一下post

bailanhong · 发表于 2015-4-11 19:46

liucqa 发表于 2015-4-10 23:35
用fiddler抓包看一下post

抓包后是这样的，liucqa大师会吗？

bailanhong · 发表于 2015-4-11 20:13

liucqa 发表于 2015-4-10 23:35
用fiddler抓包看一下post

对于我来说这种形式的太难了

onlycxb · 发表于 2015-4-12 08:41

拜读吴姐教程吧，教程中已授渔。完整代码就不提供了，仅提示一点,senddata中，包含下述要素：
      "&ctl00%24ContentPlaceHolder_body%24TotalPages=17"  '代表总页码
   "&ctl00%24ContentPlaceHolder_body%24CurrentPage=1"  '当前页码

   这些要素可以通过第一页读取网页（GET）方法取得，循环后便可读取数据。

jpj123 · 发表于 2015-4-12 09:20

一直不敢涉足的网抓，帮你顶起来吧。

bailanhong · 发表于 2015-4-12 16:39

onlycxb 发表于 2015-4-12 08:41
拜读吴姐教程吧，教程中已授渔。完整代码就不提供了，仅提示一点,senddata中，包含下述要素：
"&c ...

      postdata = "-----------------------------7df18b2e2d07a8"
      postdata = postdata & vbCrLf & "Content-Disposition: form-data; name=""CurrentPageState"""
      postdata = postdata & vbCrLf
      postdata = postdata & vbCrLf & "BrowsePhoto"
      postdata = postdata & vbCrLf & "-----------------------------7df18b2e2d07a8"
      postdata = postdata & vbCrLf & "Content-Disposition: form-data; name=""__EVENTTARGET"""
      postdata = postdata & vbCrLf & vbCrLf
      postdata = postdata & viewstate
      postdata = postdata & vbCrLf & "-----------------------------7df18b2e2d07a8"
      postdata = postdata & vbCrLf & "Content-Disposition: form-data; name=""__EVENTARGUMENT"""
      postdata = postdata & vbCrLf & vbCrLf
      postdata = postdata & eventvalidation
      postdata = postdata & vbCrLf & "-----------------------------7df18b2e2d07a8"
      postdata = postdata & vbCrLf & "Content-Disposition: form-data; name=""ctl00$HiddenField_MasterUserName"""
      postdata = postdata & vbCrLf & vbCrLf
      postdata = postdata & "arisaema"
      postdata = postdata & vbCrLf & "-----------------------------7df18b2e2d07a8"
      postdata = postdata & vbCrLf & "Content-Disposition: form-data; name=""ctl00$HiddenField_VisitorUserName"""
      postdata = postdata & vbCrLf & vbCrLf
      postdata = postdata & "ceshi"
      postdata = postdata & vbCrLf & "-----------------------------7df18b2e2d07a8"
      postdata = postdata & vbCrLf & "Content-Disposition: form-data; name=""ess:ctr1469:YwzxInfoListView:HiddSearch"""
………………
………………
谢谢，是这种形式吗？

bailanhong · 发表于 2015-4-12 16:41

onlycxb 发表于 2015-4-12 08:41
拜读吴姐教程吧，教程中已授渔。完整代码就不提供了，仅提示一点,senddata中，包含下述要素：
"&c ...

像4楼一样有好多参数，其他参数可以不模拟吗？

bailanhong · 发表于 2015-4-12 18:23

onlycxb 发表于 2015-4-12 08:41
拜读吴姐教程吧，教程中已授渔。完整代码就不提供了，仅提示一点,senddata中，包含下述要素：
"&c ...

工作簿2.rar (18.28 KB, 下载次数: 2) 麻烦你帮我看看，是不是这种？

		自动登录	找回密码
密码			免费注册

[求助] 蓝天、html2013、ccwan大师看到进来看看 xmlhttp法不能翻页或IE法不能获取完整源代码