<%
'商易仿淘宝4.0(多用户)
'ACCESS版演示网站：http://www.ftaobao.com(商易仿淘宝商城)
'SQL版演示网站：http://sql.ftaobao.com
'电话：0571-56907100
'QQ：1147100
%>
<%qx=3%>
<!--#include file="../store/top.asp"-->
<!--#include file="../leaguer/check.asp"-->
<!--#include file="../../include/conn.asp"-->
<!--#include file="../../include/page.asp"-->
<!--#include file="../../include/config.asp"-->
<!--#include file="../../include/tishi.asp"-->
<link href="../../include/css.css" rel="stylesheet" type="text/css">
<title>会员认证管理</title>
<%select case request("duanxin") 
   case "duanxin_ok"
   if request("bt")<>"" and request("nr")<>"" and request("name1")<>"" then
   conn.execute("Insert into duanxin(bt,nr,name1,name2,lx)values('"&shopnet("bt")&"','"&shopnet("nr")&"','"&shopnet("name1")&"','"&my_name&"',5)")
     Response.Write "<meta http-equiv=refresh content=2;url='?key="&request("key")&"&page="&request("page")&"'><br><br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<b>您已成功地发出站内信！！！</b><br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;·恭喜您，您填写的站内信已成功的发送！！"
   end if
   case "duanxin"%><br><br>
<form name="form1" method="post" action="?duanxin=duanxin_ok">
<table cellspacing="1" cellpadding="4" class="tableborder" align="center" >
  <tr>
    <td height="25" align="center" background="../images/admin_bg_4.gif" bgcolor="#FFFFFF"><span style="color: #FFFFFF; font-weight: bold">站内信</span></td>
  </tr>
  <tr>
    <td bgcolor="#FFFFFF">
<table width="400" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#efefef">
  
  
  <tr bgcolor="#FFFFFF"> 
    <td width="100" height="25" align="center" bgcolor="#FFFFFF">收 信 人</td>
    <td height="25" bgcolor="#FFFFFF"><%=request("name1")%></td>
  </tr>
  <tr bgcolor="#FFFFFF"> 
    <td width="100" height="25" align="center" bgcolor="#FFFFFF">站内信标题</td>
    <td height="25" bgcolor="#FFFFFF"><input name="bt" type="text" class="wenbenkuang" id="bt" size="40" maxlength="25"></td>
  </tr>
  <tr bgcolor="#FFFFFF"> 
    <td width="100" height="25" align="center" bgcolor="#FFFFFF">站内信内容</td>
    <td height="25" bgcolor="#FFFFFF"><textarea name="nr" cols="40" rows="5" class="wenbenkuang" id="nr"></textarea></td>
  </tr>

</table>
	</td>
  </tr>
  <tr bgcolor="#FFFFFF">
    <td height="30" colspan="2" align="center" bgcolor="#FFFFFF"><input name="Submit" type="submit" class="go-wenbenkuang" value="发送站内信">&nbsp;&nbsp;
      <input name="Submit" type="reset" class="go-wenbenkuang" value="重置">&nbsp;&nbsp;
        <input name="Submit2" type="button" class="go-wenbenkuang" value="返回上一页" onClick="javascript:window.history.go(-1)">
        <input name="name1" type="hidden" id="name1" value="<%=request("name1")%>">
        <input name="key" type="hidden" id="key" value="<%=request("key")%>">
      <input name="page" type="hidden" id="page" value="<%=request("page")%>"></td>
  </tr>
</table></form>


<style type="text/css">
<!--
.STYLE1 {color: #330099}
.STYLE2 {color: #FF0000}
-->
</style>
<%
case ("rz")
userid=shopnet("userid")

conn.execute("update rz set yz="&shopnet("yes")&" where userid="&userid)
If shopnet("yes")="2" then
conn.execute("update huiyuan set rz="&shopnet("rz")&" where id="&userid)
End if
Response.redirect "sfrz.asp"

rs.close
set rs=nothing
%>
</TABLE>
<%case ("huiyuan")
set rs = conn.execute("select * from huiyuan where huiyuan='"&shopnet("huiyuan")&"'")
%>
<br>
<table cellspacing="1" cellpadding="4" class="tableborder" align="center" >
<form name="form" method="post" action="?abc=pass">
  <tr valign="middle" bgcolor="#FFFFFF"> 
    <td height="21" colspan="2" align="center" background="../images/admin_bg_4.gif" bgcolor="#f1f1f1"> &nbsp;<font color="#FF6600">&nbsp;<%=rs("id")%> 会员详细信息</font></td>
  </tr>
  <tr valign="middle" bgcolor="#FFFFFF"> 
    <td width="100" height="22" align="center">会员账号</td>
    <td width="400" height="22">&nbsp;<%=rs("huiyuan")%></td>
  </tr>
  
  <tr valign="middle" bgcolor="#FFFFFF"> 
    <td width="100" height="22" align="center">真实姓名</td>
    <td width="400" height="22">&nbsp;<%=rs("name")%>[<%=rs("xb")%>]</td>
  </tr>
  <tr valign="middle" bgcolor="#FFFFFF"> 
    <td width="100" height="22" align="center">联系电话</td>
    <td width="400" height="22">&nbsp;<%=rs("tel")%></td>
  </tr>
  <tr valign="middle" bgcolor="#FFFFFF">
    <td height="22" align="center">手机</td>
    <td height="22">&nbsp;<%=rs("shouji")%></td>
  </tr>
  <tr valign="middle" bgcolor="#FFFFFF">
    <td height="22" align="center">身份证号码</td>
    <td height="22">&nbsp;<%=rs("idcard")%></td>
  </tr>
  <tr valign="middle" bgcolor="#FFFFFF"> 
    <td width="100" height="22" align="center">联系信箱</td>
    <td width="400" height="22">&nbsp;<%=rs("mail")%></td>
  </tr>
  <tr valign="middle" bgcolor="#FFFFFF"> 
    <td width="100" height="22" align="center">联系地址</td>
    <td width="400" height="22">&nbsp;<%=rs("dz")%>&nbsp;[邮编：<%=rs("yb")%>]</td>
  </tr>
  <tr valign="middle" bgcolor="#FFFFFF"> 
    <td height="22" align="center">拥有财富</td>
    <td height="22">&nbsp;<%=rs("je2")%>元</td>
  </tr>
  <tr valign="middle" bgcolor="#FFFFFF"> 
    <td height="22" align="center">注册时间</td>
    <td height="22">&nbsp;<%=rs("sj")%>&nbsp;[IP：<%=rs("ip")%>]</td>
  </tr>
  <tr valign="middle" bgcolor="#FFFFFF"> 
    <td height="22" align="center">最后登陆</td>
    <td height="22">&nbsp;<%=rs("sj2")%>&nbsp;[IP：<%=rs("ip2")%>]&nbsp;[共登陆<%=rs("js")%>次]</td>
  </tr>
  <tr valign="middle" bgcolor="#FFFFFF"> 
    <td height="21" colspan="2" align="center"><input name="Submit5" type="button" class="go-wenbenkuang" value="发送站内站内信" onClick="window.location='?duanxin=duanxin&name1=<%=rs("huiyuan")%>&key=<%=request("key")%>&page=<%=request("page")%>&abc=duanxin'">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
    <input name="Submit22" type="button" class="go-wenbenkuang" value="返回上一页" onClick="javascript:window.history.go(-1)" /></td>
  </tr><form>
</table>

<%
case else
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from rz order by ID desc"
rs.open sql,conn,1,1
%>
<br />
<table cellspacing="1" cellpadding="4" class="tableborder" align="center" >
<TR>
  <TD height="25" colspan="10" align="center" background="../images/admin_bg_4.gif" bgcolor="#FFFFFF"><span style="font-weight: bold; color: #FFFFFF">会员管理</span></TD>
  </TR>
<TR>
  <TD width="6%" height="21" bgcolor="#FFFFFF"><div align="center">认证</div></TD>
	<TD width="7%" height="21" bgcolor="#FFFFFF"><div align="center">会员名称</div></TD>
	<TD width="9%" height="21" bgcolor="#FFFFFF"><div align="center">真实性名</div></TD>
	<TD width="14%" height="21" bgcolor="#FFFFFF"><div align="center">提交时间</div></TD>
	<TD width="12%" height="21" bgcolor="#FFFFFF"><div align="center">ip</div></TD>
	<TD width="10%" height="21" bgcolor="#FFFFFF"><div align="center">身份资料</div></TD>
	<TD width="10%" height="21" bgcolor="#FFFFFF"><div align="center">电话</div></TD>
	<TD width="7%" height="21" bgcolor="#FFFFFF"><div align="center">邮编</div></TD>
	<TD width="14%" height="21" bgcolor="#FFFFFF"><div align="center">待认证级别</div></TD>
	<TD width="11%" height="21" bgcolor="#FFFFFF"><div align="center">是否通过</div></TD>
</TR>



<%
if rs.eof then
response.write "<tr><td colspan=10 bgcolor=#ffffff align=center height=25>没有会员信息！</td></tr>"
else
i=1
while not rs.eof and i<=rs.pagesize%>
<TR>
  <TD bgcolor="#FFFFFF"><div align="center"><%Select case rs("yz")
case 1
response.write"失败"
case 2
response.write"已通过"
case 0
response.write"待认证"
End Select%></div></TD>
	<TD bgcolor="#FFFFFF"><div align="center"><a href="?duanxin=huiyuan&huiyuan=<%=rs("username")%>"><%=rs("username")%></a></div></TD>
	<TD bgcolor="#FFFFFF"><div align="center"><%=rs("name")%></div></TD>
	<TD bgcolor="#FFFFFF"><div align="center"><%=rs("sj")%></div></TD>
	<TD bgcolor="#FFFFFF"><div align="center"><%=rs("ip")%></div></TD>
	<TD bgcolor="#FFFFFF"><div align="center"><A HREF="../../leaguer/images/rz/<%=rs("tp")%>" target="_blank">点击察看图片</A></div></TD>
	<TD bgcolor="#FFFFFF"><div align="center"><%=rs("tel")%></div></TD>
	<TD bgcolor="#FFFFFF"><div align="center"><%=rs("yb")%></div></TD>
	<TD bgcolor="#FFFFFF"><div align="center">
	  <%Select case rs("rzjb")
case 3
response.write"<img src=../../image/yingyezhizhao.gif width=34 height=20 border=0 align=bottom>企业认证卖家"
case 2
response.write"<img src=../../image/shenfenzheng.gif width=34 height=20 border=0 align=bottom>个人认证卖家"
case 1
response.write"<img src=../../image/shenfenzheng.gif width=34 height=20 border=0 align=bottom>个人认证买家"
End Select%>
    </div></TD>
	<TD bgcolor="#FFFFFF"><div align="center"><span class="STYLE2"><%if rs("yz")=2 then%>通过<%else%><a href="sfrztongguo.asp?duanxin=rz&userid=<%=rs("huiyuanid")%>&yes=2&rz=<%=rs("rzjb")%>">通过</a><%end if%></span>&nbsp; </div></TD>
</TR>

<%i=i+1
 rs.MoveNext                                              
 wend %>
<TR>
  <TD height="21" colspan="10" bgcolor="#FFFFFF" align=center><%page2("key="&request("key")&"&lx="&request("lx")&"&")%></TD>
  </TR>
<%
end if
rs.close
set rs=nothing
end select
conn.close
set conn=nothing
%>
</TABLE>
