asp连接数据库报错

[一者仁心]

<script language="vbscript" runat="server">
Set conn = Server.CreateObject("ADODB.Connection")
connstr="PROVIDER=SQLOLEDB;DATA SOURCE=.;UID=sa;PWD=sqllike99;DATABASE=test1;"
conn.Open connstr

//DATA SOURCE=服务器名或IP
//UID=数据库的用户名
//PWD=数据库用户的密码
//DATABASE=数据库名
//服务器：A3 数据库名称：new

sql="select * from aaa" 
rs.open sql,conn,1,1 
while not rs.eof
resposne.write rs("a")
rs.movenext
wend 
</script>

运行后报错
缺少对象: ''
/elow20090825_1.asp, 第 22 行
请问什么原因 刚接触asp

[lzp4881]

<script language="vbscript" runat="server">
Set conn = Server.CreateObject("ADODB.Connection")
connstr="PROVIDER=SQLOLEDB;DATA SOURCE=.;UID=sa;PWD=sqllike99;DATABASE=test1;"
conn.Open connstr

//DATA SOURCE=服务器名或IP
//UID=数据库的用户名
//PWD=数据库用户的密码
//DATABASE=数据库名
//服务器：A3 数据库名称：new
set rs = server.createobject("adodb.recordset")
sql="select * from aaa"
rs.open sql,conn,1,1
while not rs.eof
resposne.write rs("a")
rs.movenext
wend
</script>

[sy_binbin]

set rs = server.createobject("adodb.recordset")
sql="select * from aaa"
rs.open sql,conn,1,1
while not rs.eof
resposne.write rs("a")
rs.movenext
wend

[一者仁心]

就算改了前面两个 下面这行
resposne.write rs("a")
也会报错
运行后报错
缺少对象: ''

[一者仁心]

十分神奇 while wend 循环竟然报错 换成do loop就好了 大家解释下为啥吧

[plcc123]

set rs = server.createobject("adodb.recordset")

sql="select * from aaa"
rs.open sql,conn,1,1
while not rs.eof
resposne.write rs("a")
rs.movenext
wend
</script>