代码纠错

wyzskwb001

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

子程序名	返回值类型	公开	备 注
功能_精易_网页_访问	文本型		本子程序由Sunny中间件生成,请配合 [精易模块] 使用。

变量名	类 型	静态	数组	备 注
局_网址	文本型
局_提交cookie	文本型
协议头	类_POST数据类
局_结果	字节集
局_返回	文本型
json	类_json
p0	文本型
地区	文本型
P89	文本型
P92	文本型
P95	文本型
P98	文本型
时间	文本型
省份	文本型

如果真 (寻找文本 (编辑框1.内容, “省”, 1, 假) ＞ 0)
编辑框1.内容 ＝ 子文本替换 (编辑框1.内容, “省”, “”, , , 真)

省份 ＝ 编码_URL编码 (编辑框1.内容, , 真)
局_网址 ＝ “https://api.qqsuu.cn/api/dm-oilprice?prov=” ＋ 省份
协议头.添加 (“Accept”, “text/html,application/xhtml+xml,application/xml;q=0.9,image/avif,image/webp,image/apng,*/*;q=0.8,application/signed-exchange;v=b3;q=0.7”)
协议头.添加 (“Accept-Language”, “zh-CN,zh;q=0.9,en;q=0.8,en-GB;q=0.7,en-US;q=0.6”)
协议头.添加 (“Connection”, “keep-alive”)
协议头.添加 (“Host”, “api.qqsuu.cn”)
协议头.添加 (“Sec-Fetch-Dest”, “document”)
协议头.添加 (“Sec-Fetch-Mode”, “navigate”)
协议头.添加 (“Sec-Fetch-Site”, “none”)
协议头.添加 (“Sec-Fetch-User”, “?1”)
协议头.添加 (“Upgrade-Insecure-Requests”, “1”)
协议头.添加 (“User-Agent”, “Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/131.0.0.0 Safari/537.36 Edg/131.0.0.0”)
协议头.添加 (“sec-ch-ua”, 子文本替换 (“'Microsoft Edge';v='131', 'Chromium';v='131', 'Not_A Brand';v='24'”, “'”, #引号, , , 真))
协议头.添加 (“sec-ch-ua-mobile”, “?0”)
协议头.添加 (“sec-ch-ua-platform”, 子文本替换 (“'Windows'”, “'”, #引号, , , 真))
局_结果 ＝ 网页_访问 (局_网址, 0, , 局_提交cookie, , 协议头.获取协议头数据 ())
局_返回 ＝ 编码_Utf8到Ansi (局_结果)
如果 (寻找文本 (局_返回, “null”, 1, 假) ＞ 0)
标签7.标题 ＝ “cha询失败”
标签7.标题 ＝ “cha询成功”
json.解析 (局_返回)
时间 ＝ json.取通用属性 (“data.time”, )
时间 ＝ 取文本左边 (时间, 10)
P92 ＝ json.取通用属性 (“data.p92”, )
P95 ＝ json.取通用属性 (“data.p95”, )
P98 ＝ json.取通用属性 (“data.p98”, )
p0 ＝ json.取通用属性 (“data.p0”, )
编辑框2.内容 ＝ 时间
编辑框3.内容 ＝ P92 ＋ “元/升”
编辑框4.内容 ＝ P95 ＋ “元/升”
编辑框5.内容 ＝ P98 ＋ “元/升”
编辑框6.内容 ＝ p0 ＋ “元/升”

返回 (局_返回)

子程序名	返回值类型	公开	备 注
_按钮2_被单击

编辑框2.内容 ＝ “”
编辑框3.内容 ＝ “”
编辑框4.内容 ＝ “”
编辑框5.内容 ＝ “”
编辑框6.内容 ＝ “”
功能_精易_网页_访问 ()

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> <br /> <br /> .子程序 功能_精易_网页_访问, 文本型, , 本子程序由Sunny中间件生成,请配合 [精易模块] 使用。<br /> .局部变量 局_网址, 文本型<br /> .局部变量 局_提交cookie, 文本型<br /> .局部变量 协议头, 类_POST数据类<br /> .局部变量 局_结果, 字节集<br /> .局部变量 局_返回, 文本型<br /> .局部变量 json, 类_json<br /> .局部变量 p0, 文本型<br /> .局部变量 地区, 文本型<br /> .局部变量 P89, 文本型<br /> .局部变量 P92, 文本型<br /> .局部变量 P95, 文本型<br /> .局部变量 P98, 文本型<br /> .局部变量 时间, 文本型<br /> .局部变量 省份, 文本型<br /> <br /> <br /> .如果真 (寻找文本 (编辑框1.内容, “省”, 1, 假) ＞ 0)<br />     编辑框1.内容 ＝ 子文本替换 (编辑框1.内容, “省”, “”, , , 真)<br /> .如果真结束<br /> <br /> 省份 ＝ 编码_URL编码 (编辑框1.内容, , 真)<br /> 局_网址 ＝ “https://api.qqsuu.cn/api/dm-oilprice?prov=” ＋ 省份<br /> 协议头.添加 (“Accept”, “text/html,application/xhtml+xml,application/xml;q=0.9,image/avif,image/webp,image/apng,*/*;q=0.8,application/signed-exchange;v=b3;q=0.7”)<br /> 协议头.添加 (“Accept-Language”, “zh-CN,zh;q=0.9,en;q=0.8,en-GB;q=0.7,en-US;q=0.6”)<br /> 协议头.添加 (“Connection”, “keep-alive”)<br /> 协议头.添加 (“Host”, “api.qqsuu.cn”)<br /> 协议头.添加 (“Sec-Fetch-Dest”, “document”)<br /> 协议头.添加 (“Sec-Fetch-Mode”, “navigate”)<br /> 协议头.添加 (“Sec-Fetch-Site”, “none”)<br /> 协议头.添加 (“Sec-Fetch-User”, “?1”)<br /> 协议头.添加 (“Upgrade-Insecure-Requests”, “1”)<br /> 协议头.添加 (“User-Agent”, “Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/131.0.0.0 Safari/537.36 Edg/131.0.0.0”)<br /> 协议头.添加 (“sec-ch-ua”, 子文本替换 (“'Microsoft Edge';v='131', 'Chromium';v='131', 'Not_A Brand';v='24'”, “'”, #引号, , , 真))<br /> 协议头.添加 (“sec-ch-ua-mobile”, “?0”)<br /> 协议头.添加 (“sec-ch-ua-platform”, 子文本替换 (“'Windows'”, “'”, #引号, , , 真))<br /> 局_结果 ＝ 网页_访问 (局_网址, 0, , 局_提交cookie, , 协议头.获取协议头数据 ())<br /> 局_返回 ＝ 编码_Utf8到Ansi (局_结果)<br /> .如果 (寻找文本 (局_返回, “null”, 1, 假) ＞ 0)<br />     标签7.标题 ＝ “cha询失败”<br /> .否则<br />     标签7.标题 ＝ “cha询成功”<br />     json.解析 (局_返回)<br />     时间 ＝ json.取通用属性 (“data.time”, )<br />     时间 ＝ 取文本左边 (时间, 10)<br />     P92 ＝ json.取通用属性 (“data.p92”, )<br />     P95 ＝ json.取通用属性 (“data.p95”, )<br />     P98 ＝ json.取通用属性 (“data.p98”, )<br />     p0 ＝ json.取通用属性 (“data.p0”, )<br />     编辑框2.内容 ＝ 时间<br />     编辑框3.内容 ＝ P92 ＋ “元/升”<br />     编辑框4.内容 ＝ P95 ＋ “元/升”<br />     编辑框5.内容 ＝ P98 ＋ “元/升”<br />     编辑框6.内容 ＝ p0 ＋ “元/升”<br /> <br /> .如果结束<br /> <br /> 返回 (局_返回)<br /> <br /> .子程序 _按钮2_被单击<br /> <br /> 编辑框2.内容 ＝ “”<br /> 编辑框3.内容 ＝ “”<br /> 编辑框4.内容 ＝ “”<br /> 编辑框5.内容 ＝ “”<br /> 编辑框6.内容 ＝ “”<br /> <br /> 功能_精易_网页_访问 ()

冰墩墩

快乐的大胖子

  

cha询 (“广东”)

子程序名	返回值类型	公开	备 注
cha询
参数名	类 型	参考	可空	数组	备 注
省份	文本型

变量名	类 型	静态	数组	备 注
a	字节集
b	文本型
JSON	类_json

a ＝ 网页_访问_对象 (“https://api.qqsuu.cn/api/dm-oilprice?prov=” ＋ 省份, 0, , , , , , , , , , , , , , , , , )
' 调试输出 (到文本 (a))
b ＝ 编码_URL解码 (到文本 (a), 真)
如果真 (JSON.解析 (b, , ))
调试输出 (JSON.取通用属性 (“data.prov”, ))
调试输出 (JSON.取通用属性 (“data.p0”, ))
调试输出 (JSON.取通用属性 (“data.p89”, ))
调试输出 (JSON.取通用属性 (“data.p92”, ))
调试输出 (JSON.取通用属性 (“data.p95”, ))
调试输出 (JSON.取通用属性 (“data.p98”, ))
调试输出 (JSON.取通用属性 (“data.time”, ))

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> cha询 (“广东”)<br /> <br /> <br /> .子程序 cha询<br /> .参数 省份, 文本型, 可空<br /> .局部变量 a, 字节集<br /> .局部变量 b, 文本型<br /> .局部变量 JSON, 类_json<br /> <br /> <br /> a ＝ 网页_访问_对象 (“https://api.qqsuu.cn/api/dm-oilprice?prov=” ＋ 省份, 0, , , , , , , , , , , , , , , , , )<br /> ' 调试输出 (到文本 (a))<br /> b ＝ 编码_URL解码 (到文本 (a), 真)<br /> <br /> <br /> .如果真 (JSON.解析 (b, , ))<br />     调试输出 (JSON.取通用属性 (“data.prov”, ))<br />     调试输出 (JSON.取通用属性 (“data.p0”, ))<br />     调试输出 (JSON.取通用属性 (“data.p89”, ))<br />     调试输出 (JSON.取通用属性 (“data.p92”, ))<br />     调试输出 (JSON.取通用属性 (“data.p95”, ))<br />     调试输出 (JSON.取通用属性 (“data.p98”, ))<br />     调试输出 (JSON.取通用属性 (“data.time”, ))<br /> .如果真结束