总是提示操作符错误，第83行（就是conn.execute(sql)这句出错）。。。。

gpedit250715312 2010-08-15 07:42:55
在用ASP做修改页面时，总是提示错误，就是这行（conn.execute(sql)），以下是我的原码，请大家帮我看看是哪里出错了。。


<%@codepage = 936%>

<!--#include file="conn.asp"-->

<!--#include file="../include/function.asp"-->

<!--#include file="fckeditor/fckeditor.asp"-->

<%

	response.charset="GBK"

	if session("admin")="" then

		call sussLoctionHref("非法操作","admin_login.asp")

	end if

	

	dim goodsname,goodscode,goodsweight,goodsnumber,goodsnew,goodshot,goodsfast,goodsunit,goodsprice1,goodsprice2,goodspoint,picdir1,picdir2,goodsinfo,goodscontent

	

	if request.form("send") = "修改" then

			goodsname=request.form("goodsname")

			goodscode=request.form("goodscode")

			goodsweight=request.form("goodsweight")

			goodsnumber=request.form("goodsnumber")

			goodsnew=request.form("goodsnew")

			goodshot=request.form("goodshot")

			goodsfast=request.form("goodsfast")

			goodsunit=request.form("goodsunit")

			goodsprice1=request.form("goodsprice1")

			goodsprice2=request.form("goodsprice2")

			goodspoint=request.form("goodspoint")

			picdir1=request.form("picdir1")

			picdir2=request.form("picdir2")

			goodsinfo=request.form("goodsinfo")

			goodscontent=request.form("goodscontent")

			

				if goodsnew=1 then

					goodsnew=true

				elseif goodsnew=0 then

					goodsnew=false

				end if

				

				if goodshot=1 then

					goodshot=true

				elseif goodshot=0 then

					goodshot=false

				end if

				

				if goodsfast=1 then

					goodsfast=true

				elseif goodsfast=0 then

					goodsfast=false

				end if

				

				if goodsunit="" then

					goodsunit="个"

				end if

				

				if picdir1="" then

					picdir1="images/wusmall.jpg"

				end if

				

				if picdir2="" then

					picdir2="images/wubig.jpg"

				end if

	

				if goodsname="" then

					call errorHistoryBack("请输入商品名称")

				end if

				

				if goodscode="" then

					call errorHistoryBack("请输入商品编号")

				end if

				

				if goodsweight="" then

					call errorHistoryBack("请输入商品重量")

				end if

				

				if goodsnumber="" then

					call errorHistoryBack("请输入商品库存量")

				end if

				

				

				if len(goodspoint) < 1 then

					call errorHistoryBack("请输入积分")

				end if

	

				updatesql="update goods set goods_name='"&goodsname&"' where goods_id="&request.form("id")

				

				conn.execute(updatesql)

				

				call sussLoctionHref("内容修改完成","admin_goods.asp")

	end if

	

		dim showid

		showid=request.querystring("showid")

	

		if showid="" or not isnumeric(showid) then

			call errorHistoryBack("非法操作")

		end if

		

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

		sql="select * from goods where goods_id=" &showid

		rs.open sql,conn,1,1

		

		if rs.eof then

			call close_rs

			call close_conn

			call errorHistoryBack("不存在此数据")

		else

			goodsname=rs("goods_name")

			goodscode=rs("goods_code")

			goodsweight=rs("goods_weight")

			goodsnumber=rs("goods_number")

			goodsnew=rs("goods_new")

			goodshot=rs("goods_hot")

			goodsfast=rs("goods_fast")

			goodsunit=rs("goods_unit")

			goodsprice1=rs("goods_price1")

			goodsprice2=rs("goods_price2")

			goodspoint=rs("goods_point")

			picdir1=rs("goods_pic1")

			picdir2=rs("goods_pic2")

			goodsinfo=rs("goods_info")

			goodscontent=rs("goods_content")

		end if

		

		call close_rs

%>



<!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>

<link rel="stylesheet" type="text/css" href="style/admin.css" />

<script type="text/javascript" src="js/yzsj.js"></script>

</head>

<body>

<div id="addnew">

		<h3 style="text-align:center;color:red;margin:20px;">添加商品</h3>

		<input type="hidden" value="<%=showid%>" name="id" />

		<form method="post" name="addgoods" action="admin_goods_mod.asp">

			<p>商品名称：<input type="text" name="goodsname" class="text" value=<%=goodsname%> /></p>

			<p>商品编号：<input type="text" name="goodscode" class="text" value=<%=goodscode%> /></p>

			<p>商品重量：<input type="text" name="goodsweight" class="text1" value=<%=goodsweight%> /> kg</p>

			<p>商品库存：<input type="text" name="goodsnumber" class="text1" value=<%=goodsnumber%> /></p>

			<p>加入推荐：<input type="checkbox" <%if goodsnew=true then response.write "checked='checked'"%> name="goodsnew" value="1" /> 新品 <input type="checkbox" <%if goodshot=true then response.write "checked='checked'"%> name="goodshot" value="1" /> 热卖 <input type="checkbox" <%if goodsfast=true then response.write "checked='checked'"%> name="goodsfast" value="1" /> 速递</p>

			<p>商品单位：<input type="text" name="goodsunit" class="text1" value=<%=goodsunit%>></p>

			<p>市场价格：<input type="text" name="goodsprice1" class="text1" value=<%=goodsprice1%> /> 元</p>

			<p>本店价格：<input type="text" name="goodsprice2" class="text1" value=<%=goodsprice2%> /> 元</p>

			<p>赠送积分：<input type="text" name="goodspoint" class="text1" value=<%=goodspoint%> /> </p>

			

			<p>上传小图：<input type="text" readonly="readonly" name="picdir1" value=<%=picdir1%> /> <a href="###" onclick="javascript:open('upfile.asp?picdir=<%=picdir%>','upfile','width=400,height=200')">上传</a></p>

			<p>上传大图：<input type="text" readonly="readonly" name="picdir2" value=<%=picdir2%> /> <a href="###" onclick="javascript:open('upfile2.asp?picdir=<%=picdir%>','upfile','width=400,height=200')">上传</a></p>

			<p>商品简介：<textarea name="goodsinfo"><%=goodsinfo%></textarea></p>

			<p>详细内容：</p>

			<p>

			<%

				Dim oFCKeditor

					Set oFCKeditor = New FCKeditor '创建一个编辑器的实例

					oFCKeditor.BasePath = "fckeditor/" '配置编辑器的路径，我站点根目录下的一个目录

					oFCKeditor.ToolbarSet = "Default" '完整和简化.Basic

					oFCKeditor.Width = "100%" '编辑器的长度

					oFCKeditor.Height = "400" '编辑器的高度

					oFCKeditor.Value = goodscontent '这个是给编辑器初始值

					oFCKeditor.Create "goodscontent" '以后编辑器里的内容都是由这个content 取得

			%>

			</p>

			<p style="text-align:center;"><input type="submit" value="修改" onclick="return check();" name="send" /></p>

		</form>

</div>

</body>

</html>
...全文
335 12 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
12 条回复
切换为时间正序
请发表友善的回复…
发表回复
pig510520 2010-08-17
  • 打赏
  • 举报
 回复
以前我貌似也遇到过 楼主还是打印出SQL 看看吧
gorebao 2010-08-17
  • 打赏
  • 举报
 回复
检查sql语句里获取的值是否和字段里的数据类型一致
love441820806 2010-08-17
  • 打赏
  • 举报
 回复
updatesql="update goods set goods_name='"&goodsname&"' where goods_id="&request.form("id")

改为 updatesql="update goods set goods_name='"&goodsname&"' where goods_id="&request.querystring("id") 试试看

deathcn2010 2010-08-16
  • 打赏
  • 举报
 回复
貌似是SQL语句不完整
APM60- 2010-08-16
  • 打赏
  • 举报
 回复
在你的
conn.execute(updatesql)
这句前面加上
response.write("<hr>"&updatesql&"<hr>")
response.end

看看打印出来的sql语句完整不
gpedit250715312 2010-08-16
  • 打赏
  • 举报
 回复
[Quote=引用 3 楼 flshw 的回复:]
确认一下goods_id的字段属性？
[/Quote]
goods_id的字段属性就是自动编号。。。。
gpedit250715312 2010-08-16
  • 打赏
  • 举报
 回复
[Quote=引用 5 楼 number123456 的回复:]
第一，打印SQL语句，
第二，conn.execute(updatesql) 改成 call conn.execute(updatesql) 试试呢
[/Quote]

我打印了SQL语句
response.write(sql)
但好像也没什么重要的信息
number123456 2010-08-16
  • 打赏
  • 举报
 回复
第一，打印SQL语句，
第二，conn.execute(updatesql) 改成 call conn.execute(updatesql) 试试呢
也儿夕坛说 2010-08-16
  • 打赏
  • 举报
 回复
看不懂楼主说的什么
魔音飞鹰 2010-08-15
  • 打赏
  • 举报
 回复
确认一下goods_id的字段属性？
挨踢直男 2010-08-15
  • 打赏
  • 举报
 回复
把sql打印出来看看
gpedit250715312 2010-08-15
  • 打赏
  • 举报
 回复
更新语句：sql="update goods set goods_name='"&goodsname&"' where goods_id=" &request.form("id"),其中我只是先只增加一个变量试试，还有其它的还没加呢，谁知道就出错了。。。。
毕业设计作业-解释数据库中的关系模型和关系代数，以及SQL语言的基本操作.pdf
"关系数据库理论与SQL语言应用" 数据库关系模型是数据库系统中组织和表示数据的概念模型。它使用表格（称为关系）来表示实体和实体之间的关系。每个表格由行（元组）和列（属性）组成。每个属性具有一个名称和一个...
VB-SQL.rar_sql vb_vb sql
标题中的"VB-SQL.rar_sql vb_vb sql"暗示了这个压缩包文件是关于Visual Basic（VB）与SQL（Structured Query Language）交互的资源。描述中提到的"vb sql 连接的连接代码"指出，内容可能涉及如何在VB应用程序中使用...
python数据库编程：Python连接Mssql基础教程之Python库pymssql.pdf
pymssql作为专门针对SQL Server的接口，允许开发者在Python环境中执行SQL语句，进行数据的读写操作。而pyodbc则是一个更通用的数据库连接库，除了SQL Server，还可以用于Oracle、MySQL、Access和Excel等。 **连接...
vb.rar_vb sql
在VB（Visual Basic）编程中，常常需要与SQL（Structured Query Language）数据库进行交互，以实现数据的存储、检索、更新和删除等操作。"vb.rar_vb sql"这个压缩包文件显然包含了关于如何在VB应用程序中使用SQL的...
ASP结合SQL.Server
例如，`cmd.Parameters.AddWithValue("@param1", userInput)`，这里的`@param1`是SQL语句中的占位符。 6. **事务处理**：当一组数据库操作必须全部成功或全部失败时，可以使用事务。例如，`conn.BeginTrans`开始一...
ASP

28,409

社区成员

356,971

社区内容

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages，是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今

加载中

查看更多榜单
社区公告
暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章