E-mail em HTML

[Arthur Webdesigner 0]

Olá, tenho um script de envio de e-mail simples e gostaria de enviar as mensagens em HTML.Aqui vão os arquivos:config.asp

Const g_strFromAddress = "email@email"Const g_strYourSite = "http://www.servidor.com.br"Const g_strEmailServer = "smtp.servidor.com.br"Const g_strNameWebmail = "Site"

config.inc

<%Function SendEmail( sEmailServer, sFromEmail, sToEmail, sSubject, sText )   Dim objMail   set objMail = server.createobject("SMTPsvg.Mailer")   objMail.FromName = sFromEmail   objMail.FromAddress = sFromEmail   objMail.RemoteHost = sEmailServer   objMail.AddRecipient sToEmail, sToEmail   objMail.Subject = sSubject   objMail.BodyText = sText   if objMail.SendMail then     SendEmail = ""   else      ' Message send failure      SendEmail = objMail.Response   end if   Set objMail = nothing End Function%>

Será que sabem como eu posso fazer para enviar o e-mail em HTML?Muito obrigado, até mais.

[vagner.net 0]

Coloca o CONTENT-TYPE do e-mail:

 

objMail.ContentType = "text/html"

 

<%Function SendEmail( sEmailServer, sFromEmail, sToEmail, sSubject, sText )   Dim objMail   set objMail = server.createobject("SMTPsvg.Mailer")   objMail.FromName = sFromEmail   objMail.FromAddress = sFromEmail   objMail.RemoteHost = sEmailServer   objMail.AddRecipient sToEmail, sToEmail   objMail.Subject = sSubject objMail.ContentType = "text/html"objMail.BodyText = sText   if objMail.SendMail then	 SendEmail = ""   else	  ' Message send failure	  SendEmail = objMail.Response   end if   Set objMail = nothing End Function%>

Aí é só passar o código HTML para o BODYTEXT.

 

OK..!!?? T+...

[Arthur Webdesigner 0]

Uau, perfeito! Tá funcionando direitinho!

Muitíssimo obrigado, ficarei te devendo essa.

Um forte abraço.

Arthur http://forum.imasters.com.br/public/style_emoticons/default/grin.gif http://forum.imasters.com.br/public/style_emoticons/default/joia.gif