📄 usermsg.asp
字号:
<!--#include file="sub/config.asp"-->
<!--#include file="sub/conn.asp"-->
<% if session("userlogin")<>session.sessionid then
Response.Write "<script language=javascript>{window.alert('对不起,你还没登录会员管理系统请返回!');window.location.href='user.asp';}</script>"
else
dim userid,rs,sql
userid = Session("id")
set rs=server.createobject("adodb.recordset") '创建纪录集
sql="select * from ax_user where id="&userid&" " '查找用户信息
rs.open sql,cn,1,2
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title><%=Sitename%>-设计会员在线短信</title>
<link href="index.css" rel="stylesheet" type="text/css" />
</head>
<body>
<!--#include file="top.asp"-->
<table width="780" height="4" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td background="images/index_11.gif"></td>
</tr>
</table><table width="780" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#E8E6DD">
<tr>
<td width="13"> </td>
<td width="23" height="30"> </td>
<td width="152" class="menuD">会员管理</td>
<td width="12"> </td>
<td height="30" colspan="3" align="center" bgcolor="#EEFFFF">
<marquee behavior=alternate onmouseover=stop() onmouseout=start() scrollamount="1" scrolldelay="10">
<font class="top"><%=ad1%></font>
</marquee></td>
</tr>
<tr>
<td bgcolor="#EEFFFF"> </td>
<td colspan="2" valign="top" bgcolor="#EEFFFF">
<table width="175" bordercolor="#EEFFFF" cellspacing="0" cellpadding="0" bgcolor="#CAE5E8" >
<tr >
<td height="20" colspan="2" >您的用户名是: <%=rs("name")%></td>
</tr>
<tr >
<td width="80" height="25" class="xuxian"><a href="userinfo.asp">信息修改</a></td>
<td class="xuxian"><a href="userunion.asp">登记工作室</a></td>
</tr>
<tr >
<td width="80" height="25" class="xuxian"><a href="usermsg.asp">在线短信</a></td>
<td class="xuxian"><a href="userinfo.asp">绑定论坛用户</a></td>
</tr>
<tr >
<td width="80" height="25"class="xuxian"><a href="upworks.asp">上传作品</a></td>
<td class="xuxian"><a href="userout.asp">添加文章</a></td>
</tr>
<tr >
<td width="80" height="25" class="xuxian"><a href="userinfo.asp">添加下载</a></td>
<td class="xuxian"><a href="userout.asp">安全退出</a></td>
</tr>
</table></td>
<td bgcolor="#EEFFFF"> </td>
<td width="20" valign="top" bgcolor="#DFE0D0"> </td>
<td width="540" valign="top" bgcolor="#DFE0D0">
<br /></td>
<td width="20" valign="top" bgcolor="#DFE0D0"> </td>
</tr>
</table>
<% set rs=nothing '关闭纪录集，释放所占资源
cn.close '关闭连结对象
set cn=nothing '释放所占资源
end if %>
<!--#include file="bottom.asp"-->
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -