summarycat.asp

来自「南鄂电子商务学校网: 学校概况、校园动态、师资力量、教学成果、师生论坛、友情链接」· ASP 代码 · 共 81 行

<%
sub summarycat()
%>
<table width="100%" border="0" cellspacing="0" cellpadding="0" style="border-collapse: collapse" height="73">
  <tr> 
    <td height="27" background="images/pic/title_hot.jpg"></td>
  </tr>
  <tr> 
    <td height="180" valign="top" background="images/pic/title_bg.gif"> 
      <table width="94%" border="0" align="center" cellpadding="0" cellspacing="2">
        <%
set rs3=server.createobject("adodb.recordset")
dim a_j
a_j=1
sql="select top 10 summary_id,summary_title,summary_count from summary order by summary_count DESC"
rs3.open sql,conn,1,1
do while not rs3.eof
if a_j>=10 then exit do 
a_j=a_j+1
%>
        <tr> 
          <td> &nbsp;<img src="images/pic/star.gif" width="12" height="12" align="middle" border="0"><a href="showsummary.asp?summary_id=<%=rs3("summary_id")%>" title="被点击：<%=rs3("summary_count")%> "> 
            <%if len(Rs3("summary_title"))>10 then
 response.write ""&left(Rs3("summary_title"),8)&"..."
else
 response.write ""&Rs3("summary_title")
end if%>
            </a></td>
        </tr>
        <tr>
          <td>
            <%
   rs3.movenext
   loop
   if rs3.eof and rs3.bof then
   response.write "没有游戏宝典"
   end if
   rs3.close
   set rs3=nothing
   %>
          </td>
        </tr>
      </table> 
    </td>
        </tr>
		  <tr> 
    <td height="15" background="images/pic/title_bottom.gif"></td>
  </tr>
      </table>
<table width="100%" border="0" cellspacing="0" cellpadding="0" style="border-collapse: collapse">
      <tr> 
      <td  height="27" background="images/pic/title_search.jpg"></td>
        </tr>
        <tr> 
    <td background="images/pic/title_bg.gif"> 
      <table width="90%" border="0" align="center" cellpadding="2" cellspacing="2">
        <form name="form2" method="post" action="summary.asp">
		  <tr> 
            <td align="center"><select name="select">
                <option value="teach_title">搜索概况标题</option>
                <option value="teach_content">搜索概况内容</option>
              </select></td>
          </tr>
          <tr> 
            <td align="center"> <input type="text" name="keyword" class="input" size="20"></td>
          </tr>
          <tr> 
            <td align="center"> <input name="search" type="image" value="搜索" src="images/pic/search.gif" width="61" height="20"></td>
          </tr>
		  </form>
        </table> </td>
        </tr>
	<tr> 
    <td height="15" background="images/pic/title_bottom.gif"></td>
  </tr>
      </table>

<%
end sub
%>