<% content=request.form("neirong") %> <% if content="" then else sql="insert into kewenxuexi2 (content) values ('"&content&"')" conn.Execute(sql) end if %>
<% Set rs = server.CreateObject("ADODB.Recordset") sql="select * from kewenxuexi2 order by id desc" rs.Open sql,conn,1,1 Do While Not rs.eof %>
<%=rs("content")%>

<% rs.movenext Loop rem 释放资源 rs.close Set rs = Nothing %>