Nome:
Email:
Assunto:
Mensagem:
<% if request.ServerVariables("REQUEST_METHOD")="POST" then nome = request.form("nome") email=request.form("email") assunto=request.form("assunto") msg = request.form("msg") sNameTo = "Cristiano" sEmailTo="web1@adiweb.com.br" set mailer = server.createobject("SMTPsvg.Mailer") Mailer.FromName = nome Mailer.FromAddress = email Mailer.RemoteHost = "smtp2.locaweb.com.br" Mailer.AddRecipient sNameTo , sEmailTo Mailer.ContentType = "text/html" Mailer.SubJect = assunto 'strMsgHeader = msg_email Mailer.BodyText = "E-mail enviado através do site:

Nome: "&nome&"
Mensagem: "&msg&"

"&now() if Mailer.SendMail then response.redirect "obrigado.html" else ' Se não for enviado mostra o erro que ocoreu response.redirect "erro.html" 'response.write Mailer.err end if set mailer = nothing end if %>