|
diegomilito
VP-CART Expert
Argentina
779 Posts |
 Posted - December 14 2011 : 20:00:21
|
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):
AddDiscountCoupon
- after strPassword2 = CleanChars(Request.Form("strPassword2")), you ll need to insert new code (approx line 125-130):
strCoupon=CleanChars(request("strcoupon"))
- after ValidatePassword, you ll need to insert new code (approx line 170-175) :
ValidateCustCoupon
- at the very end of file, before %>, you ll need to insert new code :
sub AddDiscountCoupon
strcoupon=GetSess("coupon")
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
else
strcoupon=""
SetSess "coupon",strcoupon
SError=SError & Msg & "<br />"
end if
else
SError=SError & Msg & "<br />"
strCoupon=""
SetSess "coupon",strcoupon
end if
end sub
can u follow my mentioned details code put into your file and tell me how.
Diego. |
 |
|
All Forums
Gift certificate with coupon
New Topic
Printer Friendly
Topic 
TrustGuard - PCI Security Scanner
