<%
set conn=server.CreateObject("adodb.connection")
conn.open "provider=microsoft.jet.oledb.4.0;data source=E:\ad1.mdb"
set rs =server.CreateObject("adodb.recordset")
sql="select * from A1"
rs.open sql, conn 1,1
do while not rs.eof then
response.write rs.fieldS("ID")&"<BR>"
response.write rs.fieldS("NAME")&"<BR>"
response.write rs.fieldS("AGE")&"<BR>"
RS.MOVENEXT
LOOP
错误提示
HTTP 500
求个位大哥解答

把错误信息都帖出来能导致HTTP 500错误的原因非常的多。

不看别的，首先就看到这个问题do while not rs.eof then
后面的 then删除