📄 news_class.asp
字号:
<!--#include file="Inc/syscode.asp"-->
<%
'=================================
' 良精科技企业管理系统
' www.liangjing.net
' copyright(c)2001-2008 良精科技
'=================================
%>
<!--#include file="Inc/Top.asp" -->
<%
'请勿改动下面这三行代码
ShowSmallClassType=ShowSmallClassType_Default
MaxPerPage=MaxPerPage_Default
strFileName="News_Class.asp?BigClassName=" & BigClassName & "&SmallClassName=" & SmallClassName
%>
<!-- #include file="Inc/Head.asp" -->
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td bgcolor="#9DBBD4"><table width="779" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="120" align="right" background="Skins/Default/CnImg/NewsTop.jpg"><object classid="clsid:D27CDB6E-AE6D-11CF-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,40,0" border="0" width="778" height="120">
<param name="movie" value="Skins/Default/Cnimg/news.swf">
<param name="quality" value="High">
<param name="wmode" value="transparent">
<embed src="Skins/Default/Cnimg/news.swf" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="778" height="120" quality="High" wmode="transparent"> </embed>
</object></td>
</tr>
</table></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="30" background="Skins/Default/CnImg/naviBg2.gif"><table width="778" height="30" border="0" cellpadding="0" cellspacing="0" bgcolor="#E2E7ED">
<tr>
<td width="180" align="center" background="Skins/Default/CnImg/LeftBg.gif"><table width="172" height="30" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="1" bgcolor="#999999"></td>
<td width="170" bgcolor="#E7E7E7"> </td>
<td width="1" bgcolor="#999999"></td>
</tr>
</table></td>
<td width="597" align="center"><table width="570" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="19" align="left"><img src="Skins/Default/CnImg/FlagLine.gif" width="4" height="21"></td>
<td width="277" class="12font"><span class="Regester_title">新闻中心</span></td>
<td width="264" align="right"> </td>
</tr>
</table></td>
<td width="1" bgcolor="#CCCCCC"></td>
</tr>
</table></td>
</tr>
</table>
<table width="778" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td width="180" height="259" align="center" valign="top" bgcolor="#F5F5F5"><table width="172" border="0" cellpadding="0" cellspacing="0">
<%
BigClass=request("BigClass")
SmallClass=request("SmallClass")
%><tr>
<td width="1" rowspan="3" bgcolor="#cccccc"></td>
<td width="142" height="1" bgcolor="#FFFFFF"></td>
<td width="1" rowspan="3" bgcolor="#cccccc"></td>
</tr>
<tr>
<td align="center" valign="top" bgcolor="#F9F9F9" ><TABLE width=100% border=0 align=center cellPadding=0 cellSpacing=0 >
<TBODY>
<TR>
<TD vAlign=top><% call ShowSmallClass_News_Tree() %>
</TD>
</TR>
<TR>
<TD height=5 ></TD>
</TR>
</TBODY>
</TABLE>
<!--#include file="Left.asp" --></td>
</tr>
<tr>
<td height="1" colspan="3" bgcolor="#cccccc"></td>
</tr>
</table> <table width="172" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="5" bgcolor="#DEDEDE"></td>
</tr>
</table></td>
<td width="597" align="center" valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="100%" height="2" bgcolor="#D5DBE3"></td>
</tr>
</table>
<TABLE width="578" border=0 cellPadding=0 cellSpacing=0 bgcolor="#FFFFFF">
<TR>
<TD width="578" height="27" valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><img src="Skins/Default/Cnimg/yytop_top.gif" width="570" height="27"></td>
</tr>
<tr>
<td><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="32" valign="top"><img src="Skins/Default/Cnimg/yytop_left.gif" width="32" height="315"></td>
<td width="506" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0" >
<tr>
<td width="6%"> </td>
<td width="94%"><a href="/">首 页</a> >> 新闻中心>><a href="News_Class.asp?BigClass=<%=BigClass%>"><%=BigClass%></a></td>
</tr>
</table>
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<TR>
<TD><br>
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<%
page=clng(request("page"))
Set rs=Server.CreateObject("ADODB.RecordSet")
if BigClass<>"" and SmallClass <>"" then
sql="select * from Hover_News where BigClassName='"&BigClass&"' and SmallClassName='"&SmallClass&"' order by id desc"
rs.Open sql,conn,1,1
elseif BigClass<>"" then
sql="select * from Hover_News where BigClassName='"&BigClass&"' order by id desc"
rs.Open sql,conn,1,1
end if
if rs.eof and rs.bof then
response.Write("暂时没有记录")
else
%>
<tr>
<td width="16%" height="280" align="center" valign="top" ><table width="100%" height="50" border="0" cellpadding="0" cellspacing="0" style="border: 1px solid #eeeeee" >
<tr>
<td width="5%" height="25" align="center" bgcolor="#F3F7FA"><table width="100%" border="0" cellpadding="0" cellspacing="0" background="Skins/Default/CnImg/naviBg.jpg" >
<tr>
<td width="31" height="29" align="center" ><img src="Skins/Default/Cnimg/arrow_down.gif" width="16" height="15"></td>
<td width="463" style="color:#555555"><strong><%=BigClass%>>><%=SmallClass%></strong></td>
</tr>
</table></td>
</tr>
<tr>
<td colspan="2" align="center" >
<%
rs.PageSize=20
if page=0 then page=1
pages=rs.pagecount
if page > pages then page=pages
rs.AbsolutePage=page
for j=1 to rs.PageSize
%>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="83%" height="22"><% if rs("FirstImageName")<>"" then response.write "<img src='images/news.gif' border=0 >" end if %>
· <a href="shownews.asp?id=<%= rs("id") %>" target="_blank"><%= rs("TITLE") %></a> </td>
<td width="17%" align="center">[<%= FormatDateTime(rs("UpdateTime"),2) %>]</td>
</tr>
</table> <%
rs.movenext
if rs.eof then exit for
next
%></td>
</tr>
<tr valign="bottom">
<td align="center" ><form method=Post action="News_Class.asp?BigClass=<%=BigClass%>&SmallClass=<%=SmallClass%>">
<%if Page<2 then
response.write "首页 上一页 "
else
response.write "<a href=NewsClass.asp?BigClass="&BigClass&"&SmallClass="&SmallClass&"&page=1>首页</a> "
response.write "<a href=NewsClass.asp?BigClass="&BigClass&"&SmallClass="&SmallClass&"&page=" & Page-1 & ">上一页</a> "
end if
if rs.pagecount-page<1 then
response.write "下一页 尾页"
else
response.write "<a href=NewsClass.asp?BigClass="&BigClass&"&SmallClass="&SmallClass&"&page=" & (page+1) & ">"
response.write "下一页</a> <a href=NewsClass.asp?BigClass="&BigClass&"&SmallClass="&SmallClass&"&SmallClass="&SmallClass&"&page="&rs.pagecount&">尾页</a>"
end if
response.write " 页次：<strong><font color=red>"&Page&"</font>/"&rs.pagecount&"</strong>页 "
response.write " 共<b><font color='#FF0000'>"&rs.recordcount&"</font></b>条记录 <b>"&rs.pagesize&"</b>条记录/页"
response.write " 转到：<input type='text' name='page' size=2 maxlength=4 class=input value="&page&">"
response.write " <input class='button' type='submit' value='转到' name='cndok'></span></p>"
%>
</form></td>
</tr>
</table><br></td>
</tr>
<%
end if
rs.close
set rs=nothing
%>
</table></TD></TR>
</table>
</td>
<td width="40" valign="top"><img src="Skins/Default/Cnimg/yytop_right.gif" width="32" height="263"></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center"><img src="Skins/Default/Cnimg/yybottom_bottom.gif" width="570" height="85"></td>
</tr>
</table></td>
</tr>
</table></TD>
</TR>
</TABLE></td>
<td width="1" bgcolor="#CCCCCC"></td>
</tr>
</table>
<!--#include file="Inc/foot.asp"-->
</body>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -