?%
'======================================
'系统：微信扫码支付程?
'功能：微信扫码支付接口调试入口页?
'作者：AspPay.cc
'Q Q?4147824
'官网：http://www.AspPay.cc
'======================================
function GetOrderId()
dim wxa,wxb
randomize
wxa=int(900*rnd)+100
wxb=now()
GetOrderId=year(wxb)&right("0"&month(wxb),2)&right("0"&day(wxb),2)&right("0"&hour(wxb),2)&right("0"&minute(wxb),2)&right("0"&second(wxb),2)&wxa
end function
%>
微信扫码支付