<!-- #include file="include/adovbs.inc" -->
<!-- #include file="include/dataconn.asp" -->
<!-- #include file="include/checksession.asp" -->
<%
'MoneyAccount= trim(request("MoneyAccount"))
'Hyid=Request("Hyid")

WuliuLevel=trim(Request("WuliuLevel"))

if WuliuLevel="市级" then
	MoneyAccount=0	
else
	MoneyAccount=0
end if
id=Request("id")
pageno=trim(Request("pageno"))
findcontent=trim(request("findcontent"))
HyNumber=trim(Request("HyNumber"))
%>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<link rel="stylesheet" href="include/e1.css" type="text/css">
</HEAD>
<BODY>
-------------------------增加的专卖店系统正在确认中...............<br>
<%

set rs=server.CreateObject("adodb.recordset")
sql = "update hyclub set IsWuliu = 1 where HyNumber='" & HyNumber &"'"
'Response.Write sql
'Response.End 
rs.Open sql,conn
set rs=nothing
set rs=server.CreateObject("adodb.recordset")
sql = "update WuliuInfo set MoneyAccount="&MoneyAccount&",IsApproved=true,ApprovedTime='"&thistoday&"' where ID =" & ID

rs.Open sql,conn
set rs=nothing
%>
<br>------------------------<font color=red>专卖店现在被系统确认成功!会员可以填写该专卖店编号!</font><br>
<script language="javascript">
	window.location.href="wuliuman.asp?pageno=<% =pageno%>&findcontent=<%=findcontent%>"
	window.parent.frames(0).location.reload();
</script>
</BODY>
</HTML>