Contact us 7 day service
<%
If (Trim(Request.Form("name")) <> "" And Trim(Request.Form("email")) > "" ) Then
Dim objMail
Set objMail = Server.CreateObject ("CDONTS.NewMail")
objMail.From = strEmail
objMail.To = "contact@mediafx.com.au"
objMail.Subject = "contact form from MediaFX " & strName
objMail.Body = "Dear Jeff contact from MediaFX please contact " & strEmail & " the name of " & strName & " Comments " & strQuery
objMail.Send
Response.Write "
Dear " & strName & "
Thank you for your Interest
" & vbCrLf & _
"your query is on its way by email to us
we will respond at the earliest opportunity |
"
Set objMail = Nothing
Else
%>
<%
end if
%>
