index.asp

来自「本代码是一个个人主页」· ASP 代码 · 共 37 行

<!--#include file="header.asp"-->
<div id=ly_body>
<%
  set rs=server.createobject("adodb.recordset")
  sql="select * from ly_content order by id desc"
  rs.open sql,db,1
  if not rs.bof and not rs.eof then
      dim page_size
      dim page_no
      dim page_total
      page_size=20
      if request("page_no")="" then
        page_no=1
      else
        page_no=cint(request("page_no"))
      end if
      session("page_no")=page_no
      rs.pagesize=page_size	
      page_total=rs.pagecount
      rs.absolutepage=page_no
      dim i,j
      i=0
      j=page_size
%>
<div id="fy">
	<%
	  fy("index.asp?")
	%>
	</div>

<%
  do while not rs.eof and j>0
  i=i+1
	  j=j-1
  ly_content=rs("ly_content")
%>
	<div id=ly-2><div id=ly-2-1><strong><%=rs("ly_author")%></strong>浜