6_3.asp

来自「ASP网站论文 另计算机毕业设计出售,全套 论文加程序答辩通过,历届」· ASP 代码 · 共 10 行

<%
Sub ShowOnePage( rs, Page )
  rs.AbsolutePage = Page
  For iPage = 1 To rs.PageSize
     RsToGbook rs
     rs.MoveNext
     If rs.EOF Then Exit For
  Next
End Sub
%>