📄 index.asp
字号:
<!--#include file="conn.asp"-->
<%
sqlowen="select * from user"
Set rsowen=Server.CreateObject("ADODB.RecordSet")
rsowen.Open sqlowen,conn,1,1
id=rsowen("id")
auid=rsowen("auid")
apwd=rsowen("apwd")
aleave=rsowen("aleave")
rsowen.close
set rsowen=nothing
%>
<%
if request("logout")<>"" then
session("auid")=""
session("apwd")=""
session("aleave")=""
response.redirect "index.asp"
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>活动管理系统</title>
<link rel="stylesheet" href="css/index.css" type="text/css">
</head>
<body topmargin="0">
<style type=text/css>
A#menu {
FONT-SIZE: 12px; COLOR: #ffffff; TEXT-DECORATION: none;
}
A#menunow {
FONT-SIZE: 12px; COLOR: #718df8; TEXT-DECORATION: none;
}
A#menu:link {
TEXT-DECORATION: none;FONT-SIZE: 12px; COLOR: #000000;
}
A#menu:hover {
TEXT-DECORATION: underline;FONT-SIZE: 12px; COLOR: #ffffff;
}
A#menu:visited {
FONT-SIZE: 12px; COLOR: #000000;
}
TD#menu {
FONT-SIZE: 12px; COLOR: #000000
}
.box {
BORDER-RIGHT: #096ac8 1px solid; BORDER-TOP: #000000 1px solid; FONT-SIZE: 12px; BORDER-LEFT: #000000 1px solid; COLOR: #ffffff; BORDER-BOTTOM: #096ac8 1px solid; BACKGROUND-COLOR: #001457
}
.box5{
BORDER-RIGHT: #000000 1px solid; BORDER-TOP: #0ea8ff 1px solid; FONT-SIZE: 12px; BORDER-LEFT: #0ea8ff 1px solid; COLOR: #9dc3e9; PADDING-TOP: 1px; BORDER-BOTTOM: #000000 1px solid; HEIGHT: 18px; BACKGROUND-COLOR: #096ac8
}
BODY {SCROLLBAR-FACE-COLOR: #053e75; SCROLLBAR-HIGHLIGHT-COLOR: #096ac8; SCROLLBAR-SHADOW-COLOR: #000000; SCROLLBAR-3DLIGHT-COLOR: #abb8e8; SCROLLBAR-ARROW-COLOR: #3c88c2; SCROLLBAR-TRACK-COLOR: #3c88c2; SCROLLBAR-DARKSHADOW-COLOR: #053e75; }
-->
</style>
<!--#include file="top.asp"-->
<div align="center">
<center>
<table width="750" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#000000">
<tr>
<td align="center" bgcolor="#053e75"><img src="img/top.jpg" width="750" height="116"></td>
</tr>
</table>
<table height=7 cellspacing=0 cellpadding=0 width=750 bgcolor=#3d1a01
border=0 align="center">
<tbody>
<tr>
<td></td>
</tr>
</tbody>
</table>
<table width="750" border="0" cellspacing="0" cellpadding="0" bgcolor="#053e75" align="center">
<tr>
<td valign="middle">
<!--#include file="usl.asp"-->
</td>
</tr>
</table>
<table height=7 cellspacing=0 cellpadding=0 width=750 bgcolor=#3d1a01
border=0 align="center">
<tbody>
<tr>
<td></td>
</tr>
</tbody>
</table>
</center>
</div>
<table width="750" border="0" align="center" cellpadding="5" cellspacing="0" bgcolor="#3c88c2">
<tr>
<td valign="top" bgcolor="#9999CC">
<table width="95%" border="1" cellspacing="7" cellpadding="10" align="center" bgcolor="#FFFFFF" bordercolor="#053e75">
<tr>
<td valign="middle" height="128">
<table width="90%" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#666666">
<tr align="center" bgcolor="#666666">
<td width="5%" height="25"><font color="#FFFFFF">ID</font></td>
<td width="55%"><font color="#FFFFFF">活动标题</font></td>
<td width="32%"><font color="#FFFFFF">发表日期</font></td>
<td width="8%"><font color="#FFFFFF">点击</font></td>
</tr>
<%
sql="select * from Activity order by o_id desc"
Set rs=Server.CreateObject("ADODB.RecordSet")
rs.Open sql,conn,1,1
if not isempty(request("page")) then
pagecount=cint(request("page"))
else
pagecount=1
end if
rs.pagesize=10
rs.AbsolutePage=pagecount
do while not rs.eof%>
<tr align="center" bgcolor="#FFFFFF">
<td height="24" bgcolor="#FFFFFF"><%=rs("o_id") %></td>
<td><a href="shownews.asp?o_id=<%=rs("o_id")%>" target="_blank"><%=rs("o_title") %></a></td>
<td><%=rs("o_date") %></td>
<td><%=rs("hits") %></td>
</tr>
<%
rs.movenext
i=i+1
if i>=rs.pagesize then exit do
loop
%>
<tr align="center" bgcolor="#FFFFFF">
<td height="24" colspan="4" bgcolor="#FFFFFF">
<table border="0" cellspacing="0" cellpadding="2" width="100%" align="center" bgcolor="#666666">
<tr>
<td height="24">
<div align="right"><font color="#FFFFFF">页次: <b><%=pagecount%>/<%=rs.pagecount%></b>
<% if pagecount=1 and rs.pagecount<>pagecount and rs.pagecount<>0 then%>
</font><a href="index.asp?page=<%=cstr(pagecount+1)%>"><font color="#FFFFFF">下一页</font></a><font color="#FFFFFF">
<% end if %>
<% if rs.pagecount>1 and rs.pagecount=pagecount then %>
</font><a href="index.asp?page=<%=cstr(pagecount-1)%>"><font color="#FFFFFF">上一页</font></a><font color="#FFFFFF">
<%end if%>
<% if pagecount<>1 and rs.pagecount<>pagecount then%>
</font><a href="index.asp?page=<%=cstr(pagecount-1)%>"><font color="#FFFFFF">上一页</font></a><a href="index.asp?page=<%=cstr(pagecount+1)%>"><font color="#FFFFFF">下一页</font></a><font color="#FFFFFF">
<% end if
%>
</font> <img src="img/spacer.gif" width="20" height="1"></div>
</td>
</tr>
</table>
</td>
</tr>
<%rs.close
set rs=nothing%>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
<!--#include file="end.asp"-->
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -