<ul id="tech">
	<%
Set rslm = server.CreateObject("adodb.recordset")
sqllm = "select top 3 * from class order by id asc"
rslm.Open sqllm, conn, 1, 1
Do While Not rslm.EOF
%>
		<li><a href="news.asp?id=<%=rslm("id")%>"><%=rslm("class")%></a></li>
<%
   rslm.movenext
    Loop
	rslm.close
set rslm=nothing
  %>
   </ul>