%@ CODEPAGE="65001" %> <%session.codepage="65001"%> <%response.Charset="UTF-8" %> <% dim sid,title,rs,sql sid=request.QueryString("sid") sql="select * from newslist where 1=1" if sid<>"" and sid<>"0" then sid=cint(sid) title=NewsSortNameCache("",sid) sql=sql&" and SortID in ("&ReturnAllChild(sid,"newssort")&sid&")" else sid=0 title="新闻中心" end if sql=sql&" order by NewsAddTime desc,NewsID desc" set rs=server.CreateObject("adodb.recordset") rs.open sql,conn,1,1 rs.PageSize=10 page=cint(request("page")) if page<1 then page=1 elseif page>rs.pagecount then page=rs.pagecount end if %>
| 您现在的位置 -->> 咨询频道 -- >> 进出口 -- >> 正文 |
| 今日新闻推荐: |
|