<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% ' Smart Mailer 1.0.5 ' Send on submit of form MoreInfo if Request.ServerVariables("REQUEST_METHOD") = "POST" then Server.ScriptTimeout = 300 Set sm1 = new SmartMailer sm1.checkVersion "1.05" sm1.contentCharset = "us-ascii" Session.CodePage = sm1.getCodepage() sm1.smtpSetup "mail.comcash.com", "25", "cdosys@comcash.com", "ou812" sm1.pickup = "" sm1.component = "cdo" sm1.tmpFolder = "" sm1.embedImages = false sm1.progressBar = "" sm1.ignore_errors = true sm1.useQueue = false sm1.setFrom Request.Form("Contact"), Request.Form("Email") sm1.setTo "Jerry Snyder", "Jerry.Snyder@comcash.com" sm1.setCc "Michael Fitchett", "Michael@In2Visions.com" sm1.setBcc "", "" sm1.Subject = "Liquor Monitor - Form" ' using static for body sm1.setBody_Static_html "Company: " & (Request.Form("Company")) & "" & vbCRLF & "Contact: " & (Request.Form("Contact")) & "" & vbCRLF & "City: " & (Request.Form("City")) & "" & vbCRLF & "State: " & (Request.Form("State")) & "" & vbCRLF & "Phone: " & (Request.Form("Phone")) & "" & vbCRLF & "E-mail: " & (Request.Form("Email")) & "" & vbCRLF & "System: " & (Request.Form("System")) & "" & vbCRLF & "Brand: " & (Request.Form("Brand")) & "" & vbCRLF & "You are a: " & (Request.Form("YouAreA")) & "" & vbCRLF & "Would you like to be a Reseller: " & (Request.Form("Reseller")) & "" ' Attachments none sm1.sendMail "one" Response.Redirect "index.asp?Send=YES&#Thanks" end if SM_mailAction = getMailAction() %> Comcash Liquor Monitor

Demonstration Video