UC知道asp新手求教
来源：百度知道 编辑：UC知道 时间：2024/05/03 00:42:55
我是一个新手，请大师们手把手教我一下。
如下一段代码，能详细解释一下吗？
<%
t=0
Set rs=Server.CreateObject("ADODB.RecordSet")
sql="SELECT * from NEWS order by id desc"
rs.Open sql,conn,1,1
if not Rs.eof then
do while not rs.eof
t=t+1
%>
<li class="leftdetailli"><a href="onews.asp?id=<%=rs("id")%>" title="<%=rs("title")%>" target="_blank"><%=left(rs("title"),13)%></a></li>
<%
if t>=10 then exit do
rs.movenext
loop
else
response.write "<li class='leftdetailli'>尚无收录</li>"
end if
rs.close
%>
如下一段代码，能详细解释一下吗？
<%
t=0
Set rs=Server.CreateObject("ADODB.RecordSet")
sql="SELECT * from NEWS order by id desc"
rs.Open sql,conn,1,1
if not Rs.eof then
do while not rs.eof
t=t+1
%>
<li class="leftdetailli"><a href="onews.asp?id=<%=rs("id")%>" title="<%=rs("title")%>" target="_blank"><%=left(rs("title"),13)%></a></li>
<%
if t>=10 then exit do
rs.movenext
loop
else
response.write "<li class='leftdetailli'>尚无收录</li>"
end if
rs.close
%>
<% t=0 Set rs=Server.CreateObject("ADODB.RecordSet")>创建记录集对象
sql="SELECT * from NEWS order by id desc" 查询news表所有信息按id的倒叙排序
rs.Open sql,conn,1,1执行查询语句
if not Rs.eof then 判断如果记录存在.
do while not rs.eof t=t+1 执行t=t+1直到记录结束
%>
<li class="leftdetailli"><a href="onews.asp?id=<%=rs("id")%>" title="<%=rs("title")%>" target="_blank"><%=left(rs("title"),13)%></a></li>超连接,读取id记录和标题记录.
if t>=10 then exit do
rs.movenext
loop
如果t>=10那么退出while循环rs.movenext '移动下条记录loop '结束
else
response.write "<li class='leftdetailli'>尚无收录</li>"
end if
rs.close
判断如果没有记录,弹出提示"尚无收录"
希望对你有帮助!
Set rs=Server.CreateObject("ADODB.RecordSet")
sql="SELECT * from NEWS order by id desc"
连接数据库，在news表里按照id从