% ' change to address of your own SMTP server strHost = "mail.spainandspanish.com" Email= "mail@marxmontdesigns.com" If Request("Send") <> "" Then Set Mail = Server.CreateObject("Persits.MailSender") ' enter valid SMTP host Mail.Host = strHost Mail.From = Request("From") ' From address Mail.FromName = Request("FromName") ' optional Mail.AddAddress Request("To") ' message subject Mail.Subject = Request("Subject") ' message body Mail.Body = Request("Body") strErr = "" bSuccess = False On Error Resume Next ' catch errors Mail.Send ' send message If Err <> 0 Then ' error occurred strErr = Err.Description else bSuccess = True End If End If %>
|
USEFUL LINKS |
|||||||||||||||||||||||
CONTACT SPAINandSPANISH.com |
|||||||||||||||||||||||
|
|||||||||||||||||||||||
|
CREDITS - I wrote most of the contents of this website, but I read, translated and copied some information from websites like: http://www.casareal.es
|
|||||||||||||||||||||||
![]() |
|||||||||||||||||||||||
|
|
|||||||||||||||||||||||
All Rights Reserved. Copyright © 2006 - www.SpainAndSpanish.com - Website created by MarxmontDesigns™