?? pay.asp
字號:
<%
'------------------------------------動感支付----------------------------------
sub pay_1()
response.write ("<form name=form1 method=""post"" action=""http://www.o91.com/send.asp"" target=new>")
response.write (" <td height=""11"" bgcolor=""#FFFFFF"" style='PADDING-LEFT: 50px'> ")
response.write (" <input name=C_username type=""hidden"" class=""wenbenkuang"" id=""C_username"" value="&pay2&">")
response.write (" <input name=C_Merchant_id type=""hidden"" id=""C_Merchant_id"" value="&pay3&" class=""wenbenkuang"">")
response.write (" <input name=C_Merchant_oid type=""hidden"" class=""wenbenkuang"" id=""C_Merchant_oid"" value="&dd&">")
response.write ("<input name=C_Merchant_shopname type=""hidden"" class=""wenbenkuang"" id=""C_Merchant_shopname"" value="&request("shopname")&">")
response.write ("<input name=C_Merchant_name type=""hidden"" class=""wenbenkuang"" id=""C_Merchant_name"" value="&request("userzhenshiname")&">")
response.write ("<input name=C_Merchant_addr type=""hidden"" class=""wenbenkuang"" id=""C_Merchant_addr"" value="&request("shouhuodizhi")&">")
response.write ("<input name=C_Merchant_tel type=""hidden"" class=""wenbenkuang"" id=""C_Merchant_tel"" value="&request("usertel")&">")
response.write ("<input name=C_Merchant_post type=""hidden"" id=""C_Merchant_post"" value="&request("youbian")&" class=""wenbenkuang"">")
response.write ("<input name=C_Merchant_amount type=""hidden"" id=""C_Merchant_amount"" value="&zj&" size=""12"" class=""wenbenkuang"">")
response.write ("<input name=C_Merchant_ymd type=""hidden"" class=""wenbenkuang"" id=""C_Merchant_ymd"" value="&ymd&">")
response.write ("<input name=C_Merchant_orderstatus type=""hidden"" id=""C_Merchant_orderstatus"" value="&pay4&" class=""wenbenkuang"">")
response.write ("<input name=C_Merchant_username type=""hidden"" class=""wenbenkuang"" id=""C_Merchant_username"" value="&request("userzhenshiname")&">")
response.write ("<input name=C_Merchant_moneytype type=""hidden"" id=""C_Merchant_moneytype"" value="&pay5&" class=""wenbenkuang"">")
response.write ("<input name=C_Merchant_url type=""hidden"" id=""C_Merchant_url"" value="&pay6&" class=""wenbenkuang"">")
response.write ("<input type=submit name=""submit"" value=""使用“動感在線支付”付款"" class=""go-wenbenkuang"">")
response.write ("<input name=C_Merchant_lx type=""hidden"" id=""C_Merchant_lx"" value="&pay7&">")
response.write (" </td> ")
response.write ("</form>")
end sub
'---------------------------------------支付寶--------------------------------
sub pay_2()
alipay_name=dd & "號訂單在線支付"
alipay_body="以下金額("& zj & "元)已包含配送費用"
zongji = zj
s1 = "0001" '命令碼
s2 = request("shopname") '商品名稱
s21 = request("shopname") '商品描述
s3 = dd '訂單號
s4 = zongji '金額
s5 = "1" '支付類型
s6 = "1" '購買數量
s7 = "1" '發貨方式
s8 = "0.00" '郵費
s9 = "0.00" '郵費
s10 = "true" '只讀
s11 = request("liuyan") '買家留言
s12 = "" '買家Email
s13 = request("userzhenshiname") '買家姓名
s14 = request("shouhuodizhi") '買家地址
s15 = request("youbian") '買家郵編
s16 = request("usertel") '買家電話
s17 = pay4 '買家手機
sellerEmail = pay2 '賣家EMAIL
s18 = "2088002064449821" 'partner
key = pay3
str2CreateAc = "cmd" & s1 & "subject" & s2
str2CreateAc = str2CreateAc & "body" & s21
str2CreateAc = str2CreateAc & "order_no" & s3
str2CreateAc = str2CreateAc & "price" & s4
str2CreateAc = str2CreateAc & "type" & s5
str2CreateAc = str2CreateAc & "number" & s6
str2CreateAc = str2CreateAc & "transport" & s7
str2CreateAc = str2CreateAc & "ordinary_fee" & s8
str2CreateAc = str2CreateAc & "express_fee" & s9
str2CreateAc = str2CreateAc & "readonly" & s10
str2CreateAc = str2CreateAc & "buyer_msg" & s11
str2CreateAc = str2CreateAc & "seller" & sellerEmail
str2CreateAc = str2CreateAc & "buyer" & s12
str2CreateAc = str2CreateAc & "buyer_name" & s13
str2CreateAc = str2CreateAc & "buyer_address" & s14
str2CreateAc = str2CreateAc & "buyer_zipcode" & s15
str2CreateAc = str2CreateAc & "buyer_tel" & s16
str2CreateAc = str2CreateAc & "buyer_mobile" & s17
str2CreateAc = str2CreateAc & "partner" & s18
str2CreateAc = str2CreateAc & key
ac=md5(str2CreateAc)
response.write ("<form method=post name=post action=https://www.alipay.com/payto:"&sellerEmail&" target=new>")
response.write (" <td height=""11"" bgcolor=""#FFFFFF"" style='PADDING-LEFT: 50px'> ")
response.write ("<input type=hidden name=cmd value="&s1&">")
response.write ("<input type=hidden name=subject value="&s2&">")
response.write ("<input type=hidden name=body value="&s21&">")
response.write ("<input type=hidden name=order_no value="&s3&">")
response.write ("<input type=hidden name=price value="&s4&">")
response.write ("<input type=hidden name=type value="&s5&">")
response.write ("<input type=hidden name=number value="&s6&">")
response.write ("<input type=hidden name=transport value="&s7&">")
response.write ("<input type=hidden name=ordinary_fee value="&s8&">")
response.write ("<input type=hidden name=express_fee value="&s9&">")
response.write ("<input type=hidden name=readonly value="&s10&">")
response.write ("<input type=hidden name=buyer_msg value="&s11&">")
response.write ("<input type=hidden name=seller value="&sellerEmail&">")
response.write ("<input type=hidden name=buyer value="&s12&">")
response.write ("<input type=hidden name=buyer_name value="&s13&">")
response.write ("<input type=hidden name=buyer_address value="&s14&">")
response.write ("<input type=hidden name=buyer_zipcode value="&s15&">")
response.write ("<input type=hidden name=buyer_tel value="&s16&">")
response.write ("<input type=hidden name=buyer_mobile value="&s17&">")
response.write ("<input type=hidden name=partner value="&s18&">")
response.write ("<input type=hidden name=ac value="&ac&">")
response.write ("<input type=submit value=""使用“支付寶”付款"" class=""go-wenbenkuang"">")
response.write (" </td> ")
response.write ("</form>")
end sub
'-----------------------------------網銀--------------------------------
sub pay_3()
key = pay3' MD5私鑰
v_mid = pay2 '商戶號,這里為測試商戶號1001,替換為自己的商戶號即可
v_moneytype = pay4' 支付幣種0為人民幣
style=pay5' 指網關模式0(普通),1(銀行列表中帶外卡)
v_url= pay6' 商戶自定義返回接收支付結果的頁面
v_oid=dd' 訂單號,構成格式 年月日-商戶號-小時分鐘秒
v_amount=zj' 訂單金額
remark1=""
remark2=""
text = v_amount&v_moneytype&v_oid&v_mid&v_url&key
v_md5info=Ucase(trim(md5(text)))
response.write ("<form method=post name=post action=""https://pay.chinabank.com.cn/select_bank"" target=new>")
response.write (" <td height=""11"" bgcolor=""#FFFFFF"" style='PADDING-LEFT: 50px'> ")
response.write ("<input type=hidden name=v_md5info size=100 value="&v_md5info&">")
response.write ("<input type=hidden name=v_mid value="&v_mid&">")
response.write ("<input type=hidden name=v_oid value="&v_oid&">")
response.write ("<input type=hidden name=v_amount value="&v_amount&">")
response.write ("<input type=hidden name=v_moneytype value="&v_moneytype&">")
response.write ("<input type=hidden name=v_url value="&v_url&">")
response.write ("<input type=hidden name=style value="&style&">")
response.write ("<input type=hidden name=remark1 value="&remark1&">")
response.write ("<input type=hidden name=remark2 value="&remark2&">")
response.write ("<input type=submit value=""使用“網銀”付款"" class=""go-wenbenkuang"">")
response.write (" </td> ")
response.write ("</form>")
end sub
'-----------------------------------------------------------nps--------------------------------------------
sub pay_4()
m_id = pay2
modate = date()
m_orderid = dd
m_oamount = zj
m_ocurrency = pay4
m_url = pay6
m_language = pay5
s_name = request("userzhenshiname")
s_addr = request("shouhuodizhi")
s_postcode = request("youbian")
s_tel = request("usertel")
s_eml = request("useremail")
r_name = request("userzhenshiname")
r_addr = request("shouhuodizhi")
r_postcode = request("youbian")
r_tel = request("usertel")
r_eml = request("useremail")
m_ocomment = request("liuyan")
m_status = pay7
key = key
'創建NPS安全組件
Set NPSMAC = Server.CreateObject("NPSDigest.NPSSecurity")
'組織訂單信息
m_info = m_id&"|"&m_orderid&"|"&m_oamount&"|"&m_ocurrency&"|"&m_url&"|"&m_language
s_info = s_name&"|"&s_addr&"|"&s_postcode&"|"&s_tel&"|"&s_eml&"|"&r_name
r_info = r_addr&"|"&r_postcode&"|"&r_tel&"|"&r_eml&"|"&m_ocomment&"|"&m_status&"|"&modate
NPSMAC.OrderInfo = m_info&"|"&s_info&"|"&r_info
'設置密鑰
NPSMAC.NPSKey = pay3
'加密
OrderInfo = NPSMAC.GetEncrypt
NPSMAC.OrderInfo = OrderInfo
digest = NPSMAC.GetDigest
response.write ("<form name=""FORM"" method=""post"" action=""https://payment.nps.cn/ReceiveMerchantAction.do"" target=new>")
response.write (" <td height=""11"" bgcolor=""#FFFFFF"" style='PADDING-LEFT: 50px'> ")
response.write ("<input type=""hidden"" name=""OrderMessage"" value="&OrderInfo&">")
response.write ("<input type=""hidden"" name=""digest"" value="&digest&">")
response.write ("<input type=""hidden"" name=""M_ID"" value="&m_id&">")
response.write ("<input type=""hidden"" name=""s"" value=""submit"">")
response.write ("<input type=submit value=""使用“nps”付款"" class=""go-wenbenkuang"">")
response.write (" </td> ")
response.write ("</form>")
'response.write "<SCRIPT LANGUAGE=""JavaScript"">"
'response.write "document.post.submit();"
'response.write "</SCRIPT>"
end sub
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -