<% Set Rs=Server.CreateObject("ADODB.RecordSet") Rs.Open "Select Top 4 * From Table1 Order By ID Desc",Conn,1,1 If Rs.Eof And Rs.Bof Then Response.Write("数据库中没有数据") Else Do While Not Rs.Eof
%>
<%=rs("user")%>
<%=rs("content")%>
<%=rs("data")%>
<% Rs.MoveNext Loop End If Rs.Close Set Rs=Nothing %>