求助 ASP 下面的代码为什么运行不出来?

来源:百度知道 编辑:UC知道 时间:2024/06/27 04:46:29
<%
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open"dsntest"
set rs=conn.execute("select*from table1")
do while not rs.eof
response.write rs("name")+""
rs.movenext
loop
rs.close
conn.close
%>

<%
set rs=Server.CreateObject("ADODB.RecordSet")
sql="select * from table1 order by ID desc"
rs.open sql,conn,1
Do While Not rs.eof
response.write rs("name")+""
rs.movenext
if rs.eof then exit do
loop
rs.close
set rs = nothing
%>

Set conn = Server.CreateObject("ADODB.Connection")
conn.Open"dsntest"
set rs=conn.execute("select*from table1")
'我的
if rs.eof and rs.bof then
response.write("木有数据")
rs.close
conn.close
response.end()
end if
'我的结束
do while not rs.eof
response.write rs("name")+""
rs.movenext
loop
rs.close
conn.close