From e40f86fb35ffe1535bb66181fb0ec0c6b10e3fa8 Mon Sep 17 00:00:00 2001 From: wanglizhong <wlz> Date: 星期二, 24 六月 2025 15:27:20 +0800 Subject: [PATCH] fix:v3 orderprice update 22 ~7 1.3 --- weixin_pay_QR.asp | 5 +++++ 1 files changed, 5 insertions(+), 0 deletions(-) diff --git a/weixin_pay_QR.asp b/weixin_pay_QR.asp index 0bb4a3c..562fbbf 100644 --- a/weixin_pay_QR.asp +++ b/weixin_pay_QR.asp @@ -4,12 +4,15 @@ <!--#include virtual="/inc/odbc.asp"--> <!--#include virtual="/inc/function.gds"--> <!--#include virtual="/inc/core.asp"--> +<!--#include virtual="/inc/thirdpay.asp"--> <% Set rs = Server.CreateObject("ADODB.Recordset") DispatchOrdID = SafeRequest(trim(request("DispatchOrdID"))) ServiceOrdID = SafeRequest(trim(request("ServiceOrdID"))) Total_fee = SafeRequest(trim(request("Total_fee"))) pc = SafeRequest(trim(request("pc"))) + + if pc="1" and DispatchOrdID="" then replaceURL="/ServiceOrder.gds?ServiceOrdID="&ServiceOrdID @@ -19,6 +22,8 @@ replaceURL="/m_DispatchOrder_PaidMoney.gds?DispatchOrdID="&DispatchOrdID end if +ThirdPay "weixin",Total_fee,ServiceOrdID,DispatchOrdID,replaceURL + APPPayID = "Pay966120" trade_type = "NATIVE" If ServiceOrdID<>"" Then -- Gitblit v1.9.1