<% set rs=server.CreateObject("adodb.Recordset") sql="Select * from Class_Table order by ID asc" rs.open sql,conn,1,1 if not rs.eof then %> <%for j = 1 to 2%> <% if rs.eof then exit for end if next end if%>
| 首页  |  奇石收藏  |  奇石鉴赏  |  奇石养护  |  奇石交易  |  奇石新闻  |  求购石头 | 出售石头 | 会员中心 | 网上石馆 | 奇石搜索 | 问题帮助 | 广告合作
求购矿物奇石、标水晶簇奇石、水晶石
求购矿物奇石、标水晶簇奇石、水晶石。产地要求：广西、湖北、湖南地区，价格：6000以内。联系人：王经理  联系电话：VIP会员可见
发布于：News_date 已被阅读： 次 
<% set rs=server.CreateObject("adodb.recordset") rs.open "select * from [link]",conn,1,1 dim m m=0 do while not rs.eof m=m+1 %> <% if m mod 8=0 then response.Write("") end if rs.movenext loop rs.close set rs=nothing %>