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

就會出現這問題..

一看就是死循环~~

do while not rs.eof
response.write rs("neirong")
loop
||
||
for i =1 to rs.recordcount
response.write rs("neirong")
rs.movenext
if rs.eof then exit for
next

do while not rs.eof
response.write rs("neirong")
rs.movenext
loop
这样就好

謝謝啊..
能運行了...
但是打開頁面不能顯示文字出來...

已經解決 ..
原來是我大頭蝦...
把背景弄成黑色

而文字也是黑的.所以不能正常顯示..抱歉啊...麻煩大家了..
不過還要多謝你們啊...
我會好好學習的...