<% function imgname(str) dim ar,ar1,str1 dim i,s i=instr(1,str,"new/Upfiles/",1) s=mid(str,i,30) ar=split(str,chr(34),-1,1) imgname=ar(1) end function %> 南阳水泥 南阳航天水泥
 
杨雨拉丁舞音乐乐曲下载 桑巴
桑巴_音乐_杨雨拉丁舞
斗牛_音乐_杨雨拉丁舞
恰恰_音乐_杨雨拉丁舞
牛仔_音乐_杨雨拉丁舞
伦巴_音乐_杨雨拉丁舞
香港投资移民
移民加拿大 澳大利亚移民
  
<% set rs=server.CreateObject("ADODB.Recordset") sql="select top 8 * from article where classid=2 order by dateandtime desc" rs.open sql,conn,1,3 if rs.bof and rs.eof then %>
  ♦  还没有内容!
<%else i=1 do while not rs.eof %>
  ♦  " target="_blank" title="<%=rs("title")%>"><%=gotTopic(rs("title"),84)%>
<% i=i+1 if i=7 then exit do end if rs.movenext loop if rs.recordcount>6 then %>
更多...
<% end if rs.close set rs=nothing end if %>
<% set rs=server.CreateObject("ADODB.Recordset") sql="select top 8 * from article where classid=3 order by articleid asc" rs.open sql,conn,1,3 if rs.bof and rs.eof then %>
还没有内容!
<%else i=rs.recordcount %> <% rs.movenext if i>=3 then %> <%rs.movenext %> <%end if if i=2 then %> <%end if if i=1 then %> <%end if %>
无图片!无图片! 无图片!
<% if rs.recordcount>3 then %>
更多...
<% end if rs.close set rs=nothing end if %>


All rights reserved 河南南阳航天水泥厂 网站制作:U南阳
地址:河南南阳 电子邮件:nyhtsnc@sina.com
电话:0377-62052360 传真:0377-62052399 邮编:473000

豫ICP备05006733号
友情链接:牛皮癣 南方天空下 海泡石 CTP版材 ps版 风水 启闭机
立体停车 立体车库 电流互感器 电压互感器 互感器 太阳膜