VP-ASP :: Shopping Cart Software

Shopping Cart Software Solutions for anywhere in the World

US/Canada(Toll Free): +1 888 587 2278
Europe/UK: +44 (020) 7193 9408
Australia/New Zealand: +61 3 9016 4497

VP-Cart StoreFront Customer Forum

Home | Profile | Register | Active Topics | Members | Search | FAQ
Save Password
Forgot your Password?

 All Forums
 VPCart Forum
 General help me questions
 Gift certificate with coupon
 New Topic  Reply to Topic
 Printer Friendly
Author Previous Topic Topic Next Topic  

VP-ASP New User

82 Posts

Posted - December 14 2011 :  14:07:00  Show Profile  Visit bwalz's Homepage  Reply with Quote
It seems you cannot enter a coupon code when ordering a gift certificate. Is there a way to have to have the coupon field in checkout when ordering gift certificates?

VP-ASP Expert

742 Posts

Posted - December 14 2011 :  20:00:21  Show Profile  Reply with Quote
some modif needed, to enable coupon for the gift cert.

i will explain the steps of modif needed in step-by-step :

- edit shopgift2.asp

- after <!-- #include file="shopcustomerform.asp" -->
you ll need to insert new code :
<!-- #include file="shopcoupon.asp" -->

- after ShopCustomerForm, you ll need to insert new code (approx line 90-95):

- after strPassword2 = CleanChars(Request.Form("strPassword2")), you ll need to insert new code (approx line 125-130):

- after ValidatePassword, you ll need to insert new code (approx line 170-175) :

- at the very end of file, before %>, you ll need to insert new code :

sub AddDiscountCoupon
if GetConfig("xAllowCoupons")<>"Yes" then exit sub

'6.50 - hide coupon option if creating registry
if GetSess(REGISTRANTID)<>"" then exit sub
ShopWriteHeaderBox GetLang("langCustCouponPrompt")
CreateFieldSetRow GetLang("langCouponDiscount"),"strCoupon",strCoupon,"",""
ShopWriteFooterBox "yes"
end sub

sub ValidateCustCoupon
dim msg, rc
if strcoupon="" then exit sub
LocateCoupon strcoupon, rc, msg
if msg="" then
CouponValidateSpecial strcoupon,msg
if msg="" then
SetSess "coupon",strcoupon
SetSess "coupon",strcoupon
SError=SError & Msg & "<br />"
end if
SError=SError & Msg & "<br />"
SetSess "coupon",strcoupon
end if
end sub

can u follow my mentioned details code put into your file and tell me how.

Go to Top of Page
  Previous Topic Topic Next Topic  
 New Topic  Reply to Topic
 Printer Friendly
Jump To:
Snitz Forums 2000