From a51d070d364b0da8e5f8ea9203a6e50c8b4c0af3 Mon Sep 17 00:00:00 2001
From: wanglizhong <wlz>
Date: 星期三, 09 七月 2025 22:06:34 +0800
Subject: [PATCH] feat(派单模块): 添加敏感信息隐藏功能
---
API/inc/thirdpay.asp | 10 ++++++++--
1 files changed, 8 insertions(+), 2 deletions(-)
diff --git a/API/inc/thirdpay.asp b/API/inc/thirdpay.asp
index a469e80..2685b08 100644
--- a/API/inc/thirdpay.asp
+++ b/API/inc/thirdpay.asp
@@ -1,6 +1,6 @@
<%
'绗笁鏂规敮浠�
-Function ThirdPay(PayMoney,ServiceOrdID,DispatchOrdID)
+Function ThirdPay(PayType,PayMoney,ServiceOrdID,DispatchOrdID)
'PayType:鏀粯绫诲瀷
'PayMoney:鏀粯閲戦
'ServiceOrdID:鏈嶅姟鍗旾D
@@ -11,10 +11,16 @@
If not rs.Eof then
PayQRcodeURL = rs("PayQRcodeURL")
if PayQRcodeURL<>"" Then
- PayQRcodeURL = PayQRcodeURL&"?PayMoney="&PayMoney&"&ServiceOrdID="&ServiceOrdID&"&DispatchOrdID="&DispatchOrdID
+ PayQRcodeURL = PayQRcodeURL&"?PayType="&PayType&"&PayMoney="&PayMoney&"&ServiceOrdID="&ServiceOrdID&"&DispatchOrdID="&DispatchOrdID
Response.Redirect PayQRcodeURL
End If
End If
rs.close()
End Function
+
+Function buildPayURL(PayType,PayMoney,ServiceOrdID,DispatchOrdID,PayQRcodeURL)
+ Dim PayURL
+ PayURL = PayQRcodeURL&"?PayType="&PayType&"&PayMoney="&PayMoney&"&ServiceOrdID="&ServiceOrdID&"&DispatchOrdID="&DispatchOrdID
+ buildPayURL = PayURL
+End Function
%>
\ No newline at end of file
--
Gitblit v1.9.1