HOME > ASP > ASP Forum > ช่วยตอบหน่อยเถอะคะ ผู้รู้ทั้งหลาย แก้ไขข้อมูล ในตะกร้าไม่ได้ ยกตัวอย่างนะคะ สินค้า a แก้ไขจำนวนจาก 50 เป็น 100 ปรากฏว่ามันไปเป็น 100 ของ สินค้าอื่น
for j=0 to Ubound(eachNum)
ying = eachid(j)
dim rs6,sql6
set rs6 = Server.createObject("ADODB.Recordset")
sql6="select * from shop s,product p where s.sale_id='"&session("sale_id")&"' and s.id ='"& ying &"' and s.id=p.id "
rs6.Open sql6,conn,1,3
if not rs6.eof then
dim rs5,sql5
set rs5 = Server.createObject("ADODB.Recordset")
sql5="select * from shop where sale_id='"&session("sale_id")&"'"
rs5.Open sql5,conn,1,3
if not rs5.eof then
rs5.Fields("num")= eachNum(j)
rs5.Fields("total_price")= eachNum(j) * trim(rs6("price"))
rs5.Update
rs5.MoveNext
rs6.MoveNext
end if
end if
Next
for j=0 to Ubound(eachNum)
ying = eachid(j)
dim rs6,sql6
set rs6 = Server.createObject("ADODB.Recordset")
sql6="select * from shop s,product p where s.sale_id='"&session("sale_id")&"' and s.id ='"& ying &"' and s.id=p.id "
rs6.Open sql6,conn,1,3
if not rs6.eof then 'อาจจะเจอเพียงเรคอร์ดเดียวหรือหลาย ๆ เรคอร์ดก็ได้ในการ join กันของตาราง shop และ product
dim rs5,sql5
set rs5 = Server.createObject("ADODB.Recordset")
'ตรงส่วนนี้น่าจะใช้คำสั่งในการคิวรี่ผิดนะครับ
'sql5="select * from shop where sale_id='"&session("sale_id")&"'"
'คิดว่าน่าจะเป็นแบบนี้นะ
sql5="select * froom shop where sale_id=' "&session("sale_id")&" ' where id=' "&ying&" ' "
rs5.Open sql5,conn,1,3
if not rs5.eof then
for i=0 to rs5.recordcount 'ให้วนลูปเท่ากับจำนวนเรคอร์ดที่ได้จากการคิวรี่
rs5.Fields("num")= eachNum(j)
rs5.Fields("total_price")= eachNum(j) * trim(rs6("price"))
rs5.Update
rs5.MoveNext
next
end if
rs6.MoveNext
Next
end if
'=======ประมาณนี้แหละมั้ง..โชคดีนะจ๊ะ=======