<%@ Page Language="VB" Explicit="False" %> <%@ Import Namespace="PDshop9" %> Administrator <% pd.writeadminjava()%>
Custom Shipping Services
<%=pd.getFormError()%>
<% pd.createadmintab("Custom Rates", "setup-shipping.aspx") pd.createadmintab("USPS", "setup-usps.aspx") pd.createadmintab("UPS", "setup-ups.aspx") pd.createadmintab("InterShipper", "setup-intershipper.aspx") pd.writeadmintabs() %>
Your Services
Name
Rate Method
Applies to (Country)
<% pd.OpenDataReader("SELECT * FROM shipping WHERE (rateaddon='' OR rateaddon IS NULL) ORDER BY name") Do While pd.ReadDataItem.read ratemethod = pd.ReadDataN("ratemethod") rateaddon = pd.ReadData("rateaddon") rateactive = pd.ReadData("active") ratecountry = pd.ReadData("country") If ratecountry = "" Then ratecountry = "ALL" If ratecountry = "-" Then ratecountry = "ALL Others" %>
<% If rateaddon = "" Then%> <%If ratemethod = "1" Then Response.Write("Actual by Weight")%> <%If ratemethod = "2" Then Response.Write("Estimated by Weight")%> <%If ratemethod = "3" Then Response.Write("Determined Later")%> <%If ratemethod = "4" Then Response.Write("Flat Rate")%> <%If ratemethod = "5" Then Response.Write("Order Subtotal")%> <%If ratemethod = "6" Then Response.Write("Order Weight")%> <%If ratemethod = "7" Then Response.Write("# of Items in Order")%> <%If ratemethod = "8" Then Response.Write("Per Item Shipping Charges")%> <% End If%>
<%=ratecountry %>
<% Loop pd.CloseData() %>
Real-Time Rates
To setup or activate real-time shipping rates such as UPS, USPS, FedEx, DHL, etc. 
Click Below:
Test Rates
Use the button below to see how the shipping will be presented to your customers. PLEASE NOTE: if rates do not appear as you expected, please see the Testing & Troubleshooting section of the Help Guide, pages 22-23.