feat(派单模块): 添加敏感信息隐藏功能

wanglizhong

2025-06-24 a51d070d364b0da8e5f8ea9203a6e50c8b4c0af3

 API/inc/thirdpay.asp

@@ -1,6 +1,6 @@
<%
'第三方支付
Function ThirdPay(PayMoney,ServiceOrdID,DispatchOrdID)
Function ThirdPay(PayType,PayMoney,ServiceOrdID,DispatchOrdID)
'PayType:支付类型
'PayMoney:支付金额
'ServiceOrdID:服务单ID 
@@ -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
%>