asp中sql怎么更新两张表
<%
if session("user_id")="" then
response.redirect "error.asp?error=006"
response.end
end if
user_id=session("user_id")
set rs=server.createobject("adodb.recordset")
sql="select * from basket where user_id='"&user_id&"' and basket_check=0"
rs.open sql,conn,3,3
if rs.eof then
response.write "你没有订购任何商品"
response.end
else
on error resume next
order_number=user_id&now()
order_number=replace(order_number,"-","")
order_number=replace(order_number," ","")
order_number=replace(order_number,":","")
do while not rs.eof
rs("basket_check")=1
rs("order_number")=order_number
id=rs("id")
sql1="select * from product where id="&int(id)
set rs1=server.createobject("adodb.recordset")
rs1.open sql1,conn,3,3
rs1("buys")=rs1("buys")+rs("basket_count")
rs1.update
rs1.close
set rs1=nothing
rs.movenext
loop
rs.update
end if
rs.close
set rs=server.createobject("adodb.recordset")
sql="select * from orders"
rs.open sql,conn,3,3
rs.addnew
rs("order_time")=now()
rs("user_id")=user_id
rs("order_number")=order_number
rs("summoney")=request("totalcash")
rs.update
rs.close
%>
<%
to_name=request("to_name")
to_adds=request("to_adds")
email=request("email")
tel=request("tel")
sendtype=request("sendtype")
postcode=request("postcode")
paymenttype=request("paymenttype")
other=request("other")
set rs=server.createobject("adodb.recordset")
sql="select * from 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
summoney=rs("summoney")
rs("other")=other
rs.update
rs.close
%>
--------------------------------------------------------------------------------------------------
我把access数据库转换成sql数据库
其中下面的代码没有被执行是怎么回是啊,
set rs=server.createobject("adodb.recordset")
sql="select * from orders"
rs.open sql,conn,3,3
rs.addnew
rs("order_time")=now()
rs("user_id")=user_id
rs("order_number")=order_number
rs("summoney")=request("totalcash")
rs.update
rs.close