请高高手进来帮忙看看,这段代码为什么只能从数据库中调出一条数据到首页..急!在线等!!!!

来源:百度知道 编辑:UC知道 时间:2024/07/04 13:43:33
<%
set rs=server.CreateObject("adodb.recordset") '建立记录集
dim sql:sql="select top 10 * from E_News where typeid=18 " 'sql语句
rs.open sql,conn,1,1
for i=1 to 10 '循环10条记录
%>
<table>
<tr>
<td>
<a href='E_ReadNews.asp?NewsID=<%=rs("Newsid")%>'><%=rs("Title")%> </a>
</td>
</tr>
</table>

<%
next
rs.movenext '指针向下移动
rs.close
set rs=nothing
%>

<body>
</html>
这段代码只能调一条数据到到首页。麻烦高手指点!

代码修改如下:

<%
set rs=server.CreateObject("adodb.recordset")
dim sql:sql="select top 10 * from E_News where typeid=18 " 'sql语句
rs.open sql,conn,1,1
for i=1 to 10
%>
<table>
<tr>
<td>
<a href='E_ReadNews.asp?NewsID=<%=rs("Newsid")%>'><%=rs("Title")%> </a>
</td>
</tr>
</table>

<%
rs.movenext
next
rs.close
set rs=nothing
%>