userinfo.asp

凡人网络购物系统 v8.0 中文版

<!--#include file="top.asp"-->
<div align="center"><table width=980 border=0 cellpadding=0 cellspacing=0 bgcolor="#FFFFFF" height="100">
<tr> <td width=181 align="center" valign="top"><!--#include file="log.asp"-->  <!--#include file="insort.asp"--></td>
<td valign="top" align="center"><img border="0" src="Img/comp.GIF" height="10">
<%if Request.Cookies("venshop")("user_name")="" then%>
<table border="0" cellpadding="0" cellspacing="5" width="90%" bgcolor="#EEEEEE"><tr><td align="center" bgcolor="#EEEEEE">
<table border="0" cellpadding="0" cellspacing="0" width="100%" background="img/pattern.gif" style="border: 1px solid #C0C0C0">
<form method="POST" name="form1" action="login.asp?action=login">
<tr><td colspan="4" height="45" valign="bottom"><p style="margin-left: 35px"><b>用户登录: </b>您还没有登录或登录超时，请重新登录</td></tr>
<tr><td align="center" colspan="4"><hr color="#C0C0C0" size="1" width="90%"></td></tr>
<tr><td align="right" height="45">用 户 名：</td>
<td height="45"><input name="user_name" type="text" class=input style="FONT-SIZE: 12px; WIDTH: 110px"></td>
<td rowspan="2"><input name="comurl" type="hidden" value="userinfo.asp"><input type=image src="Skin/<%=venshop_skin%>/button_login.gif" name="login"></td>
<td height="45"><A href="reg.asp"><IMG src="Skin/<%=venshop_skin%>/loginreg.gif" border=0></A></td></tr>
<tr><td align="right" height="45">用户密码：</td>
<td height="45"><input style="FONT-SIZE: 12px; WIDTH: 110px" type="password" name="user_pass" class=input size="12"></td>
<td height="45"><a href="repass.asp"><IMG src="Skin/<%=venshop_skin%>/repass.gif" border=0></a></td></tr>
<tr><td colspan="4" align="center" height="45"></td></tr></form></table></td></tr></table>
<%else%><table border="0" cellpadding="0" cellspacing="5" width="90%" bgcolor="#EEEEEE"><tr><td align="center" bgcolor="#EEEEEE">
<table border="0" cellpadding="5" cellspacing="0" width="100%" background="img/pattern.gif" style="border: 1px solid #C0C0C0">
<%user_name=Request.Cookies("venshop")("user_name")

set rs=server.createobject("adodb.recordset")
sql="select * from venshop_user where username='"&user_name&"'"
rs.open sql,conn,1,1
if rs.eof then
%><tr><td align="center" height="100" colspan="2">未发现用户资料，请<a href="login.asp" target=_blank>重新登录</a>，如果没有注册请<a href="reg.asp" target=_blank>注册用户</a></td></tr>
<%else%>
<tr><td colspan="2" align="center"><b><%=sitename%>用户管理中心 - 用户
统计信息：</b></td>
</tr>
<tr> 
<td width="20%" align="right">用户名：</td>
<td width="80%"><%=rs("username")%></td>
</tr>
<%if rs("user_type")="" then
zhekou=100
usertype_name="未登录用户"
else
user_type=rs("user_type")
set rsz=server.createobject("adodb.recordset")
sql="select * from venshop_usertype where usertype_id="&user_type&""
rsz.open sql,conn,1,1
if rsz.eof then
zhekou=100
usertype_name="一般用户"
else
zhekou=rsz("usertype_zhekou")
usertype_name=rsz("usertype_name")
end if
rsz.close
set rsz=nothing
end if%>
<tr><td align="right">积分：</td><td><%=rs("savemoney")%></td></tr>
<tr><td align="right">等级：</td><td><%=usertype_name%></td></tr>
<tr><td align="right">享受折扣：</td><td><%=zhekou%>%</td></tr>
<tr><td align="right">订单数：</td><td><%=Conn.Execute("select count(*) from venshop_sub where sub_name='"&user_name&"'")(0)%>（<a href="orders.asp">进入管理</a>）</td></tr>
<tr><td align="right">注册IP：</td><td><%=rs("user_regip")%></td></tr>
<tr><td align="right">注册时间：</td><td><%=rs("regtime")%></td></tr>
<tr><td align="right">登录次数：</td><td><%=rs("degree")%></td></tr>
<tr><td align="right">E-mail：</td><td><%=rs("usermail")%></td></tr>
<tr><td align="right">真实姓名：</td><td><%=rs("user_namec")%></td></tr><%end if
rs.close
set rs=nothing%></table></td></tr></table><%end if%><img border="0" src="Img/comp.GIF" height="10"></td></tr></table></div><!--#include file="copy.asp"-->