Contact Alfred E. Shirtman
Whatever you have to say...questions, comments, complaints, or praise...we want to hear it!
Send Us An E-Mail
<% [at] Language="VBSCRIPT" %> <% If Request.ServerVariables("REQUEST_METHOD") = "POST" Then '* '* Send Email '* Dim strBOD strBOD = "First Name: " & Request.Form("First Name") & vbCrLf _ & "Last Name: " & Request.Form("Last Name") & vbCrLf & vbCrLf _ & "Email: " & Request.Form("Email") & vbCrLf & vbCrLf _ & "Phone Number: " & Request.Form("Phone Number") & vbCrLf & vbCrLf _ & Request.Form("Comments") Dim objCFG Set objCFG = Server.CreateObject("CDO.Configuration") objCFG.Fields.Item(aCDO & "sendusing") = 2 objCFG.Fields.Item(aCDO & "smtpserver") = "relay-hosting.secureserver.net" objCFG.Fields.Item(aCDO & "smtpserverport") = 25 objCFG.Fields.Update Dim objCDO Set objCDO = Server.CreateObject("CDO.Message") objCDO.Configuration = objCFG objCDO.From = Request.Form("email") objCDO.To = "info@alfredeshirtman.com" objCDO.Subject = "Contact Form" objCDO.TextBody = strBOD objCDO.Send Set objCDO = Nothing Set objCFG = Nothing End If %>
Our Contact Information
- Phone Numbers:
- Customer Service: 123 456 7891
- Illinois Sales: 123 456 7891
- Iowa Sales: 123 456 7891
- Nebraska/Colorado Sales: 123 456 7891
