查人人中国名人网中铁物资沈阳公司招人:在网页的新闻版块，动态地显示数据库里的内容，其ASP语言该如何写呢？
来源：百度文库 编辑：查人人中国名人网 时间：2024/04/29 07:17:16
<%
'创建连接字符串，创建一个 Connection 对象示例，
'连接到数据库。
strProvider = "Provider=Microsoft.JET.OLEDB.4.0;Data Source=C:\InetPub\Wwwroot\myasp\guestbook.mdb;"
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open strProvider
strQuery = "SELECT * FROM GuestBook"
Set objRS = objConn.Execute(strQuery)
On Error Resume Next
While Not objRS.EOF
'objRS(2)表示新闻标题
'objRS(3)表示新闻内容
Response.Write "<LI>" & objRS(2) & "<br>" & objRS(3) & "<br>"
Wend
objConn.Close
%>
这是我写得一个片段，大家帮忙看看哪里不对啊！谢啦
<%
strProvider = "Provider=Microsoft.JET.OLEDB.4.0;Data Source=C:\InetPub\Wwwroot\myasp\guestbook.mdb;"
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open strProvider
set rs=createobject("ADODB.recordset")
rs.open "select * from news order by 日期 DESC",cn,1,1
%>
<table align="center" width="340" border="0" valign="top">
<%for i=1 to 5 %>
<% if not rs.EOF then %>
<tr height=20>
<td width="240"><IMG src="image/niao.gif" width="14" height="14">
<a href="newview.asp?id=<%=rs.Fields(0)%>"><% =left(rs.fields(1),14)%>...</td>
<td width="90"><%=rs.Fields(2)%></td>
<td width="25"><%=rs.Fields(3)%></td>
</tr>
<%rs.movenext
end if
next%>
<tr height=20>
<td align=right colspan=3><a href="shownews.asp">
>>> 更多</a>
</td>
</tr>
</table>
{rs.Fields(0)是表中对应的新闻标记,rs.Fields(1)是标题,rs.Fields(2)是内容,rs.Fields(3)是日期
这是我以前做的网页上的,你只用改一下名就行,通过日期排序只显示前5条
}
永远显示最新的那几条记录，用数据库查询Top n
数据记录的id作为连接参数