newid.asp

一个用jsp 编写的个人主页网站哦。希望对大家有所帮助啊

<!--#include file="conn.asp" -->
document.write("<%
set rs=server.CreateObject("adodb.recordset")
sql="select * from dairy order by id desc"
rs.open sql,conn,1,3

whichpage=Trim(Request.QueryString("page"))
if whichpage="" then
page=1
else
page=whichpage
end if
if rs.bof and rs.eof then
response.Write("还没有日记呢，请添加日记先！")
else
rs.pagesize =10
total  = rs.RecordCount
mypagesize=rs.pagesize
rs.absolutepage = page
pagec=rs.pagecount
do while not rs.eof
%>");
document.write("&nbsp;<img src=img/arrow.gif width=9 height=8 border=0>&nbsp;<a href=liyu_txt.asp?id=<%= rs("id") %> target=_blank><%= rs("title") %> | <%= rs("dateandtime") %></a><%
If Rs("sdk")=1 then
response.Write("<img src=images/no.gif width=12 height=15 border=0><br>")
Else
response.Write("<img src=images/off.gif width=15 height=15 border=0><br>")
End If 
%>");
document.write("<%n=n+1
rs.movenext
if n>=rs.pagesize then exit do    
loop
end if%>");