From a0a942c610f7069a3e252ad6aca632c7152e43f7 Mon Sep 17 00:00:00 2001 From: wanglizhong <wlz> Date: 星期一, 05 五月 2025 11:17:23 +0800 Subject: [PATCH] fix:优化taskList报错,增加thirdpay.asp --- inc/thirdpay.asp | 18 ++++++++++++++++++ 1 files changed, 18 insertions(+), 0 deletions(-) diff --git a/inc/thirdpay.asp b/inc/thirdpay.asp new file mode 100644 index 0000000..2d40a68 --- /dev/null +++ b/inc/thirdpay.asp @@ -0,0 +1,18 @@ +<% +'绗笁鏂规敮浠� +Function ThirdPay(PayMoney,ServiceOrdID,DispatchOrdID) +'PayType:鏀粯绫诲瀷 +'PayMoney:鏀粯閲戦 +'ServiceOrdID:鏈嶅姟鍗旾D +'DispatchOrdID:璋冨害鍗旾D +Set rs = Server.CreateObject("ADODB.Recordset") +sql="select * from ServiceOrder where ServiceOrdID="&ServiceOrdID +rs.open sql,objConn,1,1 +If not rs.Eof then + PayQRcodeURL = rs("PayQRcodeURL") + PayQRcodeURL = PayQRcodeURL&"?PayType="&PayType&"&PayMoney="&PayMoney&"&ServiceOrdID="&ServiceOrdID&"&DispatchOrdID="&DispatchOrdID + Response.Redirect PayQRcodeURL +End If +rs.close() +End Function +%> \ No newline at end of file -- Gitblit v1.9.1