• Revista PROGRAMAR: Já está disponível a edição #53 da revista programar. Faz já o download aqui!

GpL

enviar email

2 mensagens neste tópico

qual o problema deste script ?

<% 
Set Mailer = Server.CreateObject("SMTPsvg.Mailer")

Mailer.RemoteHost = "mail.siebraga.com" 

Mailer.FromName = request.form("nome")

Mailer.FromAddress = "ASSISTENCIA"

Mailer.AddRecipient "SIEBRAGA" , "luis_bracara@hotmail.com"

Mailer.Subject="ASSISTENCIA"

Mailer.Bodytext = "O cliente " & request.form("nome") & ", pediu assistência online." & chr(13) & request.form("tipo") & chr(13) & request.form("morada") & chr(13) & request.form("contacto")

x = Mailer.SendMail 

if x = true then 

MSG = "E-MAIL ENVIADO COM SUCESSO!"

Else

MSG = " O E-MAIL NÃO FOI ENVIADO COM SUCESSO!" 

end if 

Response.write MSG 

Set Mailer = Nothing
%>

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!


Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.


Entrar Agora