asp连接不上sqlserver数据库,访问一直超时.急急急!
如题asp的网站连不上数据库所以打不开页面上也没有错误信息新手一个被折磨了一上午没辙了!!求帮助!!!在线等!!...
如题 asp的网站连不上数据库所以打不开 页面上也没有错误信息 新手一个 被折磨了一上午 没辙了 !!求帮助!!!在线等!!
展开
2个回答
展开全部
给你一个标准代码:
<%
db=Server.MapPath("数据库相对路径")
set conn=Server.CreateObject("ADODB.connection")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & db
set rs=server.createobject("adodb.recordset")
sql="select * from [表单] order by ID DESC"
rs.open sql,conn,1,1
if err.number <> 0 then
response.write "数据库操作失败:"&err.description
response.end
end if
if RS.eof and RS.bof then
response.write "没有记录!"
response.end
end if
Do While Not rs.EOF
字段1=rs("字段1")
字段2=rs("字段2")
rs.MoveNext
loop
rs.close
set rs=Nothing
Conn.close
set Conn=Nothing
%>
<%
db=Server.MapPath("数据库相对路径")
set conn=Server.CreateObject("ADODB.connection")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & db
set rs=server.createobject("adodb.recordset")
sql="select * from [表单] order by ID DESC"
rs.open sql,conn,1,1
if err.number <> 0 then
response.write "数据库操作失败:"&err.description
response.end
end if
if RS.eof and RS.bof then
response.write "没有记录!"
response.end
end if
Do While Not rs.EOF
字段1=rs("字段1")
字段2=rs("字段2")
rs.MoveNext
loop
rs.close
set rs=Nothing
Conn.close
set Conn=Nothing
%>
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询