业务动态-大良专业律师网

	业务动态

	律师动态

	律师视界

您目前的位置：首页 >> 最新动态 >> 业务动态

<% sql="select newsid,newstitle,releasedate from ns_newscontent where nwtypeid=18 order by releasedate desc" set rsNews=fGetRsList(sql) currentPage=request("page") if currentpage="" then currentpage=1 else currentpage=clng(currentpage) end if MaxPerPage = 34 RecordCount = rsNews.RecordCount if not rsNews.RecordCount=0 then rsNews.MoveFirst end if do while pos<(currentPage-1)*34 pos=pos+1 rsNews.moveNext loop x=(currentPage-1)*34 i=0 do while x

	" class="a2" title="<%=rsNews("newstitle")%>"><%=left(rsNews("newstitle"),31)%>	<%=rsNews("releasedate")%>

<% rsNews.movenext loop if RecordCount mod 18 =0 then n= RecordCount \ 18 else n= (RecordCount \ 18)+1 end if if currentpage-1 mod 18 =0 then p=(currentpage-1) \ 18 else p=(currentpage-1) \ 18 end if %> <%if n<>0 then%>

" rsNews.close set rsNews=nothing %>

页次： <%=currentPage%> / <%=n%> 页

分页： <% if currentPage=1 then response.write "9 " else response.write "9 " end if if p*18>0 then response.write "7 " end if response.write "" for ii=p*15+1 to P*18+18 if ii=currentPage then response.write ""+Cstr(ii)+" " else response.write ""+Cstr(ii)+" " end if if ii=n then exit for next response.write "" if ii8 " end if if currentPage=n then response.write ": " else response.write ": " end if response.write "

<%end if%>

关于我们 | 内部平台 | 联系方式 | 设为首页