top2.asp

来自「烈火之家整站程序 本程序集商业娱乐一体,本来是给自己用的但是我的国外空间支持不够」· ASP 代码 · 共 29 行

<center>                                           
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
   
  <tr> 
    <td height="20" class=title> 
      <DIV style="Z-INDEX: 1; POSITION: relative" align=left> 
        <table border=0 cellspacing=0 cellpadding=4>
                  <tr> 
         <%       
    set rs=server.CreateObject("adodb.recordset")    
    sql="select ClassId,ClassName from FlashClass "       
    rs.Open sql,conn,1,1     
    do while not rs.EOF       
 
		Response.Write "<td width=70 ><font color=#ffffff>■</font>&nbsp;<a href=speciallist.asp?classID="&rs("ClassId")&">"&rs("ClassName")&"</a></td>"       
					      
    rs.MoveNext       
    loop       
    rs.Close     
    %>
</center>  
            </DIV>
                   </tr>
        </table>
      </DIV>
    </td>
  </tr>
</table>
</center>