<%Option Explicit%> <% Dim szAction szAction = Request.Form("hAction") if szAction = "MAIL" then Dim title Dim clientname Dim friendName Dim contactNumber Dim contactPhone Dim email Dim timeToTalk Dim message Dim clientContact title = Request.form("title") contactNumber = Request.form("cellphoneCode") & " " & Request.form("cellNumber") contactPhone = Request.form("phoneCode") & " " & Request.form("phoneNumber") clientname = request.form("yName") friendName = request.form("friendName") email = request.form("emailAddress") timeToTalk = request.form("talkTime") clientContact = request.form("yContactNumber") if timeToTalk = "1" then timeToTalk = "Office Hours" else timeToTalk = "After Hours" end if message = ( "I am very interested in your products and services and " & vbCrLf & "would like you to contact my friend, " & title & " " & friendName & " on " & vbCrLf & "Phone: " & contactNumber & " OR " & contactPhone & vbCrLf & "or via Email: " & email & vbCrLf & "in order for them to access your expertise. I prefer you contact them " & timeToTalk & vbCrLf & "Best Regards " & vbCrLf & clientName & " " & clientContact) Dim objJMail Set objJMail = Server.CreateObject("JMail.SMTPMail") objJMail.ServerAddress = "localhost:25" objJMail.AddRecipient "save@abfinfinance.co.za" objJMail.Sender = email objJMail.SenderName = clientname objJMail.AddRecipientCC email objJMail.Subject = "ABFIN Finance -- Client Contact Request" objJMail.Body = message objJMail.Priority = 1 objJMail.Execute Set objJMail = Nothing szAction = "SENT" end if %> ABFIN FINANCE -- Refer A Friend
newsletter | frequently asked questions | news | contact us | site map | refer a friend | quick search


BREAKING NEWS



Donald Trump (The Apprentice-Your'e Fired) ... best Real Estate
advice I ever received...


<%if not szAction = "SENT" then%>

 

REFER A FRIEND

 

Your Details

 
Your Name
Contact Number
   

Friend's Details

 
Title
Name
Telephone Number
Cellphone Number
Email Address
Suitable Time To Talk
 

   
 
<%elseif szAction = "SENT" then Response.Redirect "referConf.asp?name=" & clientname & "&friend=" & friendName end if%>

What could be easier than this to get your FREE GIFT VOUCHERS Now!!

    * Happy with our Service?
    * Happy with the products and services on our website?
    * Happy with our ABFIN Freebies?
    * Let your friends and family enjoy the great ABFIN experience PLUS benefits?

Then BINGO!!

Just email us the names and details of up to 5 family members and friends and ...

YOU could earn a FREE Woolworths, Clicks or Game gift voucher to the value of R 300 for each successful application

                                                 OR


we could donate R300 to your favorite charity or school

So Don't Delay just Email us today!

(Terms & Conditions apply)
NB Payout of gift vouchers is subject to the referral resulting in a successful application
being finalised.