手机浏览器如何查看网页源代码（查看网页源代码快捷键）

投稿用户 • 2022年5月21日 02:01:05 • 资讯动态 • 阅读 81

大家好，我是公众号3分钟学堂的郭立员~

这两天群友接了一单定制脚本的活，采集500彩票网的开奖数据，具体细节我没问，通过问我的问题，我猜猜采集的数据可能是这个：

采集的目标网址：https://kaijiang.500.com/shtml/ssq/03001.shtml

遇到的问题是啥呢？

使用按键直接获取网页源码得到的结果是这样的：

TracePrint url.get("https://kaijiang.500.com/shtml/ssq/03001.shtml")

当前脚本第1行：<html>
<head><title>301 Moved Permanently</title></head>
<body bgcolor="white">
<center><h1>301 Moved Permanently</h1></center>
<hr><center>nginx</center>
</body>
</html>

返回的结果是301重定向（并不是报错），无法获取到网页的html源码，我用浏览器自带的抓包调试工具看了一下，也没有跳转到别的网址，猜测是网页为了限制爬虫采集，做了一个假的跳转。

因为浏览器可以正常访问页面，所以想到的方法就是伪装成浏览器获取网页源码。

说是伪装，其实就是在http请求头里面加上User-Agent参数，很多做过抓包协议的人都懂的。

这个文章就这么一个知识点，直接上源码：

Import "shanhai.lua"
Dim uri = "https://kaijiang.500.com/shtml/ssq/03001.shtml"
Dim hader = "Mozilla/5.0 (Windows NT 6.1; Win64; x64) Apple WebKit/537.36 (KHTML, like Gecko) Chrome/70.0.3538.77 Safari/537.36"
Dim date1 = {"url":uri,"code":"gb2312", "cookie":"", "header":{"User-Agent":hader}}
Dim login = Url.HttpPost(date1)
TracePrint login


Dim arr=shanhai.RegexFind(login,"<li class=""ball_.-"">(.-)</li>")
For Each k In arr
  TracePrint k
Next


Dim haoma=shanhai.RegexFind(login,"出球顺序：.-<td>(.-)<")
TracePrint haoma(0)

还有一点需要注意的，网站编码是GB2312，所以HttpPost命令的code需要修改一下，否则网页中汉字部分会出现乱码。

=正文完=

本文内容由互联网用户自发贡献，该文观点仅代表作者本人。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容，请发送邮件至 cloud@ksuyun.com 举报，一经查实，本站将立刻删除。
如若转载，请注明出处：https://www.daxuejiayuan.com/13124.html

手机浏览器如何查看网页源代码（查看网页源代码快捷键）

相关推荐