热门商户
<% sql="select top 6 * from register" sql=sql&" order by viewcount desc" set rs=server.createObject("adodb.recordset") rs.open sql,conn,1,1 do while not rs.eof %> <% rs.moveNext loop %>
· &projectname=<%=rs("projectname")%>" title="<%=rs("projectname")%>" target="_blank"> <% if len(rs("projectname"))>12 then response.Write left(rs("projectname"),12) else response.Write rs("projectname") end if %>
 
   最新商户展区
     
  <% set rs=createobject("adodb.recordset") sql="select top 39 * from register order by id DESC" rs.open sql,conn,3,3 if rs.eof then %> <%end if i=0 do while not rs.eof i=i+1 %> <% if (i mod 3=0) and i>=3 then %> <% end if 'if i>=4 then exit do end if rs.movenext loop rs.close %>
信息正在更新中...
  &projectname=<%=rs("projectname")%>" title="<%=rs("projectname")%>" target="_blank"> <% if len(rs("projectname"))>13 then response.Write left(rs("projectname"),13) else response.Write rs("projectname") end if %> " title="点击查看具体信息" target="_blank">
 
公告
<% sql="select top 5 * from news order by id desc" set rs=Server.CreateObject("Adodb.Recordset") rs.Open sql,conn,1,1 do while not rs.eof %> ');" onMouseOut="javascript:closeDiv('news<%=Trim(rs("id"))%>');" style="cursor:default;"> <% rs.MoveNext Loop rs.Close set rs=Nothing %>
<%=rs("Topic")%> <%=rs("AddTime")%>
"> <%=Trim(rs("Content"))%>
<% sql="select top 6 * from examplepic" sql=sql&" order by ID desc" set rs=server.createObject("adodb.recordset") rs.open sql,conn,1,1 if rs.eof then %> <%end if i=0 do while not rs.eof i=i+1 %> <% if (i mod 6=0) and i>=6 then %> <% end if rs.movenext loop rs.close %>
" title="点击查看源图" target="_blank">" width="148" height="109" border=0>