ADODB.Recordset (0x800A0E7D) 高手解答一下（本地测试）
技术信息（用于支持人员）[*]错误类型：
ADODB.Recordset (0x800A0E7D)
连接无法用于执行此操作。在此上下文中它可能已被关闭或无效。
/admin/htmledit/ewebeditor.asp, 第 151 行[*]浏览器类型：
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1) ; TheWorld)[*]网页：
GET /admin/htmledit/ewebeditor.asp' 初始化输入参数
Sub InitPara()
' 取全屏标志
sFullScreen = Trim(Request.QueryString("fullscreen"))
' 取对应的内容ID
sContentID = Trim(Request.QueryString("id"))
If sContentID = "" Then ShowErr "请传入调用参数ID，即隐藏的内容表单项ID！"
' 取样式初始值
sStyleName = Trim(Request.QueryString("style"))
If sStyleName = "" Then sStyleName = "standard"
sSql = "select * from ewebeditor_style where s_name='" & sStyleName & "'"
oRs.Open sSql, oConn, 0, 1（这是151行）
If Not oRs.Eof Then
sStyleID = oRs("S_ID")
sStyleName = oRs("S_Name")
sStyleDir = oRs("S_Dir")
sStyleCSS = oRs("S_CSS")
sStyleUploadDir = oRs("S_UploadDir")
nStateFlag = oRs("S_StateFlag")
sDetectFromWord = oRs("S_DetectFromWord")
sInitMode = oRs("S_InitMode")
sBaseUrl = oRs("S_BaseUrl")
sStyleUploadDir = Replace(sStyleUploadDir, "\", "/")
If Right(sStyleUploadDir, 1) <> "/" Then
sStyleUploadDir = sStyleUploadDir & "/"
End If
Else
ShowErr "无效的样式Style参数传入，如果要使用默认值，请留空！"
End If
oRs.Close 应该是很简单的问题，是你
oRs.Open sSql, oConn, 0, 1（这是151行）
中 的 oConn可能提前关闭了
就是在这句以上有地方用了oConn.Close()或者 Set oConn = Nothing 2# zeroone
虽然我不会 但帮你顶下 是什么程序？看你提供的是编辑器的问题简单的方法就是下一个你相应程序的编辑器 0x800A0E7D说明你的Connection已经Close了或者是无效的，你把你的OpenConn方法改一下看看报什么错 首先：错误的是这行objRS.open strSQL,Conn,adOpenKeyset,adLockOptimistic, adCmdText因为上面一行跟错误提示无关。
其次：根据你的错误报告，只能推测可能是你的配置文件连接代码有问题，请仔细查看配置的这个文件的连接语句。如果解决不了，介意把配置文件给贴出来看看。 InitPara()
在调用这个过程的前面，你的数据库连接代码被关了，并不是错在115行，要在调用的地方找！ 151 参数错误 151 参数错误 嘿嘿 151 参数错误 嘿嘿
页:
[1]