info_brand.asp

漂亮公司企业网站自助建站系统 .asp.rar

<%
set rs=server.CreateObject("adodb.recordset")
rs.open "select top 10 * from wq_pingpai where tuijian=1 order by pingpaiorder",conn,1,1
if rs.eof and rs.bof then
response.write "<center>&nbsp;</center>"
else
%>                 
<table width="178" border="0" cellspacing="0" cellpadding="0">
   <tr> 
    <td height="14"><img src="image/tjpp.gif" width="178"></td>
  </tr>
    <tr> 
    <td> 
      <table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr> 
          <td height="30"> 
            <%
		  while not rs.eof
		  response.write "<table width=100% border=0 cellspacing=0 cellpadding=0><tr><td  background=image/dp_bg3.gif height=24>　　<a href=research.asp?action=2&selectname="&trim(rs("pingpainame"))&"&anclassid=0&jiage=100000>"&trim(rs("pingpainame"))&"</a></td></tr></table>"
		  rs.movenext
		  wend
		  %>
          </td>
        </tr>
      </table>
    </td>
  </tr>
</table>
                      
<%end if
rs.close
set rs=nothing%>