asp的VBScript我往access数据库插入数据，能插入进去，但是网页上面有报错提示

输入的数据是完全的存到了数据库中的，不知道这里是为什么会报这个原因，大神赐教！代码在下面：<%@LANGUAGE="VBSCRIPT"CODEPAGE="65001"%>... 输入的数据是完全的存到了数据库中的，不知道这里是为什么会报这个原因，大神赐教！

代码在下面：

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>

<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>开发文档载入数据库</title>
<style type="text/css">

</style></head>

<body>
<div align="center" class="STYLE1">
<p>添加数据集<span class="STYLE2">[开发文档]</span></p>
<p>到数据库包含各种数据</p>
<form id="form1" name="form1" method="post" action="">
<label>标题：
<input name="title" type="text" id="textarea" width="400" height="25"/>
</label>
<% response.Write("<br>") %>
<% response.Write("<br>") %>
<label>内容：
<input name="data" cols="55" rows="15" id="textarea2" width="500" height="500">
</label>
<% response.Write("<br>") %>
<% response.Write("<br>") %>
<label>
<input type="submit" name="button" id="button" value="提交" />
</label>
</form>

<%
'通过这个方法可以将从服务输入的值取到
'哈哈我太开心了终于的学会了这个的取值

a = request.Form("title")
b = request.Form("data")
response.Write(b)
if (a ="") Or (b="" )then
response.Write("输入不能空位")
else
set rs=server.CreateObject("adodb.recordset")
sql = "insert into api (title,content) values('"&a&"','"&b&"')"
conn.Execute(sql)
response.Write("存储成功")
Rs.close
conn.close
end if
%>

</div>
</body>
</html> 展开





 我来答

1个回答

#热议# 在购买新能源车时，要注意哪些？

网海1书生

科技发烧友

2014-04-30 · 擅长软件设计、WEB应用开发、小程序

网海1书生

采纳数：12311 获赞数：26228

向TA提问私信TA

关注

展开全部

a = request.Form("title")
b = request.Form("data")
response.Write(b)
if (a =""仔羡) Or (b="念好拍" )then
response.Write("输入不能空位")
else
set rs=server.CreateObject("adodb.recordset")
sql = "insert into api (title,content) values('"&a&"','"&b&"')"
conn.Execute(sql)
response.Write("存储成功")
Rs.close
conn.close
end if

改为

a = request.Form("title")
b = request.Form("data")
response.Write(b)
if a ="" Or b="" then
response.Write("输入不能空位")
else
sql = "insert into api (title,content) values('"&a&"','"&b&"')"

conn.Execute(sql)
response.Write("存储成功")
conn.close

end if

也就是把涉及rs的两行删掉即可，袜数因为你这里根本就没用到rs，没用到也就罢了，关键是你还要让rs.close，没打开的东西你怎么能让它关闭呢？肯定错啦。就像一个人没偷东西你硬让他交出偷的东西来一样。

追问

谢谢你的回答，的确按照你说的去掉那两行就不会报错了。谢谢你、
但是，请教下大哥，
set rs=server.CreateObject("adodb.recordset")
这个rs和上面的Rs是我大小写忘记写成一致了，这个rs在set rs不是有用到吗？这不是有定义一个这样的对象吗？

追答

set rs=server.CreateObject("adodb.recordset")

这个只是定义一个记录集对象rs，并不是使用，只有rs.open .... 这样子的才是使用！open的意思就是打开，close则是关闭，只有已经open的东西才能close！
另外，你这里是写入数据，并不是读出数据，无需用到rs，所以删掉即可。

补充一下：asp对大小写是不敏感的，所以rs与Rs没区别

本回答由提问者推荐

已赞过 已踩过<

评论收起

推荐律师服务：若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询

asp的VBScript我往access数据库插入数据，能插入进去，但是网页上面有报错提示

其他类似问题

为你推荐：