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

📄 toppic.asp

📁 视频点播系统
💻 ASP
字号:
<!--#include file="articleconn.asp"-->
<HTML><HEAD>
<LINK href=css/style.css type=text/css rel=stylesheet></head>
</HEAD>
<BODY leftMargin=0 topMargin=0 marginheight="0" marginwidth="0" oncontextmenu="return false" onselectstart="return false" ondragstart="return false">
<TABLE border="1" bgcolor="#FFFFFF" cellspacing="0" cellpadding="0" bordercolor="#C0C0C0">
  <TBODY>
   <% 
                         sql="select * from learning where best=true order by articleid desc"
                         Set rs= Server.CreateObject("ADODB.Recordset")
                         rs.open sql,conn,1,1
                         if rs.eof and rs.bof then
                            response.write "<p align='center'>没有任何电影</p>"
                         else
                         i=0
                         do while not rs.eof or rs.bof 
                       %>
    <td width="10%" height="148" valign="top" bgcolor="#FFFFFF">
      <TD align=center valign="top" bgcolor="#FFFFFF"><A  href='movie.asp?id=<%=rs("articleid")%>' target=_blank >
      <IMG  
            src="<%if rs("domurl")="" then%>tupian/nopic.gif<%else%><%=rs("domurl")%><%end if%>"  alt="<%=rs("title")%>" height=110 width=88 border=1 style="BORDER-LEFT-COLOR: #000000; BORDER-BOTTOM-COLOR: #000000; BORDER-TOP-STYLE: solid; BORDER-TOP-COLOR: #000000; BORDER-RIGHT-STYLE: solid; BORDER-LEFT-STYLE: solid; BORDER-RIGHT-COLOR: #000000; BORDER-BOTTOM-STYLE: solid" onMouseOver=javascript:parent.frames[1].stopscroll(); onMouseOut=javascript:parent.frames[1].startscroll(); align="top" ></A><br> 
        <A  href='movie.asp?id=<%=rs("articleid")%>' target=_blank title="<%=rs("title")%>" class="left"   onMouseOver=javascript:parent.frames[1].stopscroll(); onMouseOut=javascript:parent.frames[1].startscroll(); ><%=rs("title")%></a><br>
         <a href="movie.asp?id=<%=rs("articleid")%>" target="_blank"><font size=2 color=#FFFFFF>&lt;<%=rs("title")%>&gt;</font></a><font color="#FFFFFF"></div>

    	</font>

    </td>
                     <% i=i+1
                        if i>=30 then exit do
                        rs.movenext
						
                        loop
                        end if
                        rs.close
                        set rs=nothing
                     %>                              
                            </tr>
                            </table></body>
</html>

⌨️ 快捷键说明

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