% '///// REPLICATED WEBSITE CODE ////////////////////////////////////// dim ReferringDealerID as integer dim ReferrerName as string dim ReferrerGreeting as string dim ReferrerEmail as string dim ReferrerPhone as string dim ReferrerAddr1 as string dim ReferrerAddr2 as string dim ReferrerAddrCity as string dim ReferrerAddrState as string dim ReferrerAddrCountry as string dim ReferrerAddrZip as string dim ReferrerFax as string dim ReferrerCellPhone as string dim IsReplicated as boolean if (not isnothing(session("ReferringDealerID")) andalso clng(session("ReferringDealerID")) > 0) then IsReplicated = true ReferringDealerID = clng(Session("ReferringDealerID")) ReferrerName = Session("ReferrerName").tostring ReferrerGreeting = Session("ReferrerGreeting").tostring ReferrerEmail = Session("ReferrerEmail").tostring ReferrerPhone = Session("ReferrerPhone").tostring ReferrerAddr1 = Session("ReferrerAddr1").tostring ReferrerAddr2 = Session("ReferrerAddr2").tostring ReferrerAddrCity = Session("ReferrerAddrCity").tostring ReferrerAddrState = Session("ReferrerAddrState").tostring ReferrerAddrCountry = Session("ReferrerAddrCountry").tostring ReferrerAddrZip = Session("ReferrerAddrZip").tostring ReferrerFax = Session("ReferrerFax").tostring ReferrerCellPhone = Session("ReferrerCellPhone").tostring else IsReplicated = false end if '///// END REPLICATED WEBSITE CODE ///////////////////////////////// ' Set up catalog ID and Product IDs dim CatalogueID as integer dim Product1ID as integer dim Product2ID as integer dim Product3ID as integer CatalogueID = 190 ' Customer Catalog Product1ID = 17788 'P-DTM Product2ID = 17789 'P-RTA Product3ID = 17796 'P-BOTH '' Sample call to add to cart page ''href="https://www.worldventures.biz/MemberToolsDotNet/ShoppingCart/AddToCart.aspx?ReferringDealerID=<%=ReferringDealerID%>