Enviar Foto Pelo E-mail

smez · Setembro 21, 2006

Eu fiz o seguinte codigo pra enviar a foto pelo e-mail

ele envia normal, so que n aparece a foto, onde esta o erro??

<%

'recupera dados do form

seu_nome = request.form("seu_nome")

seu_email = request.form("seu_email")

nome_amigo = request.form("nome_amigo")

email_amigo = request.form("email_amigo")

foto = request.form("foto")

id_foto = request.form("id_foto")

set rs = createObject("adodb.Recordset")

set rs.activeconnection = abredb

SQL = "SELECT * FROM ver_cobertura WHERE id_foto ='"& id_foto &"'"

rs.open sql

'Monta Mensagem

HTML ="<!DOCTYPE HTML PUBLIC ""-//IETF//DTD HTML//EN"">"

HTML = HTML & "<html>"

HTML = HTML & "<head>"

HTML = HTML & "<meta http-equiv=""Content-Type"""

HTML = HTML & "content=""text/html; charset=iso-8859-1"">"

HTML = HTML & "<title>Tammy Pastelaria » Foto </title>"

HTML = HTML & "</head>"

HTML = HTML & "<body topmargin='0' leftmargin='0' background='http://www.tammypastelaria.com.br/novo/images/fundo.gif'>"

HTML = HTML & "<div align='center'><center>"

HTML = HTML & "<table border='0' width='100' cellspacing='0' cellpadding='0'>"

HTML = HTML & "<tr><td width='100%'><img border='0' src='http://www.tammypastelaria.com.br/novo/images/topo.jpg'></td></tr>"

HTML = HTML & "<tr><td width='100%' background='http://www.tammypastelaria.com.br/novo/images/meio.jpg'><font size='1' face='Verdana'> </font></td></tr>"

HTML = HTML & "<tr><td width='100%' background='http://www.tammypastelaria.com.br/novo/images/meio.jpg'><div align='center'><center>"

HTML = HTML & "<table border='0' width='100%' cellspacing='1'>"

HTML = HTML & "<tr><td width='33%'><img border='0' src='http://www.tammypastelaria.com.br/novo/logo.jpg'></td>"

HTML = HTML & "<td width='67%'>"

HTML = HTML & "<font size=""1"" face=""verdana"">"

HTML = HTML & "  Ola <b>" & nome_amigo & "</B>, " & seu_nome &" mandou uma foto para você!<br>"

HTML = HTML & "  <img src='http://www.tammypastelaria.com.br/novo/cobertura/" & rs("foto") & "'><BR>"HTML = HTML & "</td></tr></table></center></div></td></tr>"

HTML = HTML & "<tr><td width='100%' background='http://www.tammypastelaria.com.br/novo/images/meio.jpg'> </td></tr>"

HTML = HTML & "<tr><td width='100%'><img border='0' src='http://www.tammypastelaria.com.br/novo/images/baixo.jpg'></td></tr></table>"

HTML = HTML & "</center>"

HTML = HTML & "</div>"

HTML = HTML & "</body>"

HTML = HTML & "</html>"

'cria objeto de email (vou usar CDONTS)

Set Mail = CreateObject("CDONTS.NewMail")

Mail.From = "sergio@upertechsolucoes.com.br"

Mail.To = email_amigo

Mail.Subject = "TAMMY PASTELARIA: Foto"

Mail.BodyFormat = 0

Mail.MailFormat = 0

Mail.Body = HTML

Mail.Send

%>

.Andreia. · Setembro 21, 2006

primeira é depurar se a imagem está aparecendo mesmo, ou seja:

depois de:

HTML = HTML & "</html>"
response.write HTML
response.end

Se não estiver exibindo a imagem na pagina, o erro é no codigo. Voce está deixando faltar alguma coisa:

response.write rs("foto")
response.end

Veja se não esqueceu a extensao do arquivo.

Caso esteja aparecendo a imagem ma pagina, pode ser alguma configuração do outlook que esteja bloqueando a exibiçao da imagem

Entrar

Enviar Foto Pelo E-mail

Pergunta

smez

Link para o comentário

Compartilhar em outros sites

1 resposta a esta questão

Posts Recomendados

.Andreia.

Link para o comentário

Compartilhar em outros sites

Participe da discussão

Estatísticas dos Fóruns

Navegação

Atividades