<%
set conn=server.createobject("adodb.connection")
DBPath = Server.MapPath("Dvbbs7.1.0_Ac/data/Dvbbs7.mdb")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
%>
<%
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select top 8 * from Dv_Topic where
DateAndTime="rs.open sql,conn,1,1
if rs.eof or rs.bof then
%>
<br>
暂无相关信息!
<br>
<%
else
while not rs.eof
%>
<
title="<%=rs("title")%>"><%=(rs("title"))%></a>
<%
rs.movenext
wend
end if
%>
这是我写的
里面还有两个问题没解决
DateAndTime="
我是想调用日期为今天的贴子
那么让DateAndTime=今天的日期
这该怎么写
还有就是链接a href=""
腰缠十万贯,骑鹤上扬州.玉树琼花,金粉之盛,远过秦淮.晓起凭栏,六代青山尽在眼,晚来把酒,二分明月正当头