%
' Comersus Shopping Cart
' Comersus Open Technologies
' United States
' Software License can be found at License.txt
' http://www.comersus.com
' Details: off line payment form
%>
<%
on error resume next
dim connTemp, rsTemp
' get settings
pStoreFrontDemoMode = getSettingKey("pStoreFrontDemoMode")
pCurrencySign = getSettingKey("pCurrencySign")
pDecimalSign = getSettingKey("pDecimalSign")
pCompany = getSettingKey("pCompany")
pCompanyLogo = getSettingKey("pCompanyLogo")
pCompanySlogan = getSettingKey("pCompanySlogan")
pHeaderKeywords = getSettingKey("pHeaderKeywords")
pAuctions = getSettingKey("pAuctions")
pListBestSellers = getSettingKey("pListBestSellers")
pNewsLetter = getSettingKey("pNewsLetter")
pPriceList = getSettingKey("pPriceList")
pStoreNews = getSettingKey("pStoreNews")
pOffLineCardsAccepted = getSettingKey("pOffLineCardsAccepted")
pIdOrder = getUserInput(request("idOrder"),20)
pName = getUserInput(request("name"),50) &" " &getUserInput(request("lastName"),50)
pAddress = getUserInput(request("address"),100) &" " &getUserInput(request("ciy"),100)
%>
<%=getMsg(500,"CC payment")%>
<%if pStoreFrontDemoMode="-1" then%>
<%=getMsg(501,"Comp with")%>
<%=getMsg(502,"gateways list")%>
<%=getMsg(503,"SSL")%>
<%end if%>