 |
<%set conn=server.createobject("ADODB.CONNECTION")
conn.open "DBQ="+server.mappath("../../news/news.mdb")+";DRIVER={Microsoft Access Driver (*.mdb)};"
set rs=server.createobject("adodb.recordset")
rs.open"select top 8 * from news order by id desc",conn,1,1
if rs.bof and rs.eof then
response.write "暂时没有新闻."
'response.end
else
while not rs.eof
ndate=cdate(rs("sj"))
if ndate>(now()-3) then
newp=" "
else
newp=""
end if
if len(rs("bt"))<=15 then
title=""
else
title="..."
end if%>
|
| · |
','','toolbar=yes,location=yes,status=yes,menubar=yes,scrollbars=yes,resizable=yes,width=470,height=400')"><%=left(rs("bt"),15)%><%=title%><%=newp%> |
|
<%
rs.movenext
wend
end if
%>
|
|
|
|
 |
|
您现在的位置:
首页 > 休闲娱乐
|
闲情信步，轻歌曼舞，酒店的康体、娱乐等服务随时恭候，为您释放一天的紧张和疲劳。
|
 |
|
|
|
游泳池 |
|
|
|
|
|
碧草如茵的网球场 |
|
|
|
