⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 teachcat.asp

📁 南鄂电子商务学校网: 学校概况、校园动态、师资力量、教学成果、师生论坛、友情链接
💻 ASP
字号:
<%
sub teachcat()
%>
<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 teach_id,teach_title,teach_count from teach order by teach_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="showteach.asp?teach_id=<%=rs3("teach_id")%>" title="被点击:<%=rs3("teach_count")%> "> 
            <%if len(Rs3("teach_title"))>10 then
 response.write ""&left(Rs3("teach_title"),8)&"..."
else
 response.write ""&Rs3("teach_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="teach.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
%>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -