<%@LANGUAGE="VBSCRIPT" CODEPAGE="950"%> <% if request("page")="" then Page=1 else page=request("page") end if set rs=server.CreateObject("adodb.recordset") rs.open "select * from news order by px desc",conn,1,1 rs.pagesize=20 rs.AbsolutePage = page totalpage=rs.pagecount %> 最新消息-同富達貿易有限公司
  • 香港線專案

<% for i=1 to rs.pagesize if rs.eof then exit for %> <% rs.movenext next %>
" class="pt"><%=rs("title")%> <%=rs("addtime")%>
<% if totalpage>1 then filename="news.asp?page=" if page>1 then response.Write "上一頁  " if int(page)>4 then startpage=int(page)-3 endpage=int(page)+4 if int(totalpage)-startpage<8 then startpage=totalpage-7 endpage=totalpage end if else if totalpage>8 then endpage=8 else endpage=totalpage end if startpage=1 end if if startpage<=0 then startpage=1 for i=startpage to endpage if int(page)=i then response.Write i else response.Write " ["&i&"] " end if next if int(page)下一頁" end if %>
台灣聯絡人│陳銘富:0936-360619____skype: chenmingfu888 QQ:1463866950
台中市西區大忠南街121號│mail:chenmingfu888@gmail.com / angel22540@gmail.com│統編:2443-3219

同富達貿易有限公司 │ 客服專線:04-2376-0030 │ Fax:04-2376-2230