|
发表于 2024-4-6 16:35:39
|
显示全部楼层
安徽省蚌埠市
.版本 2
.子程序 功能_网页访问, 文本型, , 本命令由【精易网页调试助手】生成,请配合精易模块使用。
.局部变量 局_网址, 文本型
.局部变量 局_方式, 整数型
.局部变量 ADD_协议头, 类_POST数据类
.局部变量 局_提交协议头, 文本型
.局部变量 局_结果, 字节集
.局部变量 局_返回, 文本型
' http://wxread-a-10303604-thexcvbnchg2.cos.com.thexcvbnchg.homes/myindex.html?79549da1969a64444e940fae1a9029a8
局_网址 = "http://wxread-a-10303604-thexcvbnchg2.cos.com.thexcvbnchg.homes/myindex.html?79549da1969a64444e940fae1a9029a8"
局_方式 = 0
ADD_协议头.添加 ("Host","wxread-a-10303604-thexcvbnchg2.cos.com.thexcvbnchg.homes")
ADD_协议头.添加 ("Connection","keep-alive")
ADD_协议头.添加 ("Upgrade-Insecure-Requests","1")
ADD_协议头.添加 ("Accept","text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8")
ADD_协议头.添加 ("User-Agent","Mozilla/5.0 (iPhone; CPU iPhone OS 14_1 like Mac OS X) AppleWebKit/605.1.15 (KHTML, like Gecko) Mobile/15E148 MicroMessenger/8.0.48(0x1800302d) NetType/WIFI Language/zh_CN")
ADD_协议头.添加 ("Accept-Language","zh-cn")
ADD_协议头.添加 ("Connection","keep-alive")
ADD_协议头.添加 ("Content-Length","0")
局_提交协议头 = ADD_协议头.获取协议头数据 ()
局_结果 = 网页_访问_对象 (局_网址, 局_方式, , , , 局_提交协议头, , , , , , , , , , , )
局_返回 = 到文本(编码_编码转换对象(局_结果))
返回(局_返回) |
|