<% ' Comersus Shopping Cart ' Comersus Open Technologies ' United States ' Software License can be found at License.txt ' http://www.comersus.com ' Details: view item details for donation products %> <% on error resume next dim connTemp, rsTemp, mySql, pIdProduct, pDescription, pPrice, pDetails, pListPrice, pImageUrl, pWeight, pIdProduct2 ' get settings pStoreFrontDemoMode = getSettingKey("pStoreFrontDemoMode") pCurrencySign = getSettingKey("pCurrencySign") pDecimalSign = getSettingKey("pDecimalSign") pCompany = getSettingKey("pCompany") pCompanySlogan = getSettingKey("pCompanySlogan") pHeaderKeywords = getSettingKey("pHeaderKeywords") pMoneyDontRound = getSettingKey("pMoneyDontRound") pCurrencyConversion = lCase(getSettingKey("pCurrencyConversion")) pShowBtoBPrice = getSettingKey("pShowBtoBPrice") pShowStockView = getSettingKey("pShowStockView") pProductReviews = getSettingKey("pProductReviews") pUnderStockBehavior = lCase(getSettingKey("pUnderStockBehavior")) pEmailToFriend = getSettingKey("pEmailToFriend") pWishList = getSettingKey("pWishList") pRelatedProducts = getSettingKey("pRelatedProducts") pGetRelatedProductsLimit= getSettingKey("pGetRelatedProductsLimit") pAffiliatesStoreFront = getSettingKey("pAffiliatesStoreFront") pRealTimeShipping = lCase(getSettingKey("pRealTimeShipping")) pCompareWithAmazon = getSettingKey("pCompareWithAmazon") pAuctions = getSettingKey("pAuctions") pListBestSellers = getSettingKey("pListBestSellers") pNewsLetter = getSettingKey("pNewsLetter") pPriceList = getSettingKey("pPriceList") pStoreNews = getSettingKey("pStoreNews") pExitSurvey = getSettingKey("pExitSurvey") pTemplateStore = getSettingKey("pTemplateStore") pDonationStringId = getSettingKey("pDonationStringId") pAdSenseClient = getSettingKey("pAdSenseClient") ' session pIdCustomer = getSessionVariable("idCustomer",0) pIdCustomerType = getSessionVariable("idCustomerType",1) pIdProduct = getUserInput(request.queryString("idProduct"),10) pIdAffiliate = getUserInput(request.querystring("idAffiliate"),4) ' set affiliate if isNumeric(pIdAffiliate)then session("idAffiliate")= pIdAffiliate end if if trim(pIdProduct)="" or IsNumeric(pIdProduct)=false then response.redirect "comersus_message.asp?message="&Server.Urlencode(getMsg(17,"Invalid")) end if ' if is not a donation, redirect to regular viewItem if not isDonation(pIdProduct) then response.redirect "comersus_viewItem.asp?idProduct="&pIdProduct end if ' gets item details from db mySQL="SELECT description, details, sku, searchKeywords, imageUrl FROM products WHERE idProduct=" &pIdProduct& " AND active=-1 AND idStore=" &pIdStore call getFromDatabase (mySql, rsTemp, "ViewItem") if rsTemp.eof then response.redirect "comersus_message.asp?message="&Server.Urlencode(getMsg(580,"Cannot get product details. Please contact us to request more information about item "&pIdProduct)) end if pDescription = rsTemp("description") pDetails = rsTemp("details") pStock = getStock(pIdProduct) pSku = rsTemp("sku") pSearchKeywords = rsTemp("searchKeywords") pImageUrl = rsTemp("imageUrl") ' for meta tags pTitle = pDescription %>
<%if pAdSenseClient<>"0" then%> <%end if%>

<%if pImageUrl<>"" then%> <%else%> <%end if%>

<%=pSku& " " &pDescription%>

<%=pDetails%>

<%if pEmailToFriend="-1" then%> "><%=getMsg(30,"Email 2 friend")%> <%end if%>

<%=pCurrencySign%>  " name=add>

<%call closeDb()%>