ASP复选框写入ACCESS数据库问题

选中复选框提示这样的错误：Provider错误'80020005'类型不匹配。/admin/Bs_products.asp，行46代码如下：
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>添加产品</title>
<script language=javascript>

</script>
<%
if request("act")="add" then
set rs=server.createobject("adodb.recordset")
sql="select * from products"
rs.open sql,conn,1,3
rs.addnew
rs("title")=request("title")
rs("size")=request("size")
rs("jg")=request("jg")
rs("img")=request("img")
rs("bid")=request("bid")
rs("typeid")=request("typeid")
rs("Pre")=request("Pre")
rs("desc")=request("desc")
rs.update
response.write("<SCRIPT language=JavaScript>alert('产品添加成功，点击返回继续添加！');javascript:history.go(Bs_products.asp)</SCRIPT>")
end if
%>
<link href="css.css" rel="stylesheet" type="text/css" />
<style type="text/css">

</style></head>

<body>
<strong>添加产品</strong>
<form name="book" action="Bs_products.asp?act=add" method="post" onSubmit="return CheckForm();">
产品名称：
<label>
<input name="title" type="text" id="title" size="40" />
</label>
<br />
<br />
产品规格：
<label>
<input name="size" type="text" id="size" size="40" />
</label>
<br />
<br />
<label></label>
缩图地址：
<label>
<input name="img" type="text" id="img" size="40" />
</label>
<br />
<br />
产品价格：
<input name="jg" type="text" id="jg" />
<br />
<br />
产品大类：
<input name="bid" type="text" id="bid" size="5" maxlength="2" />
请对照右边大类列表序号填写，如果没有此分类可以为空，或先添加大类<br />
大类列表：
<select name="dalei" size="1" id="dalei">
<%
sql_pd = "Select * From mtype"
Set rs_pd=Server.CreateObject("Adodb.RecordSet")
rs_pd.Open sql_pd,Conn,1,1
%>
<%
Do While Not rs_pd.Eof
%>
<option>大类编号：<%=rs_pd("bid")%> | 大类名称：<%=rs_pd("mtype")%><br></option>
<%
rs_pd.MoveNext
Loop
%>
</select>
<br>
<br>
产品小类：
<input name="typeid" type="text" id="typeid" size="5" maxlength="3" />
请对照下面小类列表序号填写，如果没有此分类可以为空，或先添加小类 <br />
小类列表：
<select name="xiaolei" size="1" id="xiaolei">
<%
sql_px = "Select * From class_type"
Set rs_px=Server.CreateObject("Adodb.RecordSet")
rs_px.Open sql_px,Conn,1,1
%>
<%
Do While Not rs_px.Eof
%>
<option>所属大类编号：<%=rs_px("p_id")%>& 展开

 我来答

6个回答

#热议# 普通体检能查出癌症吗？

绪桂兰苏婉
2020-02-11 · TA获得超过3.7万个赞

知道大有可为答主

回答量：1.4万

采纳率：34%

帮助的人：944万

我也去答题访问个人页

关注

展开全部

<%
'资料库连接代码是否OK
sql="insert
into
FUR(COM)
values('"&request.form("comnews")&"')"
conn.execute(sql)
上述所示,就可以了,只要你勾选了,表单中的值就自动带入数据库中
%>
再看看别人怎么说的。

已赞过 已踩过<

评论收起

频实卯琴
2019-06-14 · TA获得超过3.7万个赞

知道大有可为答主

回答量：1.4万

采纳率：33%

帮助的人：888万

我也去答题访问个人页

关注

展开全部

Com=Request("comnews")
//这里用来接收复选框comnews的值，并存入Com这个变量当中，这样Com的值就变成了SK11001073,SK11000054,SK5545621这种形式了
然后再通过写入数据库
只要接收到了，写入数据库就看你自己的了，呵呵

已赞过 已踩过<

评论收起

大亮毕雀
2019-01-11 · TA获得超过3.7万个赞

知道大有可为答主

回答量：1.4万

采纳率：27%

帮助的人：679万

我也去答题访问个人页

关注

展开全部

直接
comnews=request.Form("comnews")
然后用
SQL语句
把你获取到的
comnews
变量的值写入你的表就可以了
例
conn.execute("inster
into
fur(com)
values('"&comnews&"')")

已赞过 已踩过<

评论收起

茅仁苑戌
2020-04-19 · TA获得超过3.6万个赞

知道大有可为答主

回答量：1.4万

采纳率：28%

帮助的人：991万

我也去答题访问个人页

关注

展开全部

雪碧

可乐

薯片

蛋糕

<%
If
Request.QueryString("Action")
=
"Add"
Then
comnews
=
Request.Form("comnews")
''''这里就直接把comnews这个变量插入数据库相关字段就可以了
End
If
%>

已赞过 已踩过<

评论收起

wuxin8882004
2010-06-26 · TA获得超过313个赞

知道小有建树答主

回答量：1074

采纳率：0%

帮助的人：328万

我也去答题访问个人页

关注

展开全部

呵呵。老兄啊。加油哟。

本回答被提问者采纳

已赞过已踩过<

你对这个回答的评价是？
评论收起

更多回答（4）

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

ASP复选框写入ACCESS数据库问题

为你推荐：