[ÇóÖú]¶©µ¥Éú³ÉÎÊÌâ

Å®×°Åú·¢3

ÔÚ×ö¶©µ¥Éú³ÉʱÓöµ½ÏÂÁÐÎÊÌâ:ÔËÐж©µ¥³ÌÐò,Éú³ÉÒ»¶©µ¥ºÅ,Èç11,ÔÙ´ÎÔËÐÐ,ÒÀ¾ÉÊǴ˶©µ¥ºÅ.ÄÉÃÆ!!........²é¿´Êý¾Ý¿âÖеĶ©µ¥±íorderlist,·¢ÏÖ¶©µ¥ºÅform_id²¢²»Ö»ÊÇ11;²é¿´ÉÌÆ·Áбíshoplist±í,·¢ÏÖÆäÖеÄform_idÈ«ÊÇ11.ÏÂÃæÊÇ´úÂë,¸÷λÐֵܽãÃðïæ¿´Ï°É, <%Id=Session("admin") set Rs = Server.CreateObject("ADODB.recordset") sql="select * from yonghuxinxi where admin='"&Id&"'" rs.open sql,conn,1,1 ProductList = Session("ProductList") flags="ÉÐδ´¦Àí" If Len(ProductList) = 0 Then Response.Redirect "nothing.asp" end if
'±£´æ¹ºÂòÈËÐÅÏ¢ set rs=server.createobject("adodb.recordset") sqltext="select * from orderlist" rs.open sqltext,conn,3,3,1
'Ìí¼ÓÒ»¸öÓû§µ½Êý¾Ý¿â rs.addnew rs("userid")=request.form("admin") rs("tName")=request.form("tName") rs("Zip")=request.form("Zip") rs("tel")=request.form("tel") rs("E-mail")=request.form("E-mail") rs("Address")=request.form("Address") rs("Pay")=request.form("Pay") rs("Flag")=flags rs("Remark")=request.form("Remark") If rs("Remark")="" then rs("Remark")="ÎÞ" End If rs.update rs.close sql="select Form_Id from OrderList order by regtime desc" rs.open sql,conn,3,3,1 c=rs(0) rs.close
products=split(request("spbh"),",") for i=0 to UBound(Products) next set rs=server.createobject("adodb.recordset") session("productlist")=productlist sql = "Select * From Product" sql = sql & " Where Product_Id In (" & ProductList & ")" sql = sql & " Order By Product_No" Set rs = conn.Execute( sql )
if session(rs("Product_Id"))=0 then session(rs("Product_Id"))=1 end if
while not rs.eof set rs2=server.createobject("adodb.recordset") sqltext2="select * from shoplist" rs2.open sqltext2,conn,3,3,1 rs2.addnew rs2("Id")=rs("Product_Id") rs2("Form_Id")=c rs2("Product_Name")=rs("Product_Name") rs2("Number")=cint(session(rs("Product_Id"))) rs2("Product_nPrice")=ccur(rs("Product_nPrice")) rs2.update%>
<% rs2.close rs.movenext wend session.abandon 'response.redirect"success.asp" rs.close conn.close %>

δÀ´µÄ»ØÒä

¶©µ¥±íÀïµÄ¶©µ¥ºÅÔËÐÐÊǺõÄÄØ,ÎÊÌâÊÇÉÌÆ·±íÀïµÄ¶©µ¥ºÅ×ÜÊÇÖ¸ÏòÉÏÒ»Ìõ¼Ç¼,²»±ä.Ó¦¸ÃÔÚset rs2=server.createobject("adodb.recordset")
sqltext2="select * from shoplist"
rs2.open sqltext2,conn,3,3,1
rs2.addnew
rs2("Id")=rs("Product_Id")
rs2("Form_Id")=c
rs2("Product_Name")=rs("Product_Name")
rs2("Number")=cint(session(rs("Product_Id")))
rs2("Product_nPrice")=ccur(rs("Product_nPrice"))
rs2.update%&gt;ÉÏÃæ¼Óµãʲô,ʹÉÌÆ·±íÀïµÄ¶©µ¥ºÅForm_IdÓ붩µ¥±íÀïµÄ¶©µ¥ºÅcͬ²½ÄØ?

¹Â¶ÀÓëÒ¹²øÃà

ÎÒ¸øÄãÒ»¸ö˼·£¬
ÏÈÅжÏÓÐûÓмǼ£¬
Èç¹ûûÓÐÔòÉèÒ»³õʼֵ£¬Èç´Ó1000¿ªÊ¼
·ñÔòÈ¡³öÀ´£¬ÈÃËü¼Ó1
set rs=server.createobject("adodb.recordset")
sql="select id from ¶©µ¥ order by id desc "
rs.open sql,conn
if rs.eof then
form_id=1000
else
form_id=rs("form_id")+1
end if


rs.addnew
rs("form_id")=form_id
....
....
rs.update
rs.close
set rs=nothing
ÕâÑù¾Í»áÉú³É×Ô¶¯ÀۼӵĶ©µ¥±àºÅ