为什么这串代码只能取一个值?
<%Set rs=Server.CreateObject("ADODB.RecordSet")
sql = "select top 10 * from news where sort=19 order by fbdate desc"
rs.Open sql,conn,1,1
fbuser=rs("fbuser")
Set rs1=Server.CreateObject("ADODB.RecordSet")
sql1="select top 10 * from JaAdmin where JaAdmin='"&fbuser&"'"
rs1.open sql1,conn,1,1
i=0
%><% if not rs.eof then %>
<% do while (not rs.eof) and (i < 10)
i=i+1
%>
<tr>
<td><img src="images/dd.jpg" width="11" height="11" />
<a href='../hy/<%=rs1("moban")%>/ViewInfo.asp?idd=<%=rs("id")%>&id=<%=rs1("UserID")%>'><%response.write mid(rs("title"),1,15)%></a> <% response.write "["&year(rs("fbdate"))&"-"&month(rs("fbdate"))&"-"&day(rs("fbdate"))&"]"%>
</td>
</tr>
<% rs.movenext
loop %>
<% rs.close
set rs=nothing%>
<% else %>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="100%" align="center">还没有相关内容</td>
</tr>
</table>
<% end if %>
[[it] 本帖最后由 sydpoechang 于 2008-1-29 17:53 编辑 [/it]]