| 公司新闻 |
<%
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("guestbook/datagrgrgrasgds/dgbds.mdb")
sql="Select top 5 * from news order by ID desc"
set rc=server.createobject("adodb.recordset")
rc.open sql,conn,1,1
if rc.eof then
%>
| 暂无新闻! |
<%else
do while not rc.eof
%>
| [<%=rc("News_Class")%>]<%=rc("News_Title")%> |
<%=rc("News_Date")%> |
<%=rc("News_Click")%> |
<%
rc.movenext
loop
rc.close
set rc=nothing
end if
%>
| |
