易如意支付类库1.1

易如意 · 发表于 2020-4-2 01:40:41

更新一下如意支付类库1.1，由于本次更新了验证系统之后之前的如意支付类库1.0就没法使用了。
很多人玩不来，由于近期时间比较紧张，今天抽空更新一下。

使用方法如下，非常的简单：

变量订单号为文本型
事件按钮1.被单击()
如果如意支付1.是否安装支付宝() = 真则
订单号 = 如意支付1.获取订单()
变量数据为文本型 = "order=" & 订单号 & "&token=" & 公用模块.token & "&way=ali&gid="& 编辑框_gid.内容 &"&ua=1&t=" & 取现行时间戳(2)
如意支付1.发起支付(公用模块.api & "pay",数据)
否则
弹出提示("请先安装支付宝")
结束如果
结束事件
事件如意支付1.支付完毕(订单号为文本型)
显示进度对话框("结果查询中...")
变量数据为文本型 = "oid=" & 订单号 & "&t=" & 取现行时间戳(2)
变量签名为文本型 = "&sign=" & 公用模块.数据签名(数据)
变量 data 为文本型 = "data=" & RC4加密(数据,公用模块.RC4KEY)
多线程1.开始发送网络数据(公用模块.api & "pay_res",data & 签名,"utf8")
结束事件
事件多线程1.发送网络数据完毕(结果为文本型)
关闭进度对话框()
变量 JS对象为对象 = JSON操作1.解析(结果)
变量 code 为文本型 = JSON操作1.取文本值(JS对象,"code")
如果结果 = "" 则
弹出提示("网络不给力")
否则如果 code = "154" 则
弹出提示("等待支付")
否则如果 code = "201" 则
弹出提示("充值失败,请联系客服")
否则如果 code = "200" 则
弹出提示("充值成功")
否则
弹出提示("未知订单状态,请联系客服")
结束如果
结束事件
事件按钮2.被单击()
如果如意支付1.是否安装微信() = 真则
订单号 = 如意支付1.获取订单()
变量数据为文本型 = "order=" & 订单号 & "&token=" & 公用模块.token & "&way=wx&gid="& 编辑框_gid.内容 &"&ua=1&t=" & 取现行时间戳(2)
如意支付1.发起支付(公用模块.api & "pay",数据)
否则
弹出提示("请先安装微信")
结束如果
结束事件

复制代码

使用效果如下：

hc16888 · 发表于 2024-2-16 01:02:26

99999999999999999999999999

maker4166 · 发表于 2023-12-10 12:00:40

66666666666666666666666

天下有你 · 发表于 2022-6-28 19:43:37

还要刷分

天下有你 · 发表于 2022-6-28 19:42:46

看不成，

sara · 发表于 2022-5-18 13:59:55

h'f'g'h'j'n'f'f't'h'f

wntkthh · 发表于 2021-8-12 01:07:01

我太难了啊

wntkthh · 发表于 2021-8-12 01:06:40

少两份啊

wntkthh · 发表于 2021-8-12 01:04:22

类库是难题啊

micoropct · 发表于 2021-5-7 22:53:57

没有积分但是想用

热心会员

国庆节纪念勋章

活跃会员