<% sql = "Select * from comment order by comment_id desc" set rs = Server.CreateObject("ADODB.RECORDSET") rs.Open sql ,conn ,2,3 if rs.eof and rs.bof then else do while not rs.EOF commentid = rs("comment_id") comment_title = rs("title") comment_data=rs("data") sender_name=rs("sender_name") email=rs("email") %> <% varchecked = "" rs.MoveNext loop end if %>
 
  <%=comment_title%>

<%=comment_data%> <%=sender_name%>
<%=email%>