%
Response.Status="301 Moved Permanently"
Response.AddHeader "Location","http://www.ilovemyghd.com/"
%>
<%= titlePrefix %><%= titleSep %>Contact us
<%
If Trim(Request.Form("txtName")) <> "" And Trim(Request.Form("txtEmail")) <> "" And Trim(Request.Form("txtSubject")) <> "" And Trim(Request.Form("txtMessage")) <> "" Then
Dim oCdo
Set oCdo = Server.CreateObject("CDO.Message")
oCdo.To = contactTo
If contactCcEnabled Then oCdo.Cc = contactCc
oCdo.Subject = Request.Form("txtSubject")
oCdo.From = Request.Form("txtName") & "<" & Request.Form("txtEmail") & ">"
oCdo.TextBody = Request.Form("txtMessage")
''oCdo.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
''oCdo.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "localhost"
''oCdo.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
''oCdo.Configuration.Fields.Update
oCdo.Send
Set oCdo = Nothing
%>
Thank you for contacting us
One of our advisers will reply to you shortly.
<% Else %>
Contact us
Please use the form below to contact us for any queries you may have.
Alternatively, you can email us at info@ilovemyghd.com
<% End If %>