【调度系统】广东民航医疗快线调度系统源代码
wanglizhong
2025-05-05 8a7dab004bc3eca7808d0cc196a329464402bbc9
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
<% @LANGUAGE="VBSCRIPT" CODEPAGE="65001" %> 
<% Session.CodePage=65001 %> 
<% Response.charset = "utf-8" %>
<!--#include virtual="/inc/odbc.asp"-->
<!--#include virtual="/inc/function.gds"-->
<!--#include virtual="/inc/core.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
elseif pc="1" and DispatchOrdID<>"" Then
replaceURL="/DispatchOrder.gds?DispatchOrdID="&DispatchOrdID
Else
replaceURL="/m_DispatchOrder_PaidMoney.gds?DispatchOrdID="&DispatchOrdID
end if
 
APPPayID    = "Pay966120"
trade_type    = "NATIVE"
If ServiceOrdID<>"" Then
    order_no=ServiceOrdID
Else
    order_no=DispatchOrdID
End If
spbill_create_ip=getip()
args1="order_no="&order_no            '订单编号
args1=args1&"&APPID="&APPPayID            '商户APPID
args1=args1&"&openid="&openid        'openid
args1=args1&"&Total_fee="&Total_fee        '支付金额
args1=args1&"&trade_type="&trade_type    '支付类型
args1=args1&"&spbill_create_ip="&spbill_create_ip    '客户IP
'args1=args1&"&UnixTime="&ToUnixTime(now(),+8)            '时间戳
Sign1=SignArgs(args1)
HTMLCODE = GetBody("https://api.966120.com.cn/weixin/weixin_pay.asp",args1&"&Sign="&Sign1)
'Response.Write HTMLCODE&"<br>"
'Response.end
json=HTMLCODE
%>
<script language="jscript" runat="server">
Array.prototype.get = function(i)
{
 return this[i]; 
};
function getjson(str){
 try{
  eval("var jsonStr = (" + str + ")");
 }catch(ex){
  var jsonStr = null;
 }
 return jsonStr;
}
</script>
<%
        str=json
        str=right(str,len(str)-instr(str,"?{")+1)
        str=left(str,InstrRev(str,"}"))
        dim obj
        set obj = getjson(str)
        str0=""
        result    = obj.result    '    处理结果:1-成功,2-失败
        If result<>1 Then 
            errmsg    = obj.errmsg    '    处理结果:1-成功,2-失败
            Response.Redirect replaceURL&"&errmsg="&errmsg
        End If
        prepay_id=obj.prepay_id        'prepay_id
        mch_key=obj.mch_key        'prepay_id
        code_url=obj.code_url
        total_fee=obj.total_fee
        out_trade_no=obj.out_trade_no
'Response.Write mweb_url
 
%>
<!DOCTYPE html>  
<html>  
<head>  
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">  
<meta name="viewport" content="width=device-width, initial-scale=1.0, maximum-scale=1.0, user-scalable=0">
<title>微信支付 - 扫码支付</title>  
    <script type="text/javascript" src="/js/jquery-1.7.1.min.js"></script>
    <script type="text/javascript" src="/js/jquery.qrcode.min.js"></script>
 
<style type="text/css">  
body {  
    font-family: Arial;  
    margin: 0 auto;  
    padding: 0;  
    text-align: center;  
}  
#container {  
    display: inline-block;  
    margin: 20px auto;  
    box-shadow: 0 0 16px rgba(0,0,0,0.5);  
    filter: progid:DXImageTransform.Microsoft.Shadow(color='#969696', Direction=135, Strength=5);  
    -moz-box-shadow:0px 0px 16px rgba(0,0,0,0.5);   /*firefox*/  
    -webkit-box-shadow:0px 0px 16px rgba(0,0,0,0.5);    /*webkit*/  
}  
  
#container > * {  
    display: block;  
}  
#img-buffer {display: none;}  
#PayTitle{width:400px; float:center; text-align: center;font-size:14pt;font-family:"微软雅黑","仿宋","宋体",Arial;line-height:180%;color:#0000ff;margin-top:10%;}  
</style>  
<link href="css/main.css" type="text/css" rel="stylesheet">
</head>  
<body>  
<div align="center"><div id="PayTitle"><p>请打开手机微信的“扫一扫”功能</p><p>扫描以下二唯码进行支付</p><p>支付金额:<%=total_fee/100%>元</p></div> 
<div id="container"></div>
<script type="text/javascript">  
(function ($) {  
    'use strict';  
    var updateQrCode = function ()  
    {  
        var options =  
        {  
            render: 'canvas',  
            minVersion: 3,  
            maxVersion: 40,   
            ecLevel: 'H',   
            left: 0,  
            top: 0,  
            size: 220,   
            fill: '#000',  
            background: '#FFF',  
            text: '<%=code_url%>',   
            radius: 0.2,   
            quiet: 1,   
            mode: 4,   
            mSize: 0.1,  
            mPosX: 0.5,  
            mPosY: 0.5,   
            label: '微信支付',  
            fontname: '微软雅黑',  
            fontcolor: '#FF9818',   //'#60BAE6',   
            image: $("#img-buffer")[0]  
        };  
        $("#container").empty().qrcode(options);  
    },  
    update = function ()  
    {  
        updateQrCode();  
    };  
    $(function ()  
    {  
        $(window).load(update);  
        update();  
    });  
}(jQuery));  
</script>  
<script type="text/javascript">
setInterval(function() {Push();},3000);//三秒后执行
/*请求函数的ajax*/  
function Push() {
    $.ajax({  
  
        type: "POST",  
        url: "weixin_pay_Query.asp",//需要跳转到的界面 the page you want to post data  
        data: {  
            out_trade_no: '<%=out_trade_no%>'//要传给后台的数据 the data you should send to background  
        },  
        beforeSend: function() {},//在发送之前你可以进行相关操作 what you want to do before send  
        success: function(data) {  
            //需要执行的操作 execute it  
            if (data=="SUCCESS"){
                alert('支付完成');
                window.location.replace('<%=replaceURL%>');
            }
            //alert(data);
        }
    })
    };
</script>
 
 
<div class="posi" id="posi">
            <div class="ljgm">
                <a href="<%=replaceURL%>" class="bttt" style="color: #fff;background: #9a6d92;font-weight: 700;">返回</a>
            </div>
         </div>
</div>  
</body>  
</html>