Ver Mensaje Individual
  #1 (permalink)  
Antiguo 13/12/2005, 19:51
Zippo3000
 
Fecha de Ingreso: abril-2005
Mensajes: 71
Antigüedad: 19 años
Puntos: 0
Mandar flash por correo

Hola a todos, sabe alguien si se puede enviar adjunto un flash y verlo en un mensaje HTML como pasa con las imagenes.
No quiero poner una ruta absoluta al URL donde esta el archivo swf

probe igual como lo hago con las imagenes pero no funciona
esta en ASP pero queria escuchar otras opiniones

Set Mail = Server.CreateObject("Persits.MailSender")
Mail.host = "*********"
Mail.username = "*****"
Mail.password= "******"

Mail.From = "[email protected]"
Mail.FromName = "Gestion"
Mail.AddAddress "
[email protected]" , "Consulta"

Mail.Subject = "GD: Prueba de flash con flash incluido"
Mail.Body = "<html><head><title>Consulta OnLine</title><meta http-equiv='Content-Type' content='text/html; charset=iso-8859-1'>" & _
"<style type='text/css'>.gd { font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 10px; font-weight: bold; color: #FFFFFF}Table { font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 12px; color: #000033; letter-spacing: normal}</style></head><body bgcolor='#FFFFFF'>" & _
"<table width='500' border='1' align='center' bordercolor='#000000' cellspacing='0'><tr><td bgcolor='#000A69'>" & _
"<object classid='clsid:d27cdb6e-ae6d-11cf-96b8-444553540000' codebase='http://fpdownload.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=7,0,0,0' width='560' height='400' align='middle'>" & _
"<param name='allowScriptAccess' value='sameDomain' />" & _
"<param name='movie' value='cid:animGT' />" & _
"<param name='quality' value='high' />" & _
"<param name='bgcolor' value='#ffffff' />" & _
"<embed src='cid:animGT' quality='high' bgcolor='#ffffff' width='560' height='400' align='middle' allowscriptaccess='sameDomain' type='application/x-shockwave-flash' pluginspage='http://www.macromedia.com/go/getflashplayer' /> " & _
"</object>" & _
"<img src='cid:LogoGT' width='320' height='70'></td></tr><tr><td bgcolor='#DDEEFF'>" & _
"<table width='400' border='0' align='center' cellpadding='10'><tr><td bgcolor='#FFFFFF'><b>Tipo:</b><br>" & _
"</td></tr></table>" & _
"</td></tr><tr><td bgcolor='#333333' align='right' class='gd'>div. Gestion Digital</td></tr></table></body></html>"

'Mail.addAttachment Server.MapPath("img/LogoGT.gif"), "LogoGT"
Mail.AddEmbeddedImage Server.MapPath("img/LogoGT.gif"), "LogoGT"
Mail.AddEmbeddedImage Server.MapPath("MPI/navidad_01.swf"), "animGT"
Mail.IsHTML = true


Mail.Send