Question

asp 读取 sql 数据问题 下面是代码

<%
DIM Conn,Connstr
set conn=server.createobject("adodb.connection")
Connstr="driver={SQL Server};server=(local);uid=sa;pwd=xjxnkl121;database=newfarm"
conn.open Connstr
%>
<%
Set rs=Server.CreateObject("Adodb.RecordSet")
sql="select * from users order by id DESC"
rs.open sql, Connstr, 1,1
do while not rs.eof
%>
<%=rs("name")%>
<%
rs.movenext
loop
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
Microsoft OLE DB Provider for ODBC Drivers 错误 '80004005'

[Microsoft][ODBC SQL Server Driver][SQL Server]无法打开登录所请求的数据库 "newfarm"。登录失败。

/index.asp，行 5

Answer 1

<%
DIM Conn,Connstr
set conn=server.createobject("adodb.connection")
Connstr="driver={SQL Server};server=(local);uid=sa;pwd=xjxnkl121;database=newfarm"
conn.open Connstr
%>
<%
Set rs=Server.CreateObject("Adodb.RecordSet")
sql="select * from users order by id DESC"
rs.open sql, conn, 1,1'你创建的是conn，所以必需用conn
do while not rs.eof
%>
<%=rs("name")%>
<%
rs.movenext
loop
rs.close
set rs=nothing
conn.close
set conn=nothing
%>

Answer 2

代码看起来好像没什么问题啊
如果有问题的话可能是你数据库这里的数据为空，所以在读取时可能会有错误
if not rs.eof and not rs.bof then
do while not rs.eof
%>
<%=rs("name")%>
<%
rs.movenext
loop
end if

Answer 3

我觉得可能是你数据库读取有问题，或者就是所以把conn.asp（数据库连接页面）包含进来的

Answer 4

支持44yhsong 的回答，
rs.open sql, Connstr, 1,1
改为
rs.open sql, Conn, 1,1

Answer 5

rs.open sql, Connstr, 1,1
改为
rs.open sql, Conn, 1,1