设为首页收藏本站
切换到宽版

Scripts 学盟

 找回密码
 加入学盟

QQ登录

只需一步，快速开始

Scripts 学盟 › 论坛 › 脚本开发技术 › vbscript › 怎样抓取需要登录的页面内容
返回列表 发新帖
查看: 2359|回复: 6
打印 上一主题 下一主题

怎样抓取需要登录的页面内容 [复制链接]

管理员

超级大菜鸟

Rank: 9Rank: 9Rank: 9
跳转到指定楼层
1#
混混@普宁.中国 实名认证  发表于 2011-8-30 23:00:05 |只看该作者 |倒序浏览
就是 XMLHTTP 去抓就行了。
  1. Dim x
  2. Set x = CreateObject("WinHTTP.WinHttpRequest.5.1")
  3. x.Option(6) = 0

  5. ' 先 POST 账户信息到登录验证页面
  6. x.Open "POST", "http://www.iscripts.org/login/", False
  7. x.SetRequestHeader "Content-Type", "application/x-www-form-urlencoded; charset=UTF-8"
  8. x.Send "username=%E6%B7%B7%E6%B7%B7@%E6%99%AE%E5%AE%81.%E4%B8%AD%E5%9B%BD&password=abcdefg"



  12. ' 在 x 不变的情况下，再去抓取就行了
  13. x.Open "GET", "http://www.iscripts.org/main/", False
  14. x.Send Null

  16. WScript.Echo x.ResponseText
复制代码
分享到: QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
分享分享0 收藏收藏0
超级大菜鸟，每天要自强！

使用道具 举报

管理员

超级大菜鸟

Rank: 9Rank: 9Rank: 9
2#
混混@普宁.中国 实名认证  发表于 2011-8-30 23:27:08 |只看该作者
  1. Dim x, i, m, ms, cookies
  2. Set x = CreateObject("WinHTTP.WinHttpRequest.5.1")
  3. x.Option(6) = 0

  5. ' 先 POST 账户信息到登录验证页面
  6. x.Open "GET", "http://www.iscripts.org/forum.php", False
  7. x.SetRequestHeader "Content-Type", "application/x-www-form-urlencoded; charset=UTF-8"
  8. x.Send "username=%E6%B7%B7%E6%B7%B7@%E6%99%AE%E5%AE%81.%E4%B8%AD%E5%9B%BD&password=abcdefg"

  10. ' 保存 cookie
  11. With New RegExp
  12.         .Pattern = "Set-Cookie:\s*([^;]+)"
  13.         .Global  = True
  14.         .IgnoreCase = True
  15.         Set ms = .Execute(x.GetAllResponseHeaders())
  16.         ReDim cookies(ms.Count - 1)
  17.         For i = 0 To UBound(cookies)
  18.                 cookies(i) = ms.Item(i).SubMatches(0)
  19.         Next
  20. End With
  21. cookies = Join(cookies, "; ")



  25. ' 如果保存了 cookie, 那么在服务器 Session 记录未失效之前
  26. ' 把 cookie 提交，也能保持原来的会话
  27. Set x = CreateObject("WinHTTP.WinHttpRequest.5.1")
  28. x.Open "GET", "http://www.iscripts.org/main/", False
  29. x.SetRequestHeader "Cookie", cookies
  30. x.Send Null


  33. WScript.Echo x.ResponseText
复制代码
超级大菜鸟，每天要自强！

使用道具 举报

Rank: 7Rank: 7Rank: 7
3#
依依 发表于 2011-9-8 11:46:07 |只看该作者
看到了就有点感觉 但是现在让我去研究这些东西 需要非常静

使用道具 举报

Rank: 8Rank: 8
4#
那个谁 发表于 2012-9-21 10:05:17 |只看该作者
很好！这样我就能写抓取程序了！

使用道具 举报

管理员

超级大菜鸟

Rank: 9Rank: 9Rank: 9
5#
混混@普宁.中国 实名认证  发表于 2012-9-21 21:25:34 |只看该作者
那个谁 发表于 2012-9-21 10:05
很好！这样我就能写抓取程序了！

你去偷谁的内容了
超级大菜鸟，每天要自强！

使用道具 举报

Rank: 8Rank: 8
6#
那个谁 发表于 2012-9-22 08:38:48 |只看该作者
混混@普宁.中国 发表于 2012-9-21 21:25
你去偷谁的内容了

给个例子啊，你昨天说的那个没弄出来。

使用道具 举报

管理员

超级大菜鸟

Rank: 9Rank: 9Rank: 9
7#
混混@普宁.中国 实名认证  发表于 2012-9-28 23:53:45 |只看该作者
那个谁 发表于 2012-9-22 08:38
给个例子啊，你昨天说的那个没弄出来。

上面就是例子呀，只不过是 VBS 的
超级大菜鸟，每天要自强！

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 加入学盟

手机版|Scripts 学盟   |

GMT+8, 2024-5-5 22:03 , Processed in 1.054211 second(s), 11 queries .

Powered by Discuz! X2

© 2001-2011 Comsenz Inc.

回顶部