<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>展览公司列表-排行-会展之窗</title>
<link href="style.css" rel="stylesheet" type="text/css" />
<script type="text/javascript" language="javascript" src="js/jquery.js"></script>
<script type="text/javascript" language="javascript" src="js/site.js"></script>
</head>
<!--#include file="inc/Function.asp"-->
<!--#include file="inc/Config.asp"-->
<!--#include file="inc/conn.asp"-->

<body>
<!--#include file="top.asp"-->

<table width="990" border="0" align="center" cellpadding="0" cellspacing="0" class="margintop">
  <tr>
    <td width="225" valign="top"><img src="images/jz_03.jpg" width="221" height="312" /></td>
    <td valign="top"><table width="100%" border="0" align="center" cellpadding="0" cellspacing="0" class="margintop">
      <tr>
        <td><table width="100%" border="0" cellspacing="0" cellpadding="0">
            <tr>
              <td width="137" align="center" valign="bottom" background="images/ppny_05.jpg" class="font14hui">公司列表</td>
              <td background="images/ppny_06.jpg">&nbsp;</td>
              <td width="14"><img src="images/ppny_08.jpg" width="14" height="37" /></td>
            </tr>
        </table></td>
      </tr>
      <tr>
        <td height="250" valign="top" class="fontcont2 bordertree" style="padding:8px;" >
		<%
		    Call ConnectionDataBase()
			Sql="Select ID,Company,Content From T_Users Where Recycle=0 And Company<>'' AND (VipGroup=2 OR VipGroup=3) Order By Recommend ASC,Hits DESC,ID DESC"
			SetRs Rs,Sql,conn,1,1
			IF Rs.eof And Rs.bof Then
				Response.Write "对不起,目前没有相关记录!"
			Else
				n=0
				Rs.pagesize=10
				IF Not isempty(request("page")) And isnumeric(request("page")) Then 				  
					p=cint(request("page"))   
					IF p>Rs.pagecount Then p=Rs.pagecount
				Else   
					p=1
				End IF             
				Rs.AbsolutePage=p
				Do While Not Rs.eof	
		%>
		<table width="100%" border="0" cellspacing="1" cellpadding="2">
          <tr>
            <td height="35" bgcolor="#F5F5F5"><a href="ucompany.asp?userid=<%=Rs("ID")%>" target="_blank" class="fonttitle">&nbsp;<%=Rs("Company")%>  </a></td>
            <td>&nbsp;</td>
            </tr>
          <tr>
            <td class="fontcont" style="border-bottom:#CDCDCD dotted 1px;">
			<%
			IF Rs("Content")<>"" Then
			Content=RemoveHTML(Rs("Content"))
			LeftStr Content,80
			End IF
			%>
			</td>
            <td>&nbsp;</td>
            </tr>
        </table>
		<%  
				n=n+1     
				Rs.movenext
				IF n>=Rs.pagesize Then Exit Do
			Loop
		End IF
		%>
          
		  </td>
      </tr>
	  <tr>
		<td height="20" valign="center" class="fontcont2 bordertree" style="padding-left:10px" >
		<%
		IF Rs.recordcount>0 Then
			Call showpage(p,Rs.recordcount,Rs.pagesize,"?","")
			DisRs Rs
		End IF
		Call CloseDataBase
		%>
		</td>
	  </tr>
    </table></td>
  </tr>
</table>
<!--#include file="bottom.asp"-->
</body>
</html>
