la verdad es que no tengo ningún replace en todo el script. El código:
smtpServer = "smtp.comuocio.net"
smtpPort = 25
dim sender, subject, body, smtpServer, smtpPort
subject = de&" te envía una postal!"
body = "Hola "¶&". Tu amigo "&de&" con email "&demail&" te ha enviado una postal desde
http://www.ommadawn.es.vg el día "&fecha&". Para verlo sigue el siguiente enlace:<br><br>
http://ommadawn.comuocio.net/postales/verpostal.asp?id="&numrnd&"<br><br>Atención: La postal expirará en 20 días. Compruebe la fecha de envío.<br><br>Atentamente:<br>"&de&" y Webmaster de Ommadawn.es.vg."
Set mail = CreateObject ("JMail.SMTPMail")
mail.ServerAddress = smtpServer & ":" & smtpPort
mail.Sender = "
[email protected]"
mail.Subject = subject
mail.AddRecipient paramail
mail.ContentType = "text/html"
mail.Body = body
mail.Execute
set mail = nothing
Saludo.