I don't know why this code is wrong:
strMessage = "Nueva fotograf?a"
' Create email object and set all the values, setting the from address to be the person who filled in the form
Set Mailer = Server.CreateObject("SMTPsvg.Mailer")
Mailer.FromName = "Alfonso"
Mailer.FromAddress=...