<!--#include file="../../inc/payconn.asp"-->
<%
num=trim(request("num"))
stat2=Lcase(session("stat"))
	Call ConnectionDatabase()
if num<>"" then 
	
	Dim Res

	SQL = "Select * From [mobile1] Where num='"&num&"' and prov='BANK'"
	Set Res = Server.CreateObject("ADODB.Recordset")
	Res.Open SQL,Conn,1,1
	if res.eof or res.bof then
	response.Write("没有对应的数据记录。")
    response.End()
	else

	price=res("price")
end if

end if

%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head><title>充值区</title>
<meta http-equiv='Content-Type' content='text/html; charset=gb2312'><link href="css.css" type=text/css rel=stylesheet></head><body>
<div id='goodscontent'>	<div id='reok'> <span>成功提示</span> <br />您的订单[<%=num%>]已充值成功！金额：<%=price%>元。
<br>
		<br />		<br />	</div></div></body></html>