ADODB.Connection 错误 '800a0e78' 对象关闭时,不允许操作。 这个要如何解决呢?
本人小菜鸟一只,公司想做个联系方式的提交页面,又没有外包,只能自己手动,结果出现
ADODB.Connection 错误 '800a0e78'
对象关闭时,不允许操作。
/add.asp,行 49
不知如何解决,请教论坛各位大神,这个错误要如何改更代码呢?
asp页面的代码如下:
<%
Response.Buffer = True
'定义数据库类别,1为SQL数据库,0为Access数据库
Const IsSqlDataBase = 0
'缓存名称,如果一个站点有多个缓存请更改成不同名称
Const Forum_CacheName = "contact"
'定义运行模式,测试的时候设置1,正常运行的时候设置为0,不输出错误信息有利于安全,
Const IsDeBug = 1
dim cont
dim connstr
dim db
db="../contact02/contact.mdb"
Set cont = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
'如果你的服务器采用较老版本Access驱动,请用下面连接方法
'connstr="driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath(db)
cont.Open connstr
%>
<%
Set cont = Server.CreateObject("ADODB.Connection")
sql="Select * form per_con_way"
cont.Open sql,conn,1,3
cont.Addnew
cont("per_name")=Server.htmlencode(Request("cname"))
cont("per_con")=Server.htmlencode(Request("contact"))
cont("per_remark")=Server.htmlencode(Request("note"))
cont("time")=date()
cont.Update
cont.Close
Set cont=Nothing
%>
49行的代码是 cont.Addnew
不知道应该如何解决呢?代码应该怎么样修改