ASP中添加记录为何总有错误
conn.asp<%Dimconnstrconnstr="Provider=Microsoft.Jet.OLEDB.4.0;DataSource="&Server.Map...
conn.asp
<%
Dim connstr
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("db\vod.mdb") '设计数据库驱动和路径
Set cnn=Server.CreateObject("ADODB.Connection") '创建Connection对象
cnn.Open connstr '利用连接对象conn的Open方法打开一个指定的数据库
%>
sendmessage.asp
这是添加留言的，但每次都提示有错误，我的数据库ACCESS的，
<SCRIPT language=javascript>
function save_onclick()
{
var strTemp = document.form.username.value;
if (strTemp.length == 0 )
{
alert("请输入你的称呼！");
document.form.username.focus();
return false;
}
var strTemp = document.form.title.value;
if (strTemp.length == 0 )
{
alert("请输入标题！");
document.form.title.focus();
return false;
}
var strTemp = document.form.Submit.value;
return true;
}
</SCRIPT>
</head>
<!--#include file = "conn.asp"-->
<body>
<%
action=request("action")
if action="Add" then
username=Trim(Request.form("username"))
title=Trim(request.form("title"))
content=Trim(Request.form("content"))
sql="insert into message(username,title,content)values('"& username&"','"& title&"','"&content&"')"
conn.Execute sql
response.Write("<script language='javascript'>alert('留言成功')</script>")
end if
%>
<br>
<br>
<center>
<table width="90%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td style="text-align: left"><span class="p9">发表留言</span> <hr align="center" size="5" color="#FFFFFF"> </td>
</tr>
<tr>
<td>
<form name="form" method="post" action="?action=Add" onSubmit="return save_onclick()">
…………
错误类型是：Microsoft VBScript 运行时错误 (0x800A01A8)
缺少对象: ''
/vod/sendMessage.asp, 第 43 行
第43行是：conn.Execute sql
希望各哦手能够帮忙，谢谢，我的那几个属性值设的都为文本格式的
首先非常感谢你们的回答，不过我刚刚已经把他改成cnn.execute，但还是有错误，错误类型：
Microsoft JET Database Engine (0x80004005)
操作必须使用一个可更新的查询。
/vod/sendMessage.asp, 第 43 行， 展开
<%
Dim connstr
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("db\vod.mdb") '设计数据库驱动和路径
Set cnn=Server.CreateObject("ADODB.Connection") '创建Connection对象
cnn.Open connstr '利用连接对象conn的Open方法打开一个指定的数据库
%>
sendmessage.asp
这是添加留言的，但每次都提示有错误，我的数据库ACCESS的，
<SCRIPT language=javascript>
function save_onclick()
{
var strTemp = document.form.username.value;
if (strTemp.length == 0 )
{
alert("请输入你的称呼！");
document.form.username.focus();
return false;
}
var strTemp = document.form.title.value;
if (strTemp.length == 0 )
{
alert("请输入标题！");
document.form.title.focus();
return false;
}
var strTemp = document.form.Submit.value;
return true;
}
</SCRIPT>
</head>
<!--#include file = "conn.asp"-->
<body>
<%
action=request("action")
if action="Add" then
username=Trim(Request.form("username"))
title=Trim(request.form("title"))
content=Trim(Request.form("content"))
sql="insert into message(username,title,content)values('"& username&"','"& title&"','"&content&"')"
conn.Execute sql
response.Write("<script language='javascript'>alert('留言成功')</script>")
end if
%>
<br>
<br>
<center>
<table width="90%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td style="text-align: left"><span class="p9">发表留言</span> <hr align="center" size="5" color="#FFFFFF"> </td>
</tr>
<tr>
<td>
<form name="form" method="post" action="?action=Add" onSubmit="return save_onclick()">
…………
错误类型是：Microsoft VBScript 运行时错误 (0x800A01A8)
缺少对象: ''
/vod/sendMessage.asp, 第 43 行
第43行是：conn.Execute sql
希望各哦手能够帮忙，谢谢，我的那几个属性值设的都为文本格式的
首先非常感谢你们的回答，不过我刚刚已经把他改成cnn.execute，但还是有错误，错误类型：
Microsoft JET Database Engine (0x80004005)
操作必须使用一个可更新的查询。
/vod/sendMessage.asp, 第 43 行， 展开
3个回答
展开全部
你上面的是cnn，下面又是conn
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
===========================
Dim connstr
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("db\vod.mdb") '设计数据库驱动和路径
Set cnn=Server.CreateObject("ADODB.Connection") '创建Connection对象
cnn.Open connstr '利用连接对象conn的Open方法打开一个指定的数据库
===========================
这里。。
注意最后一局代码。
你申明的是cnn
而后面你却用了conn.Execute
当然缺少对象。。。
改一个吧。。=。=
Dim connstr
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("db\vod.mdb") '设计数据库驱动和路径
Set cnn=Server.CreateObject("ADODB.Connection") '创建Connection对象
cnn.Open connstr '利用连接对象conn的Open方法打开一个指定的数据库
===========================
这里。。
注意最后一局代码。
你申明的是cnn
而后面你却用了conn.Execute
当然缺少对象。。。
改一个吧。。=。=
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
Set cnn=Server.CreateObject("ADODB.Connection") '定义为cnn
conn.Execute sql'你这裏为conn,不一致哟,改为
cnn.Execute sql
conn.Execute sql'你这裏为conn,不一致哟,改为
cnn.Execute sql
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
更多回答（1）
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
