Response 对象, ASP 0104 (0x80070057)不允许操作

conn.asp代碼如下
<%
dim connstr,Conn
connstr="provider=microsoft.jet.oledb.4.0;data source=" & server.mappath ("Dat\db.mdb")
'Connstr="DRIVER=Microsoft Access Driver (*.mdb);DBQ="+Server.MapPath("\a\Dat\dat.mdb")
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.Open Connstr
%>

index.asp代碼如下
<!--#include file="conn.asp"-->
                          <%
sql="select top 5 * from [news] order by id desc"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
if not rs.eof then
do while not rs.eof
response.write rs("neirong")
loop
end if
  %>

Response 对象, ASP 0104 (0x80070057)
不允许操作
/index.asp

就會出現這問題..