📄 my_index.asp
字号:
<!-- #include file="conn.asp" -->
<!--#include file="webconfig.asp"-->
<%
'url=request.servervariables("HTTP_REFERER")
if session("userid")="" then
//response.write "<script>alert('你还未登陆，或登陆已超时，请重新登陆！！');</script>"
response.write "<script>this.location.href='login_window.asp';</script>"
response.end
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title><%=webname%></title>
<link href="style.css" rel="stylesheet" type="text/css">
</head>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<!--#include file="include/top.asp" -->
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0">
<tr valign="top">
<td width="1" bgcolor="#cccccc"></td>
<td width="160" height="100">
<!--#include file="include/left1.asp" -->
</td>
<td width="1" bgcolor="cccccc"></td>
<td align="center">
<!--#include file="include/search.asp" -->
<%
if session("userid")="" then
response.redirect "login_window.asp"
else
sql="select * from Net008_user where userid='"&session("userid")&"'"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,2
'response.write rs.recordcount
%>
<table width="98%" border="0" cellspacing="0" cellpadding="3">
<tr>
<td align="center"><b><font color=ff0000>
<%
if rs("guestname")<>"" then
response.write rs("guestname")
else
response.write session("userid")
end if
%>
</font></b>,您好！欢迎您第 <b><font color=ff0000><%=rs("loginnumber")%></font></b>
次光临本站！你上次登陆时间是：<%=session("logindate")%></td>
</tr>
</table>
<table cellspacing=0 cellpadding=5 width="98%" border=0>
<tbody>
<tr>
<td height=20 colspan=2 bgcolor="EAF8FD"> <p><font color="#FF99CC"><b><font color="#0099cc">个人信息：</font></b></font> 您共有
<%
sql_temp="select * from Net008_infos where userid='"&session("userid")&"' or userid='admin' order by adddate desc"
set rs_temp=server.createobject("adodb.recordset")
rs_temp.open sql_temp,conn,1,2
response.write rs_temp.recordcount
rs_temp.close
%>
个消息，
<%
sql_temp="select * from Net008_infos where (userid='"&session("userid")&"' or userid='admin') and readyn='1' order by adddate desc"
set rs_temp=server.createobject("adodb.recordset")
rs_temp.open sql_temp,conn,1,2
response.write "<a href=my_infolist.asp class=LeftTypeLinkU>"
response.write "其中有<b> "&rs_temp.recordcount&" </b>"
response.write "个未读消息"
response.write "</a>"
rs_temp.close
%>
</p></td>
</tr>
<tr>
<td><font color="0099cc"><span
class=main1>您的级别是：</span></font></td>
<td class=main1> <%
if rs("userlevel")=2 then
response.write "VIP会员<img src=images/vip_s.jpg align=absmiddle> 您正式成为VIP会员时间是："&rs("vipadddate")
elseif rs("userlevel")=3 then
response.write"正在审核成为VIP会员 申请VIP会员时间是："&rs("vipadddate")
else
response.write "普通会员"
'response.write "（<a href='vip.asp' class='LeftTypeLinkU'>请从这里升级VIP会员</a>）"
end if
%>
</td>
</tr>
<%if rs("vipnumber")<>"" then%>
<tr>
<td><font color="0099cc"><span
class=main1>您的VIP卡号：</span></font></td>
<td class=main1><font color="#ff0000" size="4"><%=rs("vipnumber")%></font>（请保管好你的VIP卡）</td>
</tr>
<%end if%>
<tr>
<td width=87><font color="0099cc"><span
class=main1>您的用户名：</span></font></td>
<td class=main1 width=493><font color="#999999"><%=session("userid")%></font></td>
</tr>
<tr>
<td width=87><font color="0099cc"><span
class=main1>您的真实姓名：</span></font></td>
<td width=493><font color="#999999">
<%
if rs("guestname")<>" " then
response.write rs("guestname")
else
response.write "没填写"
end if
%>
</font></td>
</tr>
<tr>
<td width=87><font color="0099cc"><span
class=main1>您的E-mail：</span></font></td>
<td class=main1 width=493><font color="#999999"><%=rs("email")%></font></td>
</tr>
<tr>
<td width=87><font color="0099cc"><span
class=main1>您的联系电话：</span></font></td>
<td class=main1 width=493><font color="#999999">
<%
if rs("tel")<>" " then
response.write rs("tel")
else
response.write "没填写"
end if
%>
</font></td>
</tr>
<tr>
<td width=87><font color="0099cc"><span
class=main1>您的联系地址：</span></font></td>
<td class=main1 width=493><font color="#999999">
<%
cityid=rs("city")
sql_temp="select * from province where cityid='"&cityid&"'"
set rs_temp=server.createobject("adodb.recordset")
rs_temp.open sql_temp,conn,1,2
response.write rs_temp("cityname")
rs_temp.close
set rs_temp=nothing
if rs("address")<>" " then
response.write rs("address")
else
response.write "没填写"
end if
%>
</font></td>
</tr>
<tr>
<td width=87><font color="0099cc"><span
class=main1>邮 政 编 码：</span></font></td>
<td class=main1 width=493><font color="#999999">
<%
if rs("pc")<>" " then
response.write rs("pc")
else
response.write "没填写"
end if
%>
</font></td>
</tr>
<tr>
<td width=87><font color="0099cc"><span
class=main1>您的注册时间：</span></font></td>
<td class=main1 width=493><font color="#999999"><%=rs("adddate")%></font> <span><font
color=#cc3333>您的个人信息更新时间：</font></span><font color="#999999">
<%
if rs("updatedate")<>" " then
response.write rs("updatedate")
else
response.write "还没修改个人资料,"
response.write "<a href='my_user_modi.asp' class='LeftTypeLinkU'>现在修改请点击>></a>"
end if
%>
</font></td>
</tr>
<tr>
<td height=20 colspan=2 bgcolor="EAF8FD"><font
color=#000099><b><font color="#0099cc">功能简介：</font></b></font></td>
</tr>
<tr>
<td width="87" align="right"><font color="#0099cc">登 录：</font></td>
<td width="493"><font color="#999999">登录本店，享受个性化购物环境</font></td>
</tr>
<tr>
<td width="87" align="right"><font color="#0099cc">修改个人信息：</font></td>
<td width="493"><font color="#999999">修改您的个人信息，联系方式，送货地址信息等等</font></td>
</tr>
<tr>
<td width="87" align="right"><font color="#0099cc">我的历史订单：</font></td>
<td width="493"><font color="#999999">查询历史订单，从这里你可以随时登录本站,查看订单的进展情况</font></td>
</tr>
<tr>
<td width="87" align="right"><font color="#0099cc">我 的 购物车：</font></td>
<td width="493"><font color="#999999">暂时存放您喜爱的产品，便于以后查询和购买</font></td>
</tr>
<tr>
<td width="87" align="right"><font color="#0099cc">我 的 积 分：</font></td>
<td width="493"><font color="#999999">这里将详细记录您购买商品获赠的积分，以及兑奖所用积分！</font></td>
</tr>
<tr>
<td width="87" align="right"><font color="#0099cc">邮 件 中 心：</font></td>
<td width="493"><font color="#999999">这里记录着您注册和购物过程中本商城给您发送的邮件,或者你也可以通过这里发邮件给我们.</font></td>
</tr>
<tr>
<td width="87" align="right"><font color="#0099cc">修改用户密码：</font></td>
<td width="493"><font color="#999999">修改您的登录密码</font></td>
</tr>
</tbody>
</table>
<%end if%>
</td>
<td width="1" bgcolor="cccccc"></td>
</tr>
</table>
<!-- #include file="include/bottom.asp" -->
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -