<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% 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 = "Contact from ZerionGroup.Com" 'Global Variables gBodyFormat = "" set WA_MailObject = WAUE_Definition("mail.yourfulcrum.com","25","info@yourfulcrum.com","W3bm@iL") if (RecipientEmail <> "") then set WA_MailObject = WAUE_AddRecipient(WA_MailObject,RecipientEmail) else 'To Entries end if 'Attachment Entries 'BCC Entries 'CC Entries 'Character Set 'Body Format set WA_MailObject = WAUE_BodyFormat(WA_MailObject,1) MailBodyFormat = gBodyFormat 'Set Importance set WA_MailObject = WAUE_SetImportance(WA_MailObject,"1") 'Start Mail Body MailBody = MailBody & "" MailBody = MailBody & cStr(Request.Form("refer")) MailBody = MailBody & "
" & vbCrlf & "" MailBody = MailBody & cStr(Request.Form("reason")) MailBody = MailBody & "
" & vbCrlf & "" MailBody = MailBody & cStr(Request.Form("name")) MailBody = MailBody & "
" & vbCrlf & "" MailBody = MailBody & cStr(Request.Form("title")) MailBody = MailBody & "
" & vbCrlf & "" MailBody = MailBody & cStr(Request.Form("coName")) MailBody = MailBody & "
" & vbCrlf & "" MailBody = MailBody & cStr(Request.Form("busType")) MailBody = MailBody & "
" & vbCrlf & "" MailBody = MailBody & cStr(Request.Form("email")) MailBody = MailBody & "
" & vbCrlf & "" MailBody = MailBody & cStr(Request.Form("phone")) MailBody = MailBody & "
" & vbCrlf & "" MailBody = MailBody & cStr(Request.Form("addInfo")) MailBody = MailBody & "
" & vbCrlf & "" '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 ((cStr(cStr(Request.Form("Submit"))) <> "")) then 'WA Universal Email object="AspEmail" 'Send Loop Once Per Entry WA_Universal_Email_1_SendMail("chris@yourfulcrum.com") 'Send Mail All Entries if ("thankYou.html"<>"") then Response.Redirect("thankYou.html") end if end if %> Contact Zerion Group ... Software consulatnats specializing in wholesale distribution, business operations and software conversions.
Zerion Group provides software consulting for the wholesale distribution industryFind out about Zerion Group, our industries, our team and our historyZerion's services include implementation, business consulting, migration, training and supportZerion has experience with with a variety of software packages to help your businessBecome a part of Zerion's partner networkRead current company and industry newsContact Zerion for more information on software implementation, migration and business consulting
Contact Us | Employment | Ask An Expert
Expansion For Wholesalers

Ferguson, Noland, WinWholesale grow Read the full story ...

Activant Eclipse Success Story

SG Supply grew its business by 18% Read the full story ...

Distributor Growth

Many distributors posted double-digit growth in ‘07 Read the full story ...

You have something to say. We're here to listen.


Are you a customer with feedback? We want to hear from you. Are you interested in a career with Zerion? We want to hear from you. Do you have questions about our services? We want to hear from you.

Mailing:

    3564 Avalon Park Blvd. East
    Suite 1 #263
    Orlando, FL 32828

Physical:

    1 Purlieu Place
    Winter Park, Fl 32792

Phone:

    407.401.9857
    Toll Free: 800.258.0811
    Fax: 407-264-8710

E-mail:

    To contact a specific member of our team via e-mail, the format is first name dot last name at zeriongroup.com.