<% If Request.Querystring("send")=1 then SendEnquiry End If %>

COSIGNIA, We welcome enquiries regarding any aspect of our work – you can contact us at the following address, or use the on-line enquiry form below

Your feedback or questions

At Cosignia we welcome your feedback or questions. Please complete the form below and we'll contact you:








Contact Us

Postal
PO Box 74 377, Greenlane
Auckland 1546

Physical
Level 5, 27 Gillies Ave
New Market
Auckland 1023

LOGIN



 

We welcome enquiries regarding any aspect of our work – you can contact us at the following address, or use the on-line enquiry form.

PO Box 74 344, Greenlane
Auckland 1546

Level 5, 27 Gillies Ave
Newmarket
Auckland 1023

<% '#################################################################### Sub SendEnquiry Dim Mail,EmailBody Set Mail = Server.CreateObject("Persits.MailSender") EmailBody = EmailBody & "Contact Details
Title: "& request.form("element_1") &"
Name: "& request.form("element_4") &"
Email: "& request.form("element_2") &"
Phone: "& request.form("element_3") &"
Address: "& request.form("element_5") &"
Feedback/Enquiry:
"& request.form("element_6") &"" Mail.IsHtml = true Mail.Host = "mta.net24.net.nz" Mail.From = request.form("element_2") Mail.FromName = request.form("element_4") Mail.Subject = "Website Contact Enquiry" Mail.AddAddress "CFurness@cosignia.co.nz" Mail.ContentTransferEncoding = "Quoted-Printable" Mail.Body = EmailBody Mail.Send If Err <> 0 Then Response.Write "
Error encountered: " & Err.Description End If Set Mail=nothing End Sub %>