<% TopClassType=-1 RclassType=1 sql_WebSet="Select * from WebSet " Set rs_WebSet=Server.CreateObject("Adodb.RecordSet") rs_WebSet.Open sql_WebSet,conn,1,3 hd_title=rs_WebSet("hd_title") hd_keywords=rs_WebSet("hd_keywords") hd_description=rs_WebSet("hd_description") hd_author=rs_WebSet("hd_author") hd_searchTitle=rs_WebSet("hd_searchTitle") rs_WebSet.close set rs_WebSet=nothing keyword=replace(trim(request("keyword")),"'","''") %> <%if keyword="" or keyword="輸入公司名稱,即可查到項目進程" then keyword="$" end if%> <%=hd_title%>|<%=keyword%> name=keywords> name=description> 欧美图片
您現在的位置:首頁 >  客戶服務 > 項目查詢
<%if keyword<>"$" then%> <% usql=" where title Like '%"& keyword &"%' or website like '%"& keyword &"%' order by projectID desc" set rs=server.createobject("adodb.recordset") sql="select projectID,title from project"&usql rs.open sql,conn,3,3 if rs.eof or rs.bof then response.Write("
暫無相關信息
") else rs.PageSize=25 NowPage=Request("page") if NowPage="" or not isNumeric(NowPage) then NowPage=1 Nowpage=clng(Nowpage) if NowPage<1 then NowPage=1 if NowPage>rs.PageCount then NowPage =rs.PageCount rs.AbsolutePage = NowPage %>
    共搜索到  [<%=rs.recordcount%>]  條與“<%=keyword%>”相關信息    
共<%=rs.recordcount%>篇 第<%=NowPage%>頁  <%if rs.PageCount=1 or Nowpage=1 then%> 首頁  <%else%> 首頁  <%end if %> <% if NowPage<>"1" then Response.Write "上一頁 " else Response.Write "上一頁 " end if if NowPage<>rs.PageCount then Response.Write "下一頁 " else Response.Write "下一頁 " end if %> <%if rs.PageCount=1 or nowpage=rs.PageCount then%> 尾頁  <%else%> 尾頁  <%end if %> 共<% =rs.PageCount %>頁 <%=rs.PageSize%>篇/頁 <% response.Write "轉到:" %>
<% end if rs.close() %> <%end if%>
欧美图片 贵州麻将平台代理 皇冠比分官网 总进球 麻将软件代理 云南11选5一定牛 广船国际股票 哈尔滨小姐微信 上门酒店按摩女 蒙发利股票千股千评 秒速牛牛首页 360足球比分直播即时比分 华东联网浙江十五选五走势图 河南快3 怎么举报网络赌博 澳洲幸运10开奖 牛操盘