<% 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%>
| 首页  |  奇石收藏  |  奇石鉴赏  |  奇石养护  |  奇石交易  |  奇石新闻  |  求购石头 | 出售石头 | 会员中心 | 网上石馆 | 奇石搜索 | 问题帮助 | 广告合作
求购全国各地奇石
求购奇石，主要用于展会礼品。要求奇石主题鲜明，图案以龙、凤、松、竹、菊为最优。数量：120块。价格：每块限定在5000RMB以内。也可在20000左右，但是要求物有所值。
联系方式
发布于：2008-10-29 已被阅读： 次 
<% 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 %>