<!--#include file="head.asp"-->
<div align="center">           
  <table border="0" width="900" cellspacing="0" cellpadding="0">       
  <tr>           
    <td width="689" valign="top">         
  <table border="0" width="100%" cellspacing="0" cellpadding="0">
  <tr><td height="29" bgcolor="d9e1f7" align="center"><!--#include file="qysearchtop.htm"-->
</td>
  </tr>                                                          
<%sql="select * from nyeee_qydata where mark='1' order by id desc"                             
set rs=server.createobject("adodb.recordset")                             
rs.open sql,connstr,1,1                            
if rs.eof then %>                                 
<tr><td height="25"><font color="red">暂无企业信息</font></td>
</tr>
<%   
else                          
const maxperpage=20                             
dim currentpage                             
rs.pagesize=maxperpage                             
currentpage=request.querystring("pageid")       
if not isnumeric(currentpage) then                 
currentpage=1                 
end if                        
if currentpage="" then                             
currentpage=1                             
elseif currentpage<1 then                             
currentpage=1                             
else                             
currentpage=clng(currentpage)                             
	if currentpage > rs.pagecount then                             
	currentpage=rs.pagecount                             
	end if                             
end if                                            
dim totalput,n                             
totalput=rs.recordcount                             
if totalput mod maxperpage=0 then                             
n=totalput\maxperpage                             
else                             
n=totalput\maxperpage+1                             
end if                             
if n=0 then                             
n=1                             
end if                             
rs.move(currentpage-1)*maxperpage                             
i=0      
w=1                        
do while i< maxperpage and not rs.eof   
if rs("jieshao")<>"" then   
shuzu=split(rs("jieshao"),"<br>")  
word=shuzu(0)  
else 
word="&nbsp;&nbsp;&nbsp;&nbsp;企业详细资料暂缺！" 
end if%>      
<tr><td height="10"></td>
</tr>                                                
    <tr>                             
      <td width="100%" height="25"><a href="qyindex.asp?id=<%=rs("id")%>" target="_blank"><font color="#0000FF" size="3"><u><%=rs("name")%></u></font></a>&nbsp;<font color="#999999">[<%=rs("date")%>]</font><%if rs("tuijian")="yes" then%>&nbsp;&nbsp;<img src="images/star.gif">       
        <b><font color="#FF0000">推荐企业</font></b><%end if%></td>                                       
    </tr>                                       
    <tr>                                       
      <td width="100%">                                       
        <div align="center">                        
        <table border="0" width="100%" cellspacing="0" cellpadding="0">                                       
          <tr>                                       
            <td width="100%">&nbsp;&nbsp;<%if len(word)>100 then%><%=left(word,100)&"..."%><%else%><%=word%><%end if%></td>                                       
          </tr>                                       
        </table>                                                
        </div>           
      </td>                                       
    </tr>                                       
    <tr>                                       
   <td width="100%"><font color="#008000">（<%=rs("city")%>&nbsp;-&nbsp;<%=rs("lei")%>）</font></td> 
    </tr>        
    <tr>                               
      <td height="5">                               
      </td>                               
    </tr>
    <%w=w+1   
    i=i+1   
    rs.movenext
	loop 
    end if            
    rs.close           
    set rs=nothing%>                                                                     
    <tr>                                                               
      <td width="100%" height="25" valign="middle" bgcolor="#D9E1F7"><p align="center"><font style="font-size:12px">页数：<%=currentpage%>/<%=n%>                                                                          
   	<%k=currentpage                                 
   	if k<>1 then%>    
   	<a href="qiye.asp?pageid=1">首页</a>                                
   	<a href="qiye.asp?pageid=<%=k-1%>">上一页</a>                                 
   	<%else%>            
   	首页&nbsp;上一页                               
   	<%end if%>  
   	<%if k<>n then%>                                 
   	<a href="qiye.asp?pageid=<%=k+1%>">下一页</a>                                  
   	<a href="qiye.asp?pageid=<%=n%>">尾页</a>                                 
   	<%else%>              
   	下一页&nbsp;尾页                                  
   	<%end if%>       
     共有 <%=totalput%> 家企业</font></p>                                 
      </td>                                                                                 
    </tr>                                                                                                         
  </table>    
  </center>   
  </td>    
  <td width="211" valign="top">   
  <!--#include file="ad1.asp"-->   
  </td>   
  </tr></table>
</div>               
<!--#include file="foot.asp"-->