xshjgx.asp

新世纪影院源码

<table border="0" cellpadding="0" cellspacing="1" width="141" >
              <tr>
                <td width="141" height="21" align="center">¤<font size="4">&nbsp;</font> 
                  更新列表</td>                                                                   
              </tr>
              <%
              sql="select top 12 id,movietitle,movietype from movies order by id desc"
              rs.open sql,conn,1,1
              if rs.eof or bof then
              response.write""
              else
              do while not rs.eof or bof
              
              %>
                <tr>
                <td width="141" height="22" bgcolor="#FFFFFF" valign="middle" align="left"><a href=list.asp?id=<%=rs("id")%>><%
                movietitle=rs("movietitle")
                if len(movietitle)>7 then
                movietitle=left(movietitle,7)
                end if
                response.write movietitle
                %></a>　
                <a href=classtype.asp?class=<%=rs("movietype")%>><%
                movietype=rs("movietype")
                if len(movietype)>10 then
                movietitle=left(movietype,8)&"..."
                end if
                response.write movietype
                %></td>   
              </tr>
              <%
              rs.movenext
              loop
              end if
              rs.close
              %>
                               
               </table>