<% flag="尚未处理" set rs=server.createobject("adodb.recordset") sqltext="select * from PE_Company where StatusInField= 3 order by CompanyId desc" rs.open sqltext,mconn,1,1 dim PerPage PerPage=29 If rs.eof and rs.bof then response.write "

还没任何企业加入

" response.end End if text="0123456789" Rs.PageSize=PerPage for i=1 to len(request("page")) checkpage=instr(1,text,mid(request("page"),i,1)) if checkpage=0 then exit for end if next If checkpage<>0 then If NOT IsEmpty(request("page")) Then CurrentPage=Cint(request("page")) If CurrentPage < 1 Then CurrentPage = 1 If CurrentPage > Rs.PageCount Then CurrentPage = Rs.PageCount Else CurrentPage= 1 End If If not Rs.eof Then Rs.AbsolutePage = CurrentPage end if Else CurrentPage=1 End if call list If Rs.recordcount > PerPage then end if Sub list()%>
济南庆华生姜机械厂
  导航:中国姜网>>企业名片>>姜片企业

 1、免费注册:填写您的企业信息资料,资料完善后便可发布。
 2、发布您的企业时尽可能的完善相关资料,有利于综合宣传您的企业。
 3、在注册完您的企业时,及时的发布供求信息,我们的工作人员会更积极的审核您的企业名片;
 4、您可以随时在会员中心更新您的资料;
 5、推广方案:对所发布的信息同时发布在“国际大蒜信息网”相关栏目中。
 6、享受更多服务,请注册为收费会员。

<%call newenterprise()%>

姜片企业

<% End sub rs.close set rs=nothing %> <% mconn.close set conn=nothing %>