<%@ Language=VBScript %>
<%
if request("Contact_Name") <> "" then
Set pdmail=server.createobject("Persits.MailSender")
pdmail.Host="mail.superiorpoolsnc.com"
pdmail.From="contact@superiorpoolsnc.com"
pdmail.Username = "contact@superiorpoolsnc.com"
pdmail.Password = "password1"
pdmail.AddAddress "support@wbshost.com"
pdmail.FromName=request("Contact_Name")
pdmail.Subject="Superior Pools Contact"
pdmail.Body=vbCrLf &"Name : " & request("Contact_Name") & vbCrLf & "Email Address : " & request("Contact_Email") & vbCrLf & "Comments : " & request("Contact_Comments") & vbCrLf & "Phone : " & request("Contact_Phone") & vbCrLf & "Subject : " & request("Contact_Subject")
On Error Resume Next
pdmail.Send
If Err <> 0 Then
Response.Write "An error occurred: " & Err.Description
End If
set pdmail=nothing
end if
%>
Superior Pools Charlotte. Charlotte area pools and spas. Charlotte pools,
pools Charlotte, fiberglass pools Charlotte, fiberglass pools, concrete pools,
spas, gunite pools, custom pools, inground pools, above ground pools,
resdiential pools, commercial po
Site by
Web Building Solutions LLC | Website Hosting by WBSHost
pools charlotte :
fiberglass pools
charlotte :
gunite pools charlotte
: inground
pools charlotte :
commercial pools charlotte
: residential
pools charlotte :
charlotte spas
: custom pools
charlotte:
pools charlotte