<%@ Language=VBScript %> <% '************************************************************************* ' DO NOT MODIFY THIS SCRIPT IF YOU WANT UPDATES TO WORK! ' Function : These functions and subroutines are used by the scripts ' Product : CyberMerchant eCommerce Storefront ' Version : 2.2 ' Modified : November 2002 ' Copyright: Copyright (C) 2002 CyberMerchant '************************************************************************* '''#Option explicit Response.Buffer = true %> <% 'Database dim mySQL dim conntemp dim rstemp dim rstemp2 'Session dim idOrder dim idCust '************************************************************************* 'Open Database Connection call openDB() 'Store Configuration if loadConfig() = false then call errorDB(langErrConfig,"") end if 'Get/Set Cart/Order Session idOrder = sessionCart() 'Get/Set Customer Session idCust = sessionCust() '=============================================== CategoryTitle = "Shipping Policy: Direct Home & Office Delivery" DescriptionLong = "Shipping is done in the most cost efficient way with an eye towards beating competitor prices while delivering your products promptly and conveniently. Many products feature free shipping as well." CategoryKeywords = "shipping, delivery, free shipping" htagcat = "Factory Direct Shipping to Home or Business" '=============================================== %>

Shipping Policy • We view SHIPPING charges as an essential component in our VALUE PROPOSITION: 1. Add up the prices of our products + the cost of our shipping. 2. The total is less than other bar stool and chair dealers on the web! (Even those with so called "free" shipping). 3. We do provide Free Shipping on a few select products. • We offer our wonderful bar stools, bar tables & chairs at the GUARANTEED lowest possible price - then keep the shipping charges at lowest possible rates. This is our formula that guarantees you the BEST $$$ VALUE. • Shipping is arranged via UPS Ground, FedEx Ground or truck direct from the factory to customers in the contiguous United States. Shipping times vary from 3-7 days. • We use an algorithm to calculate shipping and give you the best package price. Rarely (about 10% of the time - and usually because a common carrier - truck service - is required) our automatically generated shipping calculation may be too low. We would immediately contact you for approval before your order or credit card were processed. • If you must have a delivery by Next Day or 2nd Day Air, we can arrange for that at your expense. • We have shipped to Alaska and Hawaii - and will be happy to provide a shipping quote for this service. • We are not able to deliver to PO and APO/FPO boxes, or outside the 50 United States, excepting rural "PO" addresses. • If you wish to export our products, or forward them to Puerto Rico or the U.S. Virgin Islands, we can provide a quote FOB your intended delivery port. • Indicate any special delivery instructions in your "Additional Comments" when placing your order - or contact us directly. • Each order may only have one "Shipping Address.” If you require multiple shipping addresses, please order separately for each address. Lead Time – Processing, Manufacture & Assembly • Processing takes 12-48 hours depending on the manufacturer • Manufacture and assembly times will vary: - Quick Ship orders are ready to ship in 1-10 days after processing. Contact us to pin down a precise date when your order would leave the factory. - Custom orders are ready to ship in 2-8 weeks after processing. - Special Custom orders may require 2-4 months, most notably, wood seating imported from European factories. - Accelerated Custom orders – contact us & we might be able to speed things up for you! Orders Damaged in Shipping Shipments are rarely lost – and specialized packing minimizes the likelihood of damage in transit. To assure this has not happened, as you receive a shipment from our manufacturing partners: 1. Inspect for visible outside package damage prior to accepting, and document any damage on the delivery ticket before the shipper leaves. If you are suspect of the appearance of the boxes, but do not have time to inspect each of them before the driver leaves, write on the delivery receipt "Boxes are subject to inspection at time of delivery. Customer will notify carrier of pending damage within 24hrs." This gives you time to look over the product, yet allows the carrier to know that possible damage may have occured before you took possession of it. 2. Verify the number of packages delivered with the packing slip you receive from Bar Stools & Barstools. 3. Unpack your order and check for damage. 4. Should any damage be discovered, keep the shipping carton and any inner packaging, ask the shipper to inspect it immediately, and put that request in writing – this has to be requested within 24 hours of delivery. 5. Contact our Customer Service immediately. Have your order number, shipping information and tracking number ready. Do not return any item to the manufacturer without a prior written authorization. Unauthorized returns cannot be processed. See also our Returns Policy.

<% '******************************************************************** %> <% call closeDB() '********************************************************************** 'Displayed when there are no Featured Products. '********************************************************************** sub noProd() %> <% end sub '********************************************************************** 'Displays ONE Featured Product across the width of a row. '********************************************************************** sub singleProd() %> <%call prodImage()%> <%call prodDetail()%> <% end sub '********************************************************************** 'Displays TWO Featured Products across the width of a row. '********************************************************************** sub doubleProd() %> <%call prodImage()%> <%call prodDetail()%> <% rsTemp.MoveNext if rsTemp.EOF then Response.Write "  " exit sub end if %> <%call prodImage()%> <%call prodDetail()%> <% end sub '********************************************************************** 'Writes the product detail '********************************************************************** sub prodDetail() %> <%=rsTemp("description")%>

<%=trim(rsTemp("descriptionLong"))%>

<% 'Show pricing if required for this product if not(pHidePricingZero=-1 and rsTemp("Price")=0) then 'Assign pricing info to local variables for easier use. dim listPrice, price listPrice = rsTemp("listPrice") price = rsTemp("price") 'Show Extended layout. if listViewLayout = 1 then if listPrice > Price then Response.Write "" & langGenListPrice & ": " & pCurrencySign & moneyS((listPrice)) & "
" end if Response.Write "" & langGenOurPrice & ": " & pCurrencySign & moneyS(Price) & "" if (listPrice - Price) > 0 then Response.Write "
" & langGenYouSave & ": " & pCurrencySign & moneyS((listPrice-Price)) & " (" & formatNumber((((listPrice-Price)/listPrice)*100),0) & "%)" end if 'Show Classic layout. else Response.Write "" & langGenOurPrice & ": " & pCurrencySign & moneyS(Price) & "" end if Response.Write "

" end if 'Show Extended layout. if listViewLayout = 1 then 'Free Shipping? if UCase(rsTemp("noShipCharge")) = "Y" and len(trim(rsTemp("fileName")&"")) = 0 then Response.Write "" & langGenFreeShipping & "
" end if 'In stock, Out of stock if pShowStockView = -1 then if pHideAddStockLevel = -1 then Response.Write "" & langGenInStock & "
" else if rsTemp("stock") > pHideAddStockLevel then Response.Write "" & langGenInStock & "
" else Response.Write "" & langGenOutStock & "
" end if end if end if end if end sub '********************************************************************** 'Writes the code to display the product image and a link '********************************************************************** sub prodImage() if len(trim(rsTemp("smallImageUrl")&"")) <> 0 then %> ">" border=0 alt="<%=rsTemp("description")%>">
<% else %>
<%=langGenNoImage%>
<% end if %>
">
<% end sub %>