% set conn = Server.Createobject("adodb.connection") set rs = server.createobject("adodb.recordset") conn.open connstr if session("orderid") = "" then orderid=0 else orderid = session("orderid") end if if orderid = 0 then session("errmsg")="Your shopping cart is empty" response.redirect "http://www.effective-life-skills.com/shop/form.asp" else rs.open "select * from orders where id = " & orderid, conn if rs.eof then rs.close conn.close session("errmsg")="Order has not been created, can't update, please try again" response.redirect "http://www.effective-life-skills.com/shop/abandon.asp" end if if rs("approved") then rs.close conn.close session("errmsg")="Order has been completed and paid for, can't update" response.redirect "http://www.effective-life-skills.com/shop/abandon.asp" end if end if name=rs("shippingname")&"" address1=rs("shippingaddress1")&"" address2=rs("shippingaddress2")&"" city=rs("shippingcity")&"" state=rs("shippingstate")&"" zip=rs("shippingzip")&"" country=rs("shippingcountry")&"" phone=rs("shippingphone")&"" rs.close conn.close %>
|
|
||
|
HOME > Checkout process |
||
|
Enter shipping information <% if session("errmsg") <> "" then %>Error: <% =session("errmsg")%> <% session("errmsg")="" end if %>
|
|
©2010 Effective-Life-Skills |
|