<% function WA_Universal_Email_1_SendMail(RecipientEmail) dim MailObject, MailAttachments, MailBCC, MailCC, MailTo, MailBodyFormat, MailBody, MailImportance, MailFrom, MailSubject MailAttachments = "" MailBCC = "" MailCC = "" MailTo = "" MailBodyFormat = "" MailBody = "" MailImportance = "" MailFrom = "" & cStr(cStr(Request.Form("Name"))) & "|WA|" & cStr(cStr(Request.Form("Email"))) & "" MailSubject = "Message from ASI Security Web Site" 'Global Variables gAddBCC = "" gAddCC = "" gAddRecipient = "" gBodyFormat = "" gSetImportance = "" set WA_MailObject = WAUE_Definition() if (RecipientEmail <> "") then set WA_MailObject = WAUE_AddRecipient(WA_MailObject,RecipientEmail) MailTo = gAddRecipient gAddRecipient = "" else 'To Entries end if 'Attachment Entries 'BCC Entries MailBCC = gAddBCC 'CC Entries MailCC = gAddCC 'Character Set 'Body Format set WA_MailObject = WAUE_BodyFormat(WA_MailObject,0) MailBodyFormat = gBodyFormat 'Set Importance set WA_MailObject = WAUE_SetImportance(WA_MailObject,"3") MailImportance = gSetImportance 'Start Mail Body MailBody = MailBody & "Message from: " MailBody = MailBody & cStr(Request.Form("Name")) MailBody = MailBody & "
" & vbCrlf & "" MailBody = MailBody & cStr(Request.Form("Email")) MailBody = MailBody & "
" & vbCrlf & "" MailBody = MailBody & "
" & vbCrlf & "" MailBody = MailBody & cStr(Request.Form("Message")) MailBody = MailBody & "" 'End Mail Body set WA_MailObject = WAUE_SendMail(WA_MailObject,MailAttachments,MailBCC,MailCC,MailTo,MailImportance,MailFrom,MailSubject,MailBody) set WA_MailObject = nothing end function %> <% if ((Request.ServerVariables("Request_Method") = "POST")) then 'WA Universal Email object="CDONTS NewMail" 'Send Loop Once Per Entry WA_Universal_Email_1_SendMail("asi@asisecurity.com") WA_Universal_Email_1_SendMail("jberg@asisecurity.com") 'Send Mail All Entries if ("thanks.asp"<>"") then Response.Redirect("thanks.asp") end if end if %> Contact ASI Security
 

Thank You...

 

The team at ASI Security looks forward to hearing from you! Please let us know how we can assist you in meeting your security needs.

We Moved...

Our address now is


4415 W. Harrison Street, Suite 429
Hillside, IL 60162-1910

Our phone numbers will remain the same.

 

Contact ASI Security

Thank you for your interest in contacting ASI Security.

Please Note our Address has changed!

ASI Security
4415 W. Harrison Street
Suite 429
Hillside, IL 60162-1910

  Telephone: 630.978.1900
Fax: 630.978.0077

Or by completing the contact form below.

Your Name:
Email Address:
Message: