抓包后怎么填表问题

yunyuhan · 发表于 2023-6-14 21:54:54

我们公司的一个微小店链接，里面可以显示我上架的所有商品卡
https://91haoka.cn/gth/#/minishop?share_id=489433&shop_name=%25E6%259E%2581%25E5%25BA%25A6%25E7%25A7%2591%25E6%258A%2580
但是这个h5界面太丑了。我自己写了一个简易的进行了分类。
但是目前遇到一个问题就是，在后台一个个添加卡太累了。就寻思着抓包这个链接里面的。ansi
尝试之后，https://91haoka.cn/api/plan-market/order-pages/for-web?_page_size=20&page=1&share_id=489433这个URL里面可以获取到所有信息，但是我解码usc2-ansi后只有商品名字和文字信息以及图片，没有id值。使用FD抓包后JSON里面有id值
问题1：这个id怎么获取，如果可以获取，那么https://91haoka.cn/webapp/merchant/templet1.html?share_id=489433&后面加上id=id值就可以获取到下单的链接了。
问题2：很久没有接触易了，那个啥，

列表循环怎么写来着？我抓包后列表就写进去了一个，第二个怎么都加不进去了。。。
问题3：易语言的填表是怎么实现的，模拟输入还是直接提交。我有自己的网站服务器以及后台。如果大佬解答需要，我这边可以买一台新机子搭建一个模板供为参考

一曲离歌 · 发表于 2023-6-14 21:54:55

https://***aoka.**/api/*****_page_size=200&page=1&share_id=*****

此链接的响应文为：Content-Type:
application/json，

并不需要
usc2-ansi 转码，是json信息，可直接解析

_page_size=200&page=1，经过测试，原值20，可以修改为200，
通过一次请求，取回店铺基本全部商品，避免多次请求

代码中，给出了超级列表框和列表框两种置入文本的操作，可供参考

json这块，用的是懒人方法，取通用属性，这个会用就差不多了。

其实没必要填表了，后台都是自己的，协议不安逸嘛

窗口程序集名	保留	保留	备注
窗口程序集_启动窗口
变量名	类型	数组	备注
网页详情源码	文本型

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

启动线程 (&网页_取回商品详情, , )

子程序名	返回值类型	公开	备注
网页_取回商品详情	文本型		本命令由【精易网页调试助手】生成，请配合精易模块使用。

变量名	类型	静态	数组	备注
局_网址	文本型
局_方式	整数型
ADD_协议头	类_POST数据类
局_提交协议头	文本型
局_结果	字节集
局_返回	文本型

' https://91haoka.cn/api/plan-market/order-pages/for-web?_page_size=200&page=1&share_id=489433
' _page_size=200&page=1 测试后，可修改数值达到一次连接取回效果
局_网址＝ “https://91haoka.cn/api/plan-market/order-pages/for-web?_page_size=200&page=1&share_id=489433”
局_方式＝ 0
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_协议头.获取协议头数据 ()
局_结果＝网页_访问 (局_网址, 局_方式, , , , 局_提交协议头, , , , , )
局_返回＝到文本 (局_结果)
网页详情源码＝局_返回
返回 (局_返回)

子程序名	返回值类型	公开	备注
功能_解析商品到列表

变量名	类型	静态	数组	备注
json	类_json
测试txt	文本型
商品ID	文本型
I	整数型
索引	整数型
商品标题	文本型
商品图片	文本型

json.解析 (网页详情源码)
测试txt ＝ json.取通用属性 (“data.data[69].title”)
调试输出 (“测试txt”, 测试txt)

循环判断首 ()

商品ID ＝ json.取通用属性 (“data.data[” ＋到文本 (I) ＋ “].id”)

商品标题＝ json.取通用属性 (“data.data[” ＋到文本 (I) ＋ “].title”)

商品图片＝ json.取通用属性 (“data.data[” ＋到文本 (I) ＋ “].image1”)

如果真 (商品ID ≠ “”)

' 超级列表框1加入内容

索引＝超级列表框1.插入表项 (, , , , , )

超级列表框1.置标题 (索引, 0, 到文本 (I ＋ 1))

超级列表框1.置标题 (索引, 1, 商品ID)

' 列表加入内容

列表框1.加入项目 (商品ID, )

I ＝ I ＋ 1

循环判断尾 (商品ID ≠ “”)
json.清除 ()

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

功能_解析商品到列表 ()

i支持库列表	支持库注释
EThread	多线程支持库
spec	特殊功能支持库
iext	扩展界面支持库一

.版本 2<br />
.支持库 EThread<br />
.支持库 spec<br />
.支持库 iext<br />
<br />
.程序集 窗口程序集_启动窗口<br />
.程序集变量 网页详情源码, 文本型<br />
<br />
.子程序 __启动窗口_创建完毕<br />
<br />
<br />
启动线程 (&网页_取回商品详情, , )<br />
<br />
.子程序 网页_取回商品详情, 文本型, , 本命令由【精易网页调试助手】生成，请配合精易模块使用。<br />
.局部变量 局_网址, 文本型<br />
.局部变量 局_方式, 整数型<br />
.局部变量 ADD_协议头, 类_POST数据类<br />
.局部变量 局_提交协议头, 文本型<br />
.局部变量 局_结果, 字节集<br />
.局部变量 局_返回, 文本型<br />
<br />
' https://91haoka.cn/api/plan-market/order-pages/for-web?_page_size=200&page=1&share_id=489433<br />
' _page_size=200&page=1   测试后，可修改数值达到一次连接取回效果<br />
<br />
局_网址 ＝ “https://91haoka.cn/api/plan-market/order-pages/for-web?_page_size=200&page=1&share_id=489433”<br />
局_方式 ＝ 0<br />
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”)<br />
<br />
局_提交协议头 ＝ ADD_协议头.获取协议头数据 ()<br />
<br />
局_结果 ＝ 网页_访问 (局_网址, 局_方式, , , , 局_提交协议头, , , , , )<br />
局_返回 ＝ 到文本 (局_结果)<br />
网页详情源码 ＝ 局_返回<br />
返回 (局_返回)<br />
<br />
<br />
.子程序 功能_解析商品到列表<br />
.局部变量 json, 类_json<br />
.局部变量 测试txt, 文本型<br />
.局部变量 商品ID, 文本型<br />
.局部变量 I, 整数型<br />
.局部变量 索引, 整数型<br />
.局部变量 商品标题, 文本型<br />
.局部变量 商品图片, 文本型<br />
<br />
<br />
json.解析 (网页详情源码)<br />
测试txt ＝ json.取通用属性 (“data.data[69].title”)<br />
调试输出 (“测试txt”, 测试txt)<br />
<br />
.循环判断首 ()<br />
    商品ID ＝ json.取通用属性 (“data.data[” ＋ 到文本 (I) ＋ “].id”)<br />
    商品标题 ＝ json.取通用属性 (“data.data[” ＋ 到文本 (I) ＋ “].title”)<br />
    商品图片 ＝ json.取通用属性 (“data.data[” ＋ 到文本 (I) ＋ “].image1”)<br />
    .如果真 (商品ID ≠ “”)<br />
        ' 超级列表框1加入内容<br />
        索引 ＝ 超级列表框1.插入表项 (, , , , , )<br />
        超级列表框1.置标题 (索引, 0, 到文本 (I ＋ 1))<br />
        超级列表框1.置标题 (索引, 1, 商品ID)<br />
<br />
        ' 列表加入内容<br />
        列表框1.加入项目 (商品ID, )<br />
<br />
        I ＝ I ＋ 1<br />
<br />
    .如果真结束<br />
<br />
.循环判断尾 (商品ID ≠ “”)<br />
json.清除 ()<br />
<br />
<br />
.子程序 _按钮1_被单击<br />
<br />
功能_解析商品到列表 ()