www.gusucode.com > 运动用品商城网站系统源代码程序 > 2.asp

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


<table border="0" cellpadding="0" cellspacing="0" class="useri">
<tr><td height="150">
<%if Request.Cookies("venshop")("user_name")="" then
response.redirect "login.asp?comurl=userinfo.asp"
response.end
else%>
<table border="0" cellpadding="0" cellspacing="0" width="100%">
<%user_name=Request.Cookies("venshop")("user_name")
chklogin(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
response.redirect "login.asp?comurl=userinfo.asp"
response.end
else%>
<%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" class="cartshow1">积分：</td><td><%=rs("savemoney")%></td></tr>
<tr><td align="right" class="cartshow0">等级：</td><td class="cartshow0"><%=usertype_name%></td></tr>
<%end if
rs.close
set rs=nothing%></table><%end if%>