|
发表于 2022-4-28 09:31:43
|
显示全部楼层
福建省莆田市
.版本 2
.子程序 功能_网页访问, 文本型, , 本命令由【精易网页调试助手】生成,请配合精易模块使用。
.局部变量 局_网址, 文本型
.局部变量 局_方式, 整数型
.局部变量 ADD_数据包, 类_POST数据类
.局部变量 局_提交数据, 文本型
.局部变量 ADD_协议头, 类_POST数据类
.局部变量 局_提交协议头, 文本型
.局部变量 局_结果, 字节集
.局部变量 局_返回, 文本型
' http://zjy.jxjst.gov.cn/credit/qyRyCreditScore/queryPageList
局_网址 = "http://zjy.jxjst.gov.cn/credit/qyRyCreditScore/queryPageList"
局_方式 = 1
ADD_数据包.添加 ("cardOrName","")
ADD_数据包.添加 ("%24pgsz","1000")
局_提交数据 = ADD_数据包.获取Post数据 ()
ADD_协议头.添加 ("Content-Type","application/x-www-form-urlencoded; charset=UTF-8")
ADD_协议头.添加 ("Origin","http://zjy.jxjst.gov.cn")
ADD_协议头.添加 ("Referer","http://zjy.jxjst.gov.cn/credit/qyRyCreditScore/list")
ADD_协议头.添加 ("User-Agent","Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/50.0.2661.87 Safari/537.36")
局_提交协议头 = ADD_协议头.获取协议头数据 ()
局_结果 = 网页_访问_对象 (局_网址, 局_方式, 局_提交数据, , , 局_提交协议头, , , , , , , , , , , )
局_返回 = 到文本(编码_编码转换对象(局_结果))
返回(局_返回)
一次存1000就快了 |
|