易语言通过大商创API实现新订单提醒并播放提醒音乐

飘雲

特别鸣谢
精易模块作者方 精易科技

调用的模块 【精易模块】
使用方法
自行添加组件【按钮1】 【按钮2】 【编辑框1】更改   https://填写你的大商创商城地址/api.php?app_key=填写你的app_key&   内容

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
新时间戳	文本型
旧时间戳	文本型

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

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

读取订单 ()

子程序名	返回值类型	公开	备 注
_时钟1_周期事件

读取订单 ()

子程序名	返回值类型	公开	备 注
读取订单

变量名	类 型	静态	数组	备 注
XML	字节集
文本	文本型
oldnum路径	文本型
订单编号数组	文本型		0
订单数	整数型
旧订单编号	文本型

新时间戳 ＝ 到文本 (到数值 (时间_取现行时间戳 (真)) － 28800)
旧时间戳 ＝ 到文本 (到整数 (新时间戳) － 30)
调试输出 (新时间戳)
调试输出 (旧时间戳)
XML ＝ 网页_访问 (“https://填写你的大商创商城地址/api.php?app_key=填写你的app_key&method=dsc.order.list.get&start_add_time=” ＋ 旧时间戳 ＋ “&end_add_time=” ＋ 新时间戳 ＋ “&format=xml”, , , , , , , , , , , , , )
文本 ＝ 编码_Utf8到Ansi (XML)
编辑框1.内容 ＝ 文本
写到文件 (取运行目录 () ＋ “\XML.TXT”, 到字节集 (文本))
文本_取中间_批量 (文本, “”, “”, 订单编号数组, , , , , , , )
订单数 ＝ 取数组成员数 (订单编号数组)
如果真 (订单数 ＜ 1)
返回 ()

oldnum路径 ＝ 取运行目录 () ＋ “\oldnum.log”
如果真 (文件是否存在 (oldnum路径) ＝ 假)
写到文件 (oldnum路径, {  })

如果真 (订单编号数组 [订单数] ≠ 读配置项 (oldnum路径, “oldnum”, “oldnum”, ))
播放MP3 (1, 取运行目录 () ＋ “\click.mp3”)

写配置项 (oldnum路径, “oldnum”, “oldnum”, 订单编号数组 [订单数])

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

时钟1.时钟周期 ＝ 3000

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

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 新时间戳, 文本型<br /> .程序集变量 旧时间戳, 文本型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> <br /> <br /> .子程序 _按钮2_被单击<br /> <br /> 读取订单 ()<br /> <br /> <br /> .子程序 _时钟1_周期事件<br /> <br /> 读取订单 ()<br /> <br /> .子程序 读取订单<br /> .局部变量 XML, 字节集<br /> .局部变量 文本, 文本型<br /> .局部变量 oldnum路径, 文本型<br /> .局部变量 订单编号数组, 文本型, , "0"<br /> .局部变量 订单数, 整数型<br /> .局部变量 旧订单编号, 文本型<br /> <br /> <br /> <br /> 新时间戳 ＝ 到文本 (到数值 (时间_取现行时间戳 (真)) － 28800)<br /> 旧时间戳 ＝ 到文本 (到整数 (新时间戳) － 30)<br /> <br /> 调试输出 (新时间戳)<br /> 调试输出 (旧时间戳)<br /> <br /> XML ＝ 网页_访问 (“https://填写你的大商创商城地址/api.php?app_key=填写你的app_key&method=dsc.order.list.get&start_add_time=” ＋ 旧时间戳 ＋ “&end_add_time=” ＋ 新时间戳 ＋ “&format=xml”, , , , , , , , , , , , , )<br /> 文本 ＝ 编码_Utf8到Ansi (XML)<br /> <br /> 编辑框1.内容 ＝ 文本<br /> <br /> <br /> 写到文件 (取运行目录 () ＋ “\XML.TXT”, 到字节集 (文本))<br /> 文本_取中间_批量 (文本, “”, “”, 订单编号数组, , , , , , , )<br /> <br /> 订单数 ＝ 取数组成员数 (订单编号数组)<br /> <br /> <br /> .如果真 (订单数 ＜ 1)<br />     返回 ()<br /> .如果真结束<br /> <br /> <br /> <br /> <br /> oldnum路径 ＝ 取运行目录 () ＋ “\oldnum.log”<br /> .如果真 (文件是否存在 (oldnum路径) ＝ 假)<br />     写到文件 (oldnum路径, {  })<br /> .如果真结束<br /> <br /> .如果真 (订单编号数组 [订单数] ≠ 读配置项 (oldnum路径, “oldnum”, “oldnum”, ))<br />     播放MP3 (1, 取运行目录 () ＋ “\click.mp3”)<br /> .如果真结束<br /> <br /> 写配置项 (oldnum路径, “oldnum”, “oldnum”, 订单编号数组 [订单数])<br /> <br /> <br /> .子程序 _按钮1_被单击<br /> <br /> 时钟1.时钟周期 ＝ 3000

click.rar (174.45 KB, 下载次数: 14)

2022-9-29 16:48 上传

点击文件名下载附件
提示音放在根目录

taodile

栓Q 学到了

zq6817344

飘雲

steve 发表于 2022-10-3 17:07
之前Tao宝买了个大商创，麻蛋有后门，给大家提个醒，这类商城程序还是要走正规途径，小心贪小便宜吃大亏{:7 ...

steve

之前Tao宝买了个大商创，麻蛋有后门，给大家提个醒，这类商城程序还是要走正规途径，小心贪小便宜吃大亏

nenxifugebi

软件有了上哪弄订单去

醉卧美人膝

666666666666666

kanke1257

大商创是个什么东西？不明觉厉

huxian

大商创是个什么东西？不明觉厉

飘雲

396384183 发表于 2022-9-30 01:13
到数值 (时间_取现行时间戳 (真)

栓Q 学到了