<% typeid=int(request("typeid")) zs=int(request("zs")) j=int(request("hs")) set rs=server.createobject("adodb.recordset") sql="select top "&j&" * from wtzx where huifu=1 and type="&int(typeid)&" order by id desc" rs.open sql,conn,1,1 if not rs.eof then for i=1 to j %> <% next else %> <%end if rs.close set rs=nothing %><% call CloseConn() %>

" target="_blank"> <% dim zt zt=trim(rs("zt")) if len(zt)>zs then response.Write(left(zt,zs)&"...") else response.Write(rs("zt")) end if %> <%rs.movenext%>

没有数据！