|
发表于 2021-5-15 09:40:52
|
显示全部楼层
吉林省长春市
你自己看看吧,呵呵,要一包华子还不值?
aa = 到文本 (网页_访问_对象 (“http://mall.cfwaigua.cn/?cid=9&tid=32”, , , , , #常量11, , , , , , , , , , , , , )) hashsalt = 文本_取出中间文本 (aa, #常量12, #常量13, , )hashsalt = js. ExecJavaScriptV8 (“”, hashsalt, )调试输出 (hashsalt )协议头 = 子文本替换 ( #常量1, “{sec_defend}”, hashsalt, , , 真)a = 到文本 (网页_访问_对象 (“http://mall.cfwaigua.cn/?cid=9&tid=32”, , , , , 协议头, , , , , , , , , , , , , )) a = 编码_utf8到gb2312 (a )hashsalt = 文本_取出中间文本 (a, “hashsalt=”, “;”, , )hashsalt = js. ExecJavaScriptV8 (“”, hashsalt, )调试输出 (hashsalt )b = 到文本 (网页_访问_对象 (“http://mall.cfwaigua.cn/ajax.php?act=pay”, 1, “tid=32&inputvalue=” + 编辑框1.内容 + “&num=1&hashsalt=” + hashsalt, , , 协议头, , , , , , , , , , , , , )) json. 解析文本 (b, , )订单号1 = json. 取项目值 (“trade_no”, , , , )调试输出 (订单号1 )c = 到文本 (网页_访问_对象 (“http://mall.cfwaigua.cn/other/submit.php?type=wxpay&orderid=” + 订单号1, , , , , , , , , , , , , , , , , , )) c = 编码_utf8到gb2312 (c )id1 = 文本_取出中间文本 (c, #常量3, #常量4, , )调试输出 (id1 )d = 到文本 (网页_访问_对象 (“https://www.52ypay.cn/submit.php”, 1, “money=0.01&name=test¬ify_url=http%3A%2F%2Fmall.cfwaigua.cn%2Fother%2Fepay_notify.php&out_trade_no=” + 订单号1 + “&pid=10070&return_url=http%3A%2F%2Fmall.cfwaigua.cn%2Fother%2Fepay_return.php&sitename=WG%E8%81%94%E7%9B%9F&type=wxpay&sign=” + id1 + “&sign_type=MD5”, , , #常量6, , , , , , , , , , , , , )) d = 编码_utf8到gb2312 (d )订单号2 = 文本_取出中间文本 (d, “trade_no=”, “&”, , )调试输出 (订单号2 )e = 到文本 (网页_访问_对象 (“https://www.52ypay.cn/submit/epay/epay.php?trade_no=” + 订单号2 + “&sitename=V0fogZTnm58%3D”, , , , , #常量6, , , , , , , , , , , , , )) e = 编码_utf8到gb2312 (e )id2 = 文本_取出中间文本 (e, #常量3, #常量4, , )调试输出 (id2 )f = 到文本 (网页_访问_对象 (“https://pay.sa2y.net/submit.php?_input_charset=utf-8”, 1, “money=0.01&name=test¬ify_url=https%3A%2F%2Fwww.52ypay.cn%2Fsubmit%2Fepay%2Fepay_notify.php&out_trade_no=” + 订单号2 + “&pid=1650&return_url=https%3A%2F%2Fwww.52ypay.cn%2Fsubmit%2Fepay%2Fepay_return.php&sitename=WG%E8%81%94%E7%9B%9F&type=wxpay&sign=” + id2 + “&sign_type=MD5”, , , , , , , , , , , , , , , , )) f = 编码_utf8到gb2312 (f )id3 = 文本_取出中间文本 (f, #常量3, #常量4, , )订单号3 = 文本_取出中间文本 (f, #常量9, #常量10, , )pid = 文本_取出中间文本 (f, #常量15, #常量16, , )调试输出 (id3, pid ) g = 到文本 (网页_访问_对象 (“https://mapay.sa2y.net/submit.php”, 1, “money=0.01&name=test¬ify_url=https%3A%2F%2Fpay.sa2y.net%2Fpay%2Fepay%2Fnotify%2F” + 订单号3 + “%2F&out_trade_no=” + 订单号3 + “&pid=” + pid + “&return_url=https%3A%2F%2Fpay.sa2y.net%2Fpay%2Fepay%2Freturn%2F” + 订单号3 + “%2F&type=wxpay&sign=” + id3 + “&sign_type=MD5”, , , , , , , , , , , , , , , , )) g = 编码_utf8到gb2312 (g )调试输出 (g )网站 = 文本_取出中间文本 (g, #常量7, #常量8, , )订单号4 = 文本_取出中间文本 (g, “trade_no=”, “&”, , )调试输出 (id4, 网站 )h = 到文本 (网页_访问_对象 (“https://mapay.sa2y.net/Submit/Mcode_Get.php?trade_no=” + 订单号4, , , , , , , , , , , , , , , , , , )) h = 编码_usc2到ansi (h )调试输出 (h )json. 解析文本 (h, , )网站 = “https:” + json. 取项目值 (“data.qrcode”, , , , )网站 = 子文本替换 (网站, “\”, “”, , , 真)图片框1.图片 = HTTP读文件 (网站 )
|
|