| Diversified Realty & Investment Co. |
| Address: |
295 Piccadilly Rd,
Winston-Salem, NC 27104. |
| Phone: |
336-768-6680 |
| Fax: |
336-768-6680 |
| Email: |
lfolds@diversifiedco.com |
|
<%
If Not Request.Form("frm_email") = "" Then
Set objMail = CreateObject("CDONTS.Newmail")
objMail.From = "DiversifiedCo.com <" & trim(request.Form("email")) & ">"
objMail.To = Request.Form("sendto")
objMail.Subject = "Web Message - From:" & request.Form("frm_name")
objMail.Body = "From:" & request.Form("frm_name") & "
E-mail:" & request.Form("frm_email") & "
Message:" & request.Form("frm_comments")
objMail.Send
Response.Write "Thank you! Your message has been sent!
"
Set objMail = Nothing
Else
%>
<%=ErrorMessage%>
<%
End If
%>
|
