Question

ASP数据库更新不了,帮忙解决下

sql="select * from shop_orders"
rs.open sql, conn, 3, 3
rs.addnew
rs("order_time")=now()
rs("user_id")=user_id
rs("order_number")=order_number 上面这3个能写进去 下面的写不进去 都是同一个表的同一组数据.
rs.update
rs.close
to_name=Server.HTMLEncode(Request.Form("to_name"))
to_adds=Server.HTMLEncode(Request.Form("to_adds"))
email=Server.HTMLEncode(Request.Form("email"))
tel=Server.HTMLEncode(Request.Form("tel"))
sendtype=Server.HTMLEncode(Request.Form("sendtype"))
postcode=Server.HTMLEncode(Request.Form("postcode"))
paymenttype=Server.HTMLEncode(Request.Form("paymenttype"))
other=Server.HTMLEncode(Request.Form("other"))
if other="" then other="没有留言"
fei=Request.Form("fei")
totalcash=Request.Form("totalcash")
summoney=Server.HTMLEncode(Request.Form("summoney"))
totaljf=Request.Form("totaljf")
fapiao=clng(Request.Form("fapiao"))
sql="select * from shop_orders where order_number='"&order_number&"'"
rs.open sql, conn, 3, 3
rs("to_name")=to_name
rs("tel")=tel
rs("sendtype")=sendtype
rs("postcode")=postcode
rs("email")=email
rs("to_adds")=to_adds
rs("paymenttype")=paymenttype
rs("other")=other
rs("fei")=clng(fei)
rs("summoney")=summoney
rs("totalcash")=clng(totalcash)
rs("jifen")=clng(totaljf)
if wb_num>0 then
rs("hg")=True
rs("hgjifen")=wb_num
end if
rs("fapiao")=fapiao
rs.update
rs.close
这是代码.
也不提示有什么错误 就是写不进数据库 上面两位的方法都采用过了 但是还是写入不进去呀 似乎真是找不到ordernumber 那现在应该怎么改呢 谢谢了 还是不行 写不进去 注释掉后提示 错误类型：
Provider (0x80004005)
未指定的错误

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%Session.CodePage=936%>
<%
dim conn,connstr,time1,time2,mdb
time1=timer
mdb="admin/haoincmdb/#haoincmdb.asp"
on error resume next
Connstr="DRIVER=Microsoft Access Driver (*.mdb);DBQ="+server.mappath(mdb)
Set Conn=Server.CreateObject("ADODB.Connection")
conn.Open connstr
If Err Then
err.Clear
Set Conn = Nothing
Response.Write "数据库连接出错，请检查连接字串。"
Response.End
End If
%>

Answer 1

rs.close已经关闭连接了

楼主设置一个新的rs吧，rs1好了，这样就没有问题了

*****************
不需要addnew了

楼主看看你ordernumber的格式，是否真的能找出来

一般来说，数字的话，不要引号也行

**********************
数字的话，改为

sql="select * from shop_orders where order_number="&order_number

***************
如果是字符串
sql="select * from shop_orders where order_number like '*"&order_number&"*'"

#######################
楼主给出conn看一下

######################
Connstr="DRIVER=Microsoft Access Driver (*.mdb);DBQ="+server.mappath(mdb)

改为
Connstr="DRIVER=Microsoft Access Driver (*.mdb);DBQ="&server.mappath(mdb)

Answer 2

sql="select * from shop_orders where order_number='"&order_number&"'"
rs.open sql, conn, 3, 3
'注意这行，下面加一行
rs.addnew
rs("to_name")=to_name

最后，如果还不行，一定是数据类型不匹配造成，查看是否关闭了详细错误提示。注释掉本文件或包含文件的on error resume next这行。
本人QQ360855229，不得已还不行就加我。

Answer 3

代码前部分能执行成功说明数据库连接没有问题
还有 rs命名也没有问题 rs.addnew 不加也行得通的

并且 前面的rs能update数据到数据库
说明 是下面代码有字段不合法了
可能 是某字段为空 导致的

Answer 4

你数据库连接页面,一般是conn.asp里注释掉
on error resume next
看看报什么错

一般测试阶段让他报错,不然改起来没头绪,等正式上线了再注掉,防止报出数据库信息

Answer 5

楼上说的对，你原来的那样如果没有清除错误的代码的话，应该显示格式不对等等的