qpay_get_show.asp

电子商城代码

<!--#include file="top.asp" -->

<%
session.codepage=65001
response.charset="utf-8"
dim FoundErr,Errmsg
dim orderid,userid,shopname,validity
dim starttime,overtime

FoundErr=request("FoundErr")

 if FoundErr="0" then
    orderid=request("orderid")
	call payok(orderid)
 else
   ErrMsg=request("ErrMsg") 
   if ErrMsg="" or FoundErr="" then
      ErrMsg="闈炴