<% call ConnectDB() recal = request("recal") if recal="Y" then total_quantity = request("quantity").count for i=1 to total_quantity id_product_upd = request("hid_id_product")(i) quantity = request("quantity")(i) if quantity="" then quantity = 1 end if sql = "UPDATE cart SET quantity = "&quantity&" WHERE id_product ="& id_product_upd &" AND id_cart="&Session.SessionID Execsql(sql) next total_del = request("del").count for i=1 to total_del id_product_upd = request("del")(i) sql = "DELETE * FROM cart WHERE id_product ="& id_product_upd &" AND id_cart="&Session.SessionID Execsql(sql) next end if %>
 
 
 
 
<% sql ="SELECT cart.quantity ,product.* FROM cart,product WHERE cart.id_product = product.id_product AND id_cart="&Session.SessionID Set rs = ExecRS(sql,1,1) b_have = false if Not rs.EOF then b_have = true %> <% end if Call CloseRS(rs) %> <% if b_have = false then %> <%end if%>
*Program/Product
<% Do While Not rs.EOF id_product =rs("id_product") name_product = rs("name_product_eng") price_special = rs("price_special_eng") quantity = rs("quantity") sub_total = cdbl(price_special)*cint(quantity) total = total +sub_total %> <% rs.movenext Loop %>
Product Quantity Price/Unit Price(USD)
<%=name_product%> <%=quantity%> <%=formatnumber(price_special,0)%> <%=formatnumber(sub_total,0)%>
Total <%=formatnumber(total,0)%>
 
   
*First Name :

*Last Name

 :
*Address
 :
*Country :

*Zip Code

 :

*From City

 :
To Bangkok
*Departing Date :
Month    Year     
*Person(S)
 :
*Amount
   USD
From E-mail