Question

Microsoft VBScript 运行时错误 '800a01a8' 缺少对象: 'conn' \reg.asp, line 64

<!--＃i nclude file="Inc/conn.asp"-->
<%
if request("action")="reg" then
set rs=server.CreateObject("adodb.recordset")
response.write conn.state:response.end
rs.open "select * from user where name='"&trim(request("name"))&"",conn,1,1

Answer 1

请查看一下conn.asp里面定义的连接变量是什么

追问

<%
db="ShyPost.asp" '数据库存放目录
on error resume next
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath(db)
if err then
err.clear
set conn = Nothing
response.write "数据库连接出错，请检查conn.asp中的连接字符串。"
response.end
end if
function CloseDB
Conn.Close
set Conn=Nothing
End Function

追答

建议把on error resume next注释掉，看看是不是建立连接语法或者配置错误