试了的,提示取值为空,nr没有取到值,有人知道到底怎么写吗?

也不知道你的order表里有多少值
dim zl(100)
i=0
set rs=server.createobject("adodb.recordset")
sql="select * from order"
response.write(sql)'输出显示sql语句，将其拷贝到查询分析器里运行一下，看看到底又没有值
’如果有值，下面的值就能输出来，若没有……不用说了吧
rs.open sql,conn,1,1
do while not rs.eof
zl(i)=rs("nm")&rs("pwd")&rs("ads")
response.write(zl(i))'输出显示所有符合条件的值
i=i+1
rs.movenext
loop
rs.close

试试吧