<% Session("CFFirstName") = Request.Form("FirstName") Session("CFsurname") = Request.Form("surname") Session("CFPractice_Name") = Request.Form("Practice_Name") Session("CFPersonal_Email") = Request.Form("Personal_Email") Session("CFMobile_Phone") = Request.Form("Mobile_Phone") Session("strMsg") = "" 'Google: g-recaptcha-response Dim recaptcha_secret, sendstring, objXML ' Secret key recaptcha_secret = "6LdDqikTAAAAAAaX84-UgxdBIG74Pk6J0PR8RTWn" sendstring = "https://www.google.com/recaptcha/api/siteverify?secret=" & recaptcha_secret & "&response=" & Request.Form("g-recaptcha-response") Set objXML = Server.CreateObject("MSXML2.ServerXMLHTTP") objXML.Open "GET", sendstring, False objXML.Send if Len(request.form)>0 Then if instr(objXML.responseText,"false") > 0 then Session("strMsg") = "Unfortunately your email was not sent this time.
Please check the image verification field and try again.
" valid_form = false Elseif (Request.Form("FirstName") = "" _ or Request.Form("surname") = "" _ or Request.Form("Practice_Name") = "" _ or Request.Form("Personal_Email") = "" _ or Request.Form("Mobile_Phone") = "" ) then If Request.Form("FirstName") = "" Then strMsg = strMsg & "
The First Name field is compulsory." End If If Request.Form("surname") = "" Then strMsg = strMsg & "
The Surname field is compulsory." End If If Request.Form("Practice_Name") = "" Then strMsg = strMsg & "
The Practice Name field is compulsory." End If If Request.Form("Personal_Email") = "" Then strMsg = strMsg & "
The Personal Contact Email field is compulsory." End If If Request.Form("Mobile_Phone") = "" Then strMsg = strMsg & "
The Business Hours Phone field is compulsory." End If Session("strMsg") = " Please check the require fields and re-enter image verification. " & strMsg & "" valid_form = false Else valid_form = true End If if valid_form then Set objMailer = Server.CreateObject("JMail.SMTPMail") objMailer.Sender = Application("AdminEmail") objMailer.ContentType = "text/plain" objMailer.ContentTransferEncoding = "8bit" objMailer.ReplyTo = Request.Form("Personal_Email") objMailer.Subject = "Live Demo Request" objMailer.Body = "The following Adviser is requesting a phone demonstration of the AMM Platform:" & vbCrLf _ & vbCrLf & "First Name: " & Request.Form("FirstName") & vbCrLf _ & vbCrLf & "Surname: " & Request.Form("surname") & vbCrLf _ & vbCrLf & "Practice Name: " & Request.Form("Practice_Name") & vbCrLf _ & vbCrLf & "Personal Contact Email: " & Request.Form("Personal_Email") & vbCrLf _ & vbCrLf & "Business Hours Phone: " & Request.Form("Mobile_Phone") objMailer.AddRecipient ("jinglis@moneymarket.com.au") objMailer.Execute objMailer.ClearRecipients Set objMailer = Nothing Session("CFFirstName") = "" Session("CFsurname") = "" Session("CFPractice_Name") = "" Session("CFPersonal_Email") = "" Session("CFMobile_Phone") = "" Session("strMsg") = "" Session("strMsg") = "Thank you for contacting AMM. One of our term deposit brokers will be in touch with you shortly." %> <% Session("strMsg") = "" FullName = Request.Form("FirstName") Dim cn 'DB Connection and Counter Intigration Set cn = Server.CreateObject("ADODB.Connection") %><% Set objCommand = Server.CreateObject("ADODB.Command") With objCommand .ActiveConnection = cn .CommandText = "uspAMMInsertRequestCounter" .CommandType = 4 .CommandTimeout = 240 .Parameters.Append .CreateParameter("@colRequestName", 200, 1, -1, FullName) .Parameters.Append .CreateParameter("@colRequestEmail", 200, 1, -1, Request.Form("Personal_Email")) .Parameters.Append .CreateParameter("@colRequestType", 200, 1, -1, "Book a Demo") .Execute End With 'End Request Counter intigration end if End If %>

Book a Live Link Demonstration

<% If Session("strMsg") <> "" Then %>
0 Then %>success<% Else %>notification formErrorPlain<% End If %>" style="text-align: left;"> <%=Session("strMsg")%> <% Session("strMsg") = "" %>
<% End If %>

Discover how easy our platform is to use and the features that will save you time and increase efficiency - schedule a demonstration over the phone using a live link to our website.

Provide your details below and we will be in touch to organise a convenient time.

Your Details