<%
set rs=server.CreateObject("adodb.recordset")
rs.open "select top 1 neirong from gonggao order by adddate desc ",conn,1,1
if err.number<>0 then
response.write "
暂无公告!"
else
if rs.eof And rs.bof then
response.write "
暂无公告!"
else
response.write ""&rs("neirong")&""
end if
end if
rs.close
set rs=nothing
%>