<% Set rs = Server.CreateObject("ADODB.Recordset") sql ="Select TOP 3 * FROM news Order By ID" rs.open sql,conn,1,3 If Not rs.Eof Then rs.MoveFirst do while not rs.eof %>

<%=rs("ntime")%>

"><%=left(rs("newscont"),150)%>......

<%rs.MoveNext Loop End If connclose()%>