% ' Smart Mailer 1.0.5 ' Send on submit of form form1 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 "relay.activehost.com", "", "", "" sm1.pickup = "" sm1.component = "aspmail" sm1.tmpFolder = "" sm1.embedImages = false sm1.progressBar = "" sm1.ignore_errors = true sm1.useQueue = false sm1.setFrom Request.Form("lastname"), Request.Form("Mail") sm1.setTo "Essex Caster & Rubber", "scott@essexcaster.com" sm1.setCc "", "" sm1.setBcc "", "" sm1.Subject = "Form Submission" ' using static for body sm1.setBody_Static_text "" & (Request.Form("lastname")) & "" & vbCRLF & "" & (Request.Form("FirstName")) & "" & vbCRLF & "" & (Request.Form("Company")) & "" & vbCRLF & "" & (Request.Form("city")) & "" & vbCRLF & "" & (Request.Form("state")) & "" & vbCRLF & "" & (Request.Form("zip")) & "" & vbCRLF & "" & (Request.Form("Phone")) & "" & vbCRLF & "" & (Request.Form("Mail")) & "" & vbCRLF & "" & (Request.Form("Comments")) & "" ' Attachments none sm1.sendMail "one" Response.Redirect "contactsubmit.htm" end if SM_mailAction = getMailAction() %>
Please feel free to contact us.
|
||||||||||||||
|
Essex Caster & Rubber Corporation 215 Herbert Street Perth Amboy, NJ 08863 |
Phone 732-442-9300 Fax 732-826-3316 |