asp问题求助

hi虫

本地asp运行正常，放到服务器就不能读取数据库数据了
注：两个都能读到前边的时间，但是网络的读不到数据库，不知道什么问题

测试网址http://yyytest./a.asp
账号yyytest
密码testyyy

asp代码：
<%=now() %>
<%
'连接数据库
set db=server.CreateObject("adodb.connection")
db.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="+server.MapPath("db1.mdb")+";"
dim rs
set rs=db.execute("select * from ip")
do while not rs.eof
response.Write "["+cstr(rs("id"))+"/"+cstr(rs("txt"))+"]"
rs.movenext
loop
%>
ASP.rar (116.79 KB, 下载次数: 7)

2013-5-26 09:29 上传

点击文件名下载附件


补充内容 (2013-5-26 12:51):
网址发错了，不好意思
http://yyytest./a.asp

ftp服务器：yyytest.

补充内容 (2013-5-26 12:53):
好像不是发错的问题，是论坛自动删了部分网址。。。请大家手动删-号下
y-y-y-t-e-s-t-.-s-v-f-r-e-e-.-n-e-t

scqandcy

<%=now() %>

<%
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="&Server.MapPath("db1.mdb")
%>

<%
Set rs=Server.CreateObject("ADODB.Recordset")
rs.open "select * from ip order by id desc",conn,1,1

do while not rs.eof
response.Write "["+cstr(rs("id"))+"/"+cstr(rs("txt"))+"]"
rs.movenext
loop


rs.close        
set rs=nothing
%>

abc16

"db1.mdb"改为"/db1.mdb"

乱花飞絮

应该是db1.mdb的问题，如果你不想改asp源码，改了access也可以，只要能连接上就行

乱花飞絮

a.asp文件最后的数据库没有关闭，加上
rs.close
db.close
set rs=nothing
set db=nothing

还有貌似dim rs 应该刚到代码最前，或者你干脆不要定义了，可省了

hi虫

abc16 发表于 2013-5-26 10:04
"db1.mdb"改为"/db1.mdb"

不好意思，修改了还是没用

hi虫

乱花飞絮 发表于 2013-5-26 10:52
a.asp文件最后的数据库没有关闭，加上
rs.close
db.close

不好意思，修改了还是没用啊。。。

scqandcy

Ok  解决咯 收精币了。。。