feat: new upload file php

wlzboy

2025-08-14 b3f8789cf8bf0d934f8431b1d7b564a756576b4b

 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
%>