 <%
				
		 set rs=server.CreateObject("adodb.recordset")
                 
                
                   rs.open "select top 1 * from sdx_article where  artbclassid=3 order by adddate desc",conn,1,1
                 
         
				if err.number<>0 then
				response.write ""
				end if
				
  				if rs.eof And rs.bof then
       				Response.Write ""
   				else
	  				
       			
	   			i=0
			do while not rs.eof
			%>

[<a href='<%=hwap%>/alt.asp?abid=3'>公告</a>]<a href='<%=hwap%>/a_show.asp?id=<%=rs("articleid")%>'><%=trim(rs("articletitle"))%></a>

       <%
			i=i+1
			if i>=1 then Exit Do
			rs.movenext
			loop
                         end if
			rs.close
			set rs=nothing
			
          %>              