<%@ Language=VBScript %> <% '************************************************************************* ' DO NOT MODIFY THIS SCRIPT IF YOU WANT UPDATES TO WORK! ' Function : "Home" Page for Store Front ' Product : CandyPress Store Frontend ' Version : 4.1 ' Modified : May 2007 ' Copyright: Copyright (C) 2004 Webs Unlimited, Inc. ' See "license.txt" for this product for details regarding ' licensing, usage, disclaimers, distribution and general ' copyright requirements. If you don't have a copy of this ' file, you may request one at http://www.candypress.com '************************************************************************* 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("Unable to load store configuration table values") end if 'Get/Set Cart/Order SessionidOrder = sessionCart() 'Get/Set Customer Session idCust = sessionCust() 'Get/Set Affilate ID call getIdAffiliate(validHTML(Request.QueryString("idAff"))) %> <% 'Close Database Connection call closeDB() '********************************************************************** 'Main Shopping Cart Display Area. '********************************************************************** sub cartMain() %> EzAcDc, Simple Systems for Boat Wiring and Marine Electrical

Boat Wiring. Ready to Install.

EzAcDc Boat Wiring Parts Snap Together for Easy Installation 
  EzAcdc has the marine electrical parts for your boat wiring project - including boat wiring harnesses Complete Boat Wiring Harness EzAcdc has the marine electrical switch panels for your boat wiring project - including fully wired marine electrical panels Marine Electrical Switch Panels EzAcdc has the marine electrical parts for your boat wiring project - including panel rewire kits Rewire Your Boat's Original Switches EzAcdc has the marine electrical parts for your boat wiring project - including panel rewire kits Easy Add AC
Shore Power Kits		 EzAcdc has the marine electrical parts for your boat wiring project - including battery switch systems Smart Battery Switch Systems
   
  EzAcdc has the marine electrical parts for your boat wiring project - including Marine Battery Cables Marine Electrical Battery Cables EzAcdc has the marine electrical parts for your boat wiring project - including boat wire and marine wire Boat Wiring and Connectors EzAcdc has the marine electrical parts for your boat wiring project - including battery switch systems Marine Electrical Battery Switches EzAcdc has the marine electrical parts for your boat wiring project - including switches and circuit breakers Switches and Circuit Breakers EzAcdc has the marine electrical parts for your boat wiring project - including Attwood Navigation Lights Pontoon Underdeck Lights
EzAcdc has the marine electrical parts for your boat wiring project - including Attwood Navigation Lights Snap Together Navigation Lights EzAcdc has the marine electrical parts for your boat wiring project - including snap together LED docking lights Snap Together Docking Lights EzAcdc has the marine electrical parts for your boat wiring project - including Attwood bilge pumps Snap Together Bilge Pumps EzAcdc has the marine electrical parts for your boat wiring project - including Attwood livewell pumps Snap Together Livewell Pumps EzAcdc has the marine electrical parts for your boat wiring project - including marine electrical bus bars DC Ground Bus
  EzAcdc has the marine electrical parts for your boat wiring project - including marine's best underwater lights LED Underwater Lights EzAcdc has the marine electrical parts for your boat wiring project - including AFI boat horns Snap Together Boat Horns      

We work hard to make your job easy...

Take the hours and confusion out of your boat wiring project. The boat building professionals at EzAcDc offer marine electrical parts that are engineered to "snap together" quickly and correctly - right out of the box.

It used to be that...

One of the more complicated, mysterious, headache inducing, and potentially dangerous do-it-yourself jobs was an electrical wiring project. And, if that wiring just happened to be on a boat, the mysteries, headaches, expenses and risks became even more daunting.

It used to be that...

Even a seemingly simple boat wiring project often became much more complicated than its "on shore" equivalent for many reasons:

  • The lack of boat wiring diagrams.

  • The regular use of non-standard and non-traceable boat wire colors. Or, worse, the all-too-common practice of wiring an entire boat with only one color of wire.

  • The joy of troubleshooting floating or loose grounds - or, as often happens, the ground for one component being grounded through some other component!

  • The surprising and hazardous voltage drops caused by improperly gauged boat wiring.

  • The fuses or circuit breakers were incorrectly sized or located - leading to continual "nuisance" tripping - or, much worse, to a genuine danger to you, your guests, or your boat.

It used to be that...

The only real alternative to solving these issues yourself was to pay a fortune to your local marina or dealer to solve them for you.

But now...

We work hard to make these jobs easy with our with the EzAcDc QuickConnect Marine Electrical Systems for boat wiring.

Originally developed for high-volume professional boat builders - where quality assurance is never negotiable - our QuickConnect Marine Electrical Systems offer a simple and safe alternative to previously complicated boat wiring jobs And EzAcDc has marine electrical parts for many sized boats - whether you're working on a fishing boat wiring, pontoon boat wiring, sailboat wiring, right up and including small cruiser wiring with the most advanced marine electrical demands.

But now...

All QuickConnect Marine Electrical System components are lab tested and - if certified as meeting or surpassing EzAcDc boat wiring quality and safety standards - are configured to function as a part of your QuickConnect Marine Electrical System Solution. So, when you install these components on your boat, EzAcDc engineering has made certain that your boat wiring job will:

But now...

QuickConnect Marine Electrical Systems, available worldwide exclusively through EzAcDc, are a major advance in DIY boat wiring projects. Please contact us with any questions that you might have about these marine electrical products - or for other components that you would like to see added to our selection of boat wiring products.

For additional boat wiring and marine electrical information, we highly recommend our homophonous pals, Easy Ac/Dc. Or, if you are having trouble finding the parts that you need for your boat wiring project, please check out our sister site for boat wiring and marine electrical products. We offer many similar products at Boat Wiring Store but with less "snap-together" and more savings.

<% end sub '********************************************************************** '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 %>    <% exit sub end if %> <%call prodImage()%> <%call prodDetail()%> <% end sub '********************************************************************** 'Displays Three Featured Products across the width of a row. '********************************************************************** sub tripleProd() %> <%call prodImage()%> <%call prodDetail()%> <% rsTemp.MoveNext if rsTemp.EOF then %>    <% exit sub end if %> <%call prodImage()%> <%call prodDetail()%> <% rsTemp.MoveNext if rsTemp.EOF then %>    <% exit sub end if %> <%call prodImage()%> <%call prodDetail()%> <% end sub '********************************************************************** 'Writes the product detail '********************************************************************** sub prodDetail() %> <%=langProduct(rsTemp("idProduct"),"description",rsTemp("description")) %>

<%=trim(langProduct(rsTemp("idProduct"),"descriptionLong",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, handlingFee listPrice = rsTemp("listPrice") price = rsTemp("price") handlingFee = rsTemp("handlingFee") listPrice = Exchange(listPrice) price = Exchange(price) handlingFee = Exchange(handlingFee) 'Show Extended layout. if homeViewLayout = 1 then if listPrice > Price then %> <%=LangText("GenListPrice","")%>: <%=moneyS(listPrice)%>
<% end if %> <%=LangText("GenOurPrice","")%>: <%=moneyS(Price)%> <% if handlingFee > 0 then %> <%=LangText("GenHandlingFee","")%>: <%=moneyS(handlingFee)%> <% end if if (listPrice - Price) > 0 then %>
<%=LangText("GenYouSave","")%>: <%=moneyS(listPrice-Price)%> (<%=formatNumber((((listPrice-Price)/listPrice)*100),0)%>%) <% end if 'Show Classic layout. else %> <%=LangText("GenOurPrice","")%>: <%=moneyS(Price)%> <% if handlingFee > 0 then %> + %=LangText("GenHandlingFee","")%>: <%=moneyS(handlingFee)%> <% end if end if %>

<% end if 'Show Extended layout. if homeViewLayout = 1 then 'Free Shipping? if UCase(rsTemp("noShipCharge")) = "Y" and len(trim(rsTemp("fileName")&"")) = 0 then %> <%=LangText("GenFreeShipping","")%>
<% end if 'In stock, Out of stock if pShowStockView = -1 then if pHideAddStockLevel = -1 then %> <%=LangText("GenInStock","")%>
<% else if rsTemp("stock") > pHideAddStockLevel then %> <%=LangText("GenInStock","")%>
<% else %> <%=LangText("GenOutStock","")%>
<% 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="<%=server.HTMLEncode(rsTemp("description"))%>">
<% else %>
<%=LangText("GenNoImage","")%>
<% end if %>
"><%=LangText("GenViewMore","")%>
<% end sub %>