Welcome, Guest ( Customer Panel | Login )




 All Forums
 VPCart Forum
 General help me questions
 Free Ground shipping but allow other methods paid
 New Topic  Reply to Topic
 Printer Friendly
Author Previous Topic Topic Next Topic  

anathanson
Starting Member

31 Posts

Posted - April 11 2008 :  21:07:17  Show Profile  Visit anathanson's Homepage  Reply with Quote
I'm running a free UPS Ground shipping on all orders over $100, however, if the customer wants the option of selecting priority shipping and paying the additional fee, it is currently ignored.

Is there a way to allow other methods to still be charged, even when the order amount exceeds the free shipping threshhold?

I have xshippingfree set to $100.00 in the shipping config screen.

Thanks,

Alex

bobbya
Starting Member

USA
21 Posts

Posted - April 13 2008 :  07:47:48  Show Profile  Reply with Quote
Standard VPASP doesn't do this. If you set xshippingfree all shipping is free and I have no idea why they would do it that way. You will need to modify the shipping routine to check which shipping method is selected and if it meets your dollar amount for free shipping.
Go to Top of Page

anathanson
Starting Member

31 Posts

Posted - April 14 2008 :  10:28:02  Show Profile  Visit anathanson's Homepage  Reply with Quote
That's what I was afraid of. Has anyone already made this code modification to ShopShippingCalc.asp? Or is there an add-on out there? I could probalby figure it out and make the changes, but I'm on deadline and really didn't want to hassle with it (and potentially screw it up).

Thanks,

Alex
Go to Top of Page

Doug Page
VP-CART New User

Canada
85 Posts

Posted - April 15 2008 :  11:53:40  Show Profile  Reply with Quote
You might want to check out:

http://www.hkprog.com/vpasp/shipping.htm

Not only will you give your customer the option of seeing the shipping charges BEFORE checking out, Howard can also configure this software to add any features you want.
Go to Top of Page

anathanson
Starting Member

31 Posts

Posted - May 20 2008 :  20:37:44  Show Profile  Visit anathanson's Homepage  Reply with Quote
Solved the problem. On shopshippingcalc.asp, in the subhandlefreeshipping routine, I added an if statement to check for Ground Shipping as the method before it clears the shipcost. If it isn't Ground, then exit the sub, else continue with resetting the shipping cost to zero. This allows people to pay for priority shipping but gives free ground shipping if the order value is higher than my target.

Since we're only using one ground method, I just put in the text string for comparison. But you could probably put in a dynamic value.

Alex

If productcost>=shipcost then
If ShipMethodType<>"FedEx Ground" then
exit sub
else
setsess "smprice",0
setsess "shipmessage",Getlang("LangFreeShippingMessage")
rc=0
exit sub
end if
end if
Go to Top of Page

savvymedias
VP-CART New User

191 Posts

Posted - February 26 2010 :  17:37:21  Show Profile  Visit savvymedias's Homepage  Reply with Quote
How is this working for you? I need something similar, but this isn't working for me. Perhaps I did something wrong...
Go to Top of Page

hcvllc
Starting Member

USA
3 Posts

Posted - July 02 2010 :  14:23:42  Show Profile  Reply with Quote
This Worked for me. Free Shipping Now works perfectly for US And international.

I have free shipping for over $95 for us Only. very happy now.

Thank YOU!!!

I did the shipping calc like this:

If ShipMethodType<>"DOMESTIC (United States & US Territories)" then
exit sub

Then you must add another End If after:
SetSess "smprice", 0
SetSess "shipmessage", GetLang("LangFreeShippingMessage")
rc = 0
exit sub
End If
End If
End If
Go to Top of Page

hcvllc
Starting Member

USA
3 Posts

Posted - July 02 2010 :  14:24:48  Show Profile  Reply with Quote
Whole Thing Looks like this For VPASP 7.0

Edit line 709-728 or search for one of the lines below in file:
shopshippingcalc.asp

sub HandleFreeShipping (rc)
dim shipcost, productcost
rc = 4
if GetConfig("xshippingfree")<>"" then
shipcost = GetConfig("xshippingfree")
if isnumeric(shipcost) then
shipcost = csng(shipcost)
productcost = GetSess("orderproducttotal")
productcost = csng(productcost)
if productcost>= shipcost then
If ShipMethodType="DOMESTIC (United States & US Territories)" then
SetSess "smprice", 0
SetSess "shipmessage", GetLang("LangFreeShippingMessage")
rc = 0
exit sub
end if
end if
end if
end if

Edited by - hcvllc on July 07 2010 13:48:35
Go to Top of Page

williamj
VP-CART New User

Canada
77 Posts

Posted - October 20 2010 :  13:02:12  Show Profile  Reply with Quote
I'm wondering if anyone can help me? I need to offer free shipping based on zip code. I use only one method of shipping that's the UPS database lookup. The solutions in this thread look to be on the right track but I can't seem to be able to capture the zip code from the order form to write a condition. I will need something like this: If zipcode = 12345 then exit sub
Go to Top of Page
  Previous Topic Topic Next Topic  
 New Topic  Reply to Topic
 Printer Friendly
Jump To:
Snitz Forums 2000
0 Item(s)
$0.00