<% set sset=server.createobject("Adodb.recordset") ssql="select title,content from news where type=0 order by pdate" sset.open ssql,provstr do while not sset.eof title=sset("title") content=sset("content") %> <%=title%>

<%=replace(content,"

","

")%>