foot.asp

来自「一个企业管理ASP源码.增加了一些新的功能.」· ASP 代码 · 共 49 行

<TABLE  width="760" border=0 align="center" cellPadding=0 cellSpacing=0 bgcolor="#FFFFFF"> 
    <TR> 
      <TD height="5"></TD>
    </TR>    
    <TR> 
      <TD> <TABLE Class=FootBg  cellSpacing=0 cellPadding=0 width="100%" border=0>
          <TBODY>
            
       
            
            <TR> 
              <TD width="16%" height=20 bgColor=#f2f2f2> <DIV align=center>相关链接</DIV></TD>
              <TD width="84%" bgColor=#f2f2f2><%
set rs_links=server.createobject("adodb.recordset")
sqltext4="select top 10 * from links order by id desc"
rs_links.open sqltext4,conn,1,1 	

i=0							
do while not rs_links.eof%>
  <a href="<%=rs_links("link")%>" title="<%=rs_links("note")%>"target="_blank"><%=rs_links("name")%></a>                            
   <%rs_links.movenext
   i=i+1
   if i=10 then exit do
loop
rs_links.close %>

</TD>
            </TR>
            

         
        </TABLE></TD>
    </TR>    
    <TR> 
      
    <TD> 
      <DIV align=center> 
          
        <p><%=Copyright%></p>
        </DIV></TD></TR> <TR> 
<TD> 
      <DIV align=center> 
          
      <a href="basedsoftadmin/login.asp" target="_blank">管理后台</a>
        </DIV></TD></TR>
    
  </TBODY>
</TABLE>