Here is something else. For all that are using the UPS shipping module from VPASP here is a way to have free shiping to the USA but standard lookup for all other countries. NOTE: this only works with the shipping form and xshippingsetfields=Yes
in upsrealtime.asp starting at line 63
Old Code
sAction=request("action")
if saction="" then
sAction=request("action.x")
end if
Session("CurrentURL")="upsrealtime.asp"
Session("FollowonURL")="shopcreateorder.asp" ' force login to come back to us
Session("smprice")="" ' no price
Session("ShipMethod")="" ' no type
if Saction<>"" then
SetupShippingValues ' Got answer from customer
' continue to shopcreateorder is in above subroutine
end if
ShopPageHeader
GetShippingPrices 'Logic to get Shipping Prices
DisplayForm ' ask customer what he wants to do
ShopPageTrailer
New Code
sAction=request("action")
if saction="" then
sAction=request("action.x")
end if
Session("CurrentURL")="upsrealtime.asp"
Session("FollowonURL")="shopcreateorder.asp" ' force login to come back to us
Session("smprice")="" ' no price
Session("ShipMethod")="" ' no type
if Saction<>"" then
SetupShippingValues ' Got answer from customer
' continue to shopcreateorder is in above subroutine
end if
usascountry=getsess("Shipcountry")
if usascountry="US" then
response.redirect "shopcreateorder.asp"
else
ShopPageHeader
GetShippingPrices 'Logic to get Shipping Prices
DisplayForm ' ask customer what he wants to do
ShopPageTrailer
end if
There ya go, free shipping to the USA. Not sure if my coding is 100% correct but it works well for me. Im sure something similar can be done in the Fedex and USPS modules as well.
Kamin