Enviar Swf Por Email

carol · Julho 18, 2003

ola galera beleza

no sistema que eu estou desenvolvendo tem que existir a possibilida da pessoa enviar um email em swf por exemplo uma apresentaçao da empresa

eu fiz da seguinte forma

$body.= "<html><head><meta http-equiv='Content-Type' content='text/html; charset=iso-8859-1'></head><body> <OBJECT classid=clsid:D27CDB6E-AE6D-11cf-96B8-444553540000 codebase=http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0 WIDTH='" .$coluna. "' HEIGHT='" .$linha. "'><PARAM NAME=movie VALUE='".$url. "'> <PARAM NAME=quality VALUE=high></OBJECT><br><br><a href = '".$url."'>Click aqui caso não consiga visualizar </a></body></html>";

e assim eu coloco isso como corpo na funçao mail o email e enviado mas no corpo do email não aparece nada o swf não e enviado eu tenho um sistema da que faz a mesma coisa so que em asp e funciona certinho

session("ObjEmail").HTMLBody = "<HTML><HEAD><TITLE>" & session("Subject") & "</TITLE></HEAD>" 
session("ObjEmail").AppendHTML "<body bgcolor='"& session("cordefundo") & "'><table height=100% border=0 cellspacing=0 cellpadding=0 align=center><tr><td>" 
session("ObjEmail").AppendHTML "<OBJECT classid=clsid:D27CDB6E-AE6D-11cf-96B8-444553540000 codebase=http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0 WIDTH='" & session("coluna") & "' HEIGHT='" & session("linha") & "'>" 
session("ObjEmail").AppendHTML "<PARAM NAME=movie VALUE='" & session("src") & "?Company=" & server.URLEncode(session("ObjRs").Fields("Company")) & "&Contact=" & server.URLEncode(session("ObjRs").Fields("Contact")) & "&Title=" & server.URLEncode(session("ObjRs").Fields("title")) & "&Email=" & server.URLEncode(session("ObjRs").Fields("email")) & "'> <PARAM NAME=quality VALUE=high>" 
session("ObjEmail").AppendHTML "<PARAM NAME=bgcolor VALUE=" & session("cordefundo") & "> " 
session("ObjEmail").AppendHTML "<EMBED src='" & session("src") & "?Company=" & server.URLEncode(session("ObjRs").Fields("Company")) & "&Contact=" & server.URLEncode(session("ObjRs").Fields("Contact")) & "&Title=" & server.URLEncode(session("ObjRs").Fields("title")) & "&Email=" & server.URLEncode(session("ObjRs").Fields("email")) & "' quality=high bgcolor="& session("cordefundo") 
session("ObjEmail").AppendHTML " WIDTH='" & session("coluna") & "' HEIGHT='" & session("linha") & "' TYPE='application/x-shockwave-flash' PLUGINSPAGE='http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash'></EMBED>" 
session("ObjEmail").AppendHTML "</OBJECT></td></tr></table><center><a href='" & mid(session("src"),1,len(session("src")) - 3) & "html" & "?Company=" & server.URLEncode(session("ObjRs").Fields("Company")) & "&Contact=" & server.URLEncode(session("ObjRs").Fields("Contact")) & "&Title=" & server.URLEncode(session("ObjRs").Fields("title")) & "&Email=" & server.URLEncode(session("ObjRs").Fields("email")) & "'><font face=verdana size=1 color=#ffffff>Caso não consiga ver a animação acima, clique aqui.</font></center></BODY></HTML>"

sera que alguém pode me ajudar por favor

tfolima · Julho 18, 2003

Pelo que entendi, você deve "dizer" que a mensagem será em html da seguinte maneira:

mail($para,$subject,$msg,"Content-Type: text/html; charset=iso-8859-1");

falou

Gladisson · Julho 19, 2003

depois é só inseri o código com link para sua page do swf - Flash. :D

Entrar

Enviar Swf Por Email

Pergunta

carol

Link para o comentário

Compartilhar em outros sites

2 respostass a esta questão

Posts Recomendados

tfolima

Link para o comentário

Compartilhar em outros sites

Gladisson

Link para o comentário

Compartilhar em outros sites

Participe da discussão

Estatísticas dos Fóruns

Navegação

Atividades