📄 index.asp
字号:
<!--#include file=conn.asp-->
<HTML><HEAD><TITLE>新闻发布系统</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<LINK href="style.css" type=text/css rel=stylesheet>
<BODY style="cursor:url(images/2.gif)"><DIV align=center>
<!--#include file=top.asp-->
<table style="BORDER-COLLAPSE: collapse" cellSpacing=1 cellPadding=0 width=762>
<tr>
<td width="232" bgcolor="#FFFFFF" valign="top">
<table width="232" border="0" cellpadding="0" cellspacing="0">
<tr>
<td bgcolor="#eeeeee" ><form method=post action=search.asp>
<img src="images/search.gif" alt="新闻搜索"><hr>
关键字： <input type=text name="keyword" size=10> <br>
<select size=1 name="condition">
<option value="标题">标题</option>
<option value="内容">内容</option>
</select>
<input type=submit value="搜 索" name="sub" class="button">
</form></td>
</tr>
</table>
<br>
<table width="232" border="0" cellpadding="0" cellspacing="0">
<tr>
<td bgcolor="eeeeee"><img src="images/new.gif" alt="最新文章"></td>
</tr>
<%rs.open"select top 10 * from article order by id desc",conn,1,1
while not rs.eof%>
<tr>
<td> <img src="images/new01.gif">[<font color="#00ccbb"><%=year(rs("sendtime"))&"."&month(rs("sendtime"))&"."&day(rs("sendtime"))%></font>]<a href=showatc.asp?id=<%=rs("id")%>>
<%if len(rs("title"))<=10 then%><%=rs("title")%><%else%><%=left(rs("title"),10)&"…"%><%end if%></a></td>
</tr>
<%rs.movenext
wend
rs.close%>
</table>
<br>
<table width="232" border="0" cellpadding="0" cellspacing="0">
<tr>
<td bgcolor="eeeeee"><img src="images/hot.gif" alt="热门文章"></td>
</tr>
<%rs.open"select top 10 * from article order by views desc",conn,1,1
for i=1 to 10%>
<tr>
<td> <img src="images/hot01.gif">[<font color=#00ccbb><%=rs("views")%></font>]<a href=showatc.asp?id=<%=rs("id")%>>
<%if len(rs("title"))<=10 then%><%=rs("title")%><%else%><%=left(rs("title"),10)&"…"%><%end if%></a></td>
</tr>
<%rs.movenext
next
rs.close%>
</table>
</td>
<td width="527" valign="top" bgcolor="#FFFFFF">
<%rs.open"select * from class where parent=0",conn,1,1
i=0%>
<table width="527" border="0" cellpadding="0" cellspacing="0">
<tr><%while not rs.eof%>
<td valign="top" width="50%">
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td background="images/top2.gif" height="24"><a href=showcls.asp?id=<%=rs("id")%>&parent=0>
<img src="images/f.gif">
<font class="shadow"><%=rs("clsname")%></font></a></td>
</tr>
<%rs2.open"select top 10 * from article where bigclsid="&rs("id")&" order by id desc",conn,1,1
while not rs2.eof%>
<tr>
<td><img src="images/new01.gif"><a href=showatc.asp?id=<%=rs2("id")%>>
<%if len(rs2("title"))<=15 then%><%=rs2("title")%><%else%><%=left(rs2("title"),15)&"…"%><%end if%></a></td>
</tr>
<%rs2.movenext
wend
rs2.close%>
</table></td>
<%rs.movenext
i=i+1
if i mod 2=0 then
%>
</tr></table><br><table width="527" border="0" cellpadding="0" cellspacing="0">
<tr>
<%i=0
end if
wend%>
<%rs.close%>
</tr>
</table>
</td>
</tr>
</table>
<TABLE height=15 cellSpacing=0 cellPadding=0 width=760 align=center border=0>
<TBODY>
<TR>
<TD width=760 bgColor=#00ccbb height=15 >
<DIV align=left><font class="shadow"> <img src="images/t.gif">站内导航</font>─→ <font
class="shadow"><%
rs.open"select * from article",conn,1,1
%>本站一共：<font color="red">
<%=rs.recordcount%></font>  篇 今日更新：
<%rs2.open"select * from article where sendtime like '%"&date()&"%'",conn,1,1
%><font color="red"><%=rs2.recordcount%></font> 篇<%rs2.close%>
<%rs.close%></font></DIV></TD></TR></TBODY></TABLE>
<TABLE bgcolor="eeeeff" cellSpacing=6 cellPadding=0 width=760 border=0>
<TBODY>
<TR>
<TD class=pageLight vAlign=top width=760>
<TABLE cellSpacing=0 cellPadding=8 width="100%" border=0>
<TBODY>
<TR>
<TD class=list>
<TABLE cellSpacing=0 cellPadding=3 width="100%" border=0 background="">
<TBODY>
<%rs.open"select * from class where parent=0",conn,1,1
while not rs.eof%>
<TR>
<TD height=13>[<a href=showcls.asp?id=<%=rs("id")%>&parent=0><font color="468284"><%=rs("clsname")%></font></a>]─→
<%rs2.open"select * from class where parent="&rs("id"),conn,1,1
while not rs2.eof%><A
href=showcls.asp?id=<%=rs2("id")%>&parent=<%=rs("id")%>><%=rs2("clsname")%></A> |
<%rs2.movenext
wend
rs2.close
%></TD></TR><TR>
<TD background=images/line.gif height=10></TD></TR>
<%rs.movenext
wend
rs.close%>
</TBODY></TABLE></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE>
<!--#include file="bottom.asp"--></DIV></BODY></HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -