<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> <% sSql="Select * From CoolSiteData Where C_SiteClass = 7 and C_Recycle=False Order By C_ID Desc" oRs.open sSql,oConn,1,1 %> <% if oRs.bof and oRs.eof then response.redirect("/ver3.0/news/") else page=request.querystring("Page") oRs.PageSize = 5 if Not IsEmpty(page) then if Not IsNumeric(page) then page=1 else page = cint(page) end if if page > oRs.PageCount then oRs.AbsolutePage = oRs.PageCount page=oRs.pagecount elseif page <= 0 then page=1 oRs.AbsolutePage = 1 else oRs.AbsolutePage = page end if else page=1 oRs.AbsolutePage=1 end if end if %> 国产精品午夜福利亚洲综合网,给我免费播放片高清在线观看视频,亚洲欧美精品AAAAAA片

欧美亚洲国产日韩一区二区,亚洲欧美一区二区三区hhh,亚洲一区二区三区av资源,视频二区三区四区欧美日韩,在线视频一区视频二区视频三区,av成人永久免费看片本色,18禁看久久中文字幕一区二区,中文字幕在线视频播放不卡

新聞中心
視頻新聞
<% For i = 1 to oRs.PageSize if oRs.EOF then Exit For end if Title=oRs("C_SiteName") if len(oRs("C_Description"))<60 then rec_content=oRs("C_SiteDesc") else rec_content=oRs("C_Description") end if rec_content=replace(rec_content," ","") rec_content=left(trim(ClearHtml(rec_content)),72)&"..." if Len(Title)>25then NTitle=left(Title,23)&"..." else NTitle=Title end if response.Write("
") response.Write("
") response.Write("
") response.Write("
") response.Write("

"&""&NTitle&"

") response.Write("

"&rec_content&"

") response.Write("
") response.Write("
") oRs.movenext Next %>
<%if oRs.pagecount<>1 and oRs.pagecount<>0 then%> <%if page>1 then%> [首頁] [上一頁] <%if page [下一頁] [尾頁] <%else%> [下一頁] [尾頁] <%end if%> <%else%> [首頁] [上一頁] [下一頁] [尾頁] <%end if %> <%else%> [首頁] [上一頁] [下一頁] [尾頁] <%end if%> [頁次:<%=page%>/<%=oRs.PageCount%>] [共<%=oRs.RecordCount%>篇 <%=oRs.PageSize%>篇/頁] <%oRs.close()%>
鹤峰县| 梨树县| 象州县| 临汾市| 江西省| 齐齐哈尔市| 牙克石市| 星座| 都匀市| 巩留县| 徐闻县| 温宿县| 湘乡市| 开平市| 阿拉善右旗| 深水埗区| 高淳县| 都昌县| 靖宇县| 璧山县| 武清区| 三河市| 胶南市| 邓州市| 娄烦县| 南溪县| 苍溪县| 西平县| 建水县| 辽阳县| 临湘市| 鄢陵县| 柘荣县| 启东市| 南丹县| 博兴县| 洱源县| 南皮县| 乌鲁木齐市| 海丰县| 博罗县|