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

📄 zhuanti.asp

📁 asp的新闻网站
💻 ASP
字号:
<table border="0" width="100%" cellspacing="0" cellpadding="0">
      <tr>
        <td width="100%" background="../images/bg-010.gif"><img src="../images/pic-145.gif"
         width="160" height="27"></td>
      </tr>
      <tr>
        <td width="100%" bgcolor="#32BEB7"> <div align="center"><center><table border="0"
        width="96%" cellpadding="2" cellspacing="3">
       <%  '输出相关专题图片推荐(注:只能输出三条信息) 
        sql="select top 3  * from news2_specialcommend where menuid='010004' and visible<>'0' order by infoindex "    
        rs.Open sql,conn,3,1    
        if not rs.EOF then    
        for i=1 to rs.RecordCount     
        %>    
          
          <tr>
            <td width="100%"><p align="center">
            <%if not isnull(rs("smallpic")) then%>
            <a  href="index.asp?infoid=<%=rs("infoid")%>" target="_blank">
            <img src="<%=smallpicUrl%><%=rs("smallpic")%>" alt="<%showbody(rs("introduction"))%>" width="100" height="75" border="0"></a>
            <%end if%>
            </td>
          </tr>
          <tr>
            <td width="100%"><p align="center"><font color="#FFFFFF"><a class="l10" href="index.asp?infoid=<%=rs("infoid")%>" target="_blank"><%showbody(rs("newsTitle"))%></a></font></td>
          </tr>
         <%rs.MoveNext     
         next    
         end if    
         rs.Close             
        %> 
          
        </table>
        </center></div></td>
      </tr>
    </table>

⌨️ 快捷键说明

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