Enviar HTML con imagenes incrustadas con ASP.NET?

14/07/2004 - 13:10 por XusQ | Informe spam
Buenas! Estoy intentando mandar imagenes "embebidas" dentro de un HTML que
mando por e-mail.

.Net permite hacer esto? imagino que si.. pues el CDONTS de ASP "clasico" lo
hacía...

No obstante, si adjunto las imagenes como atatchments no me las muestra en
su sitio, sino que como atattchments :P

A ver si álguien sabe algo

Gracias!





Dim CuerpoMail As String

CuerpoMail = "<!DOCTYPE html PUBLIC '-//W3C//DTD XHTML 1.0 Transitional//EN'
'http://www.w3.org/TR/xhtml1/DTD/xht...tional.dtd'>"

CuerpoMail = CuerpoMail & "<html
xmlns='http://www.w3.org/1999/xhtml'><head><title>Recordatorio Clave de
Acceso LaClinica.Net</title>"

CuerpoMail = CuerpoMail & "<style type='text/css'>"

CuerpoMail = CuerpoMail & "<!--"

CuerpoMail = CuerpoMail & "body { margin-left: 0px; margin-top: 0px;
margin-right: 0px; margin-bottom: 0px;}"

CuerpoMail = CuerpoMail & ".Estilo1 { font-family: Verdana, Arial,
Helvetica, sans-serif; font-size: 12px;}"

CuerpoMail = CuerpoMail & ".Estilo2 { color: #337BC3; font-weight: bold;}"

CuerpoMail = CuerpoMail & "-->"

CuerpoMail = CuerpoMail & "</style></head><body><table width='100%'> <tr>
<td align='center' valign='middle'> <br />"

CuerpoMail = CuerpoMail & "<table width='616' border='0' cellspacing='0'
cellpadding='0'><tr><td colspan='2' align='left'><img src='logo.jpg'
width='228' height='41' /></td>"

CuerpoMail = CuerpoMail & "</tr><tr><td colspan='2'><img src='barrasup.jpg'
width='616' height='21' /></td>"

CuerpoMail = CuerpoMail & "</tr><tr><td width='42' height='172'
bgcolor='#E8F0F2'><div align='left'><p>&nbsp;</p>"

CuerpoMail = CuerpoMail & "</div></td><td width='574' valign='top'
bgcolor='#E8F0F2' class='Estilo1'><div align='left'><br />"

CuerpoMail = CuerpoMail & "<br /><u><span class='Estilo2'>Recordatorio clave
de acceso LaClinica.Net</span></u><br />"

CuerpoMail = CuerpoMail & "<br /><br />Alguna persona, que podría ser usted,
ha solicitado que se le recuerde su contraseña de LaClinica.Net<br /><br
/>Su clave de acceso es:<br /><br /><strong>" & clau & "</strong> <br />"

CuerpoMail = CuerpoMail & "<br /><br /><em>LaClinica.Net</em></div></td>
</tr><tr><td height='58' bgcolor='#E8F0F2'>&nbsp;</td>"

CuerpoMail = CuerpoMail & "<td bgcolor='#E8F0F2'><div align='left'><a
href='http://www.laclinica.net' target='_blank'><img src='ir.jpg' alt='Ir a
www.laclinica.net' width='106' height='22' border='0' /></a></div></td>"

CuerpoMail = CuerpoMail & "</tr><tr><td colspan='2'><img src='barrainf.jpg'
width='616' height='19' /></td></tr></table></td>"

CuerpoMail = CuerpoMail & "</tr></table></body></html>"

' Preparem objecte mail

Dim MiCorreo As Mail.MailMessage

MiCorreo = New MailMessage()

' Carreguem els adjunts

MiCorreo.Attachments.Add(New MailAttachment(MapPath("logo.jpg")))

MiCorreo.Attachments.Add(New MailAttachment(MapPath("barrainf.jpg")))

MiCorreo.Attachments.Add(New MailAttachment(MapPath("barrainf.jpg")))

MiCorreo.Attachments.Add(New MailAttachment(MapPath("ir.jpg")))

MiCorreo.Attachments.Add(New MailAttachment(MapPath("spacer.gif")))

MiCorreo.BodyFormat = MailFormat.Html

MiCorreo.From = "info@prueba.net"

MiCorreo.To = txtOlvido.Text

'MiCorreo.Cc
MiCorreo.Subject = "prova"

MiCorreo.Body = CuerpoMail

SmtpMail.SmtpServer = Application("dnsSmtpServer")

SmtpMail.Send(MiCorreo)

MiCorreo = Nothing

Preguntas similare

Leer las respuestas

#1 Sashka
14/07/2004 - 17:01 | Informe spam
http://www.eggheadcafe.com/articles/20040527.asp

Sashka

"XusQ" escribió en el mensaje
news:
Buenas! Estoy intentando mandar imagenes "embebidas" dentro de un HTML que
mando por e-mail.

.Net permite hacer esto? imagino que si.. pues el CDONTS de ASP "clasico"


lo
hacía...

No obstante, si adjunto las imagenes como atatchments no me las muestra en
su sitio, sino que como atattchments :P

A ver si álguien sabe algo

Gracias!





Dim CuerpoMail As String

CuerpoMail = "<!DOCTYPE html PUBLIC '-//W3C//DTD XHTML 1.0


Transitional//EN'
'http://www.w3.org/TR/xhtml1/DTD/xht...tional.dtd'>"

CuerpoMail = CuerpoMail & "<html
xmlns='http://www.w3.org/1999/xhtml'><head><title>Recordatorio Clave de
Acceso LaClinica.Net</title>"

CuerpoMail = CuerpoMail & "<style type='text/css'>"

CuerpoMail = CuerpoMail & "<!--"

CuerpoMail = CuerpoMail & "body { margin-left: 0px; margin-top: 0px;
margin-right: 0px; margin-bottom: 0px;}"

CuerpoMail = CuerpoMail & ".Estilo1 { font-family: Verdana, Arial,
Helvetica, sans-serif; font-size: 12px;}"

CuerpoMail = CuerpoMail & ".Estilo2 { color: #337BC3; font-weight: bold;}"

CuerpoMail = CuerpoMail & "-->"

CuerpoMail = CuerpoMail & "</style></head><body><table width='100%'> <tr>
<td align='center' valign='middle'> <br />"

CuerpoMail = CuerpoMail & "<table width='616' border='0' cellspacing='0'
cellpadding='0'><tr><td colspan='2' align='left'><img src='logo.jpg'
width='228' height='41' /></td>"

CuerpoMail = CuerpoMail & "</tr><tr><td colspan='2'><img


src='barrasup.jpg'
width='616' height='21' /></td>"

CuerpoMail = CuerpoMail & "</tr><tr><td width='42' height='172'
bgcolor='#E8F0F2'><div align='left'><p>&nbsp;</p>"

CuerpoMail = CuerpoMail & "</div></td><td width='574' valign='top'
bgcolor='#E8F0F2' class='Estilo1'><div align='left'><br />"

CuerpoMail = CuerpoMail & "<br /><u><span class='Estilo2'>Recordatorio


clave
de acceso LaClinica.Net</span></u><br />"

CuerpoMail = CuerpoMail & "<br /><br />Alguna persona, que podría ser


usted,
ha solicitado que se le recuerde su contraseña de LaClinica.Net<br /><br
/>Su clave de acceso es:<br /><br /><strong>" & clau & "</strong> <br />"

CuerpoMail = CuerpoMail & "<br /><br /><em>LaClinica.Net</em></div></td>
</tr><tr><td height='58' bgcolor='#E8F0F2'>&nbsp;</td>"

CuerpoMail = CuerpoMail & "<td bgcolor='#E8F0F2'><div align='left'><a
href='http://www.laclinica.net' target='_blank'><img src='ir.jpg' alt='Ir


a
www.laclinica.net' width='106' height='22' border='0' /></a></div></td>"

CuerpoMail = CuerpoMail & "</tr><tr><td colspan='2'><img


src='barrainf.jpg'
width='616' height='19' /></td></tr></table></td>"

CuerpoMail = CuerpoMail & "</tr></table></body></html>"

' Preparem objecte mail

Dim MiCorreo As Mail.MailMessage

MiCorreo = New MailMessage()

' Carreguem els adjunts

MiCorreo.Attachments.Add(New MailAttachment(MapPath("logo.jpg")))

MiCorreo.Attachments.Add(New MailAttachment(MapPath("barrainf.jpg")))

MiCorreo.Attachments.Add(New MailAttachment(MapPath("barrainf.jpg")))

MiCorreo.Attachments.Add(New MailAttachment(MapPath("ir.jpg")))

MiCorreo.Attachments.Add(New MailAttachment(MapPath("spacer.gif")))

MiCorreo.BodyFormat = MailFormat.Html

MiCorreo.From = ""

MiCorreo.To = txtOlvido.Text

'MiCorreo.Cc >
MiCorreo.Subject = "prova"

MiCorreo.Body = CuerpoMail

SmtpMail.SmtpServer = Application("dnsSmtpServer")

SmtpMail.Send(MiCorreo)

MiCorreo = Nothing


Respuesta Responder a este mensaje
#2 Sashka
15/07/2004 - 16:03 | Informe spam
¿? entre ayer para verificar la dirección y acabo de entrar... recargala!!

Sashka

"XusMbl" escribió en el mensaje
news:
service unavailable? jejeje


"Sashka" escribió en el mensaje
news:%
> http://www.eggheadcafe.com/articles/20040527.asp
>
> Sashka
>
> "XusQ" escribió en el mensaje
> news:
> > Buenas! Estoy intentando mandar imagenes "embebidas" dentro de un HTML
que
> > mando por e-mail.
> >
> > .Net permite hacer esto? imagino que si.. pues el CDONTS de ASP
"clasico"
> lo
> > hacía...
> >
> > No obstante, si adjunto las imagenes como atatchments no me las


muestra
en
> > su sitio, sino que como atattchments :P
> >
> > A ver si álguien sabe algo
> >
> > Gracias!
> >
> >
> >
> >
> >
> > Dim CuerpoMail As String
> >
> > CuerpoMail = "<!DOCTYPE html PUBLIC '-//W3C//DTD XHTML 1.0
> Transitional//EN'
> > 'http://www.w3.org/TR/xhtml1/DTD/xht...tional.dtd'>"
> >
> > CuerpoMail = CuerpoMail & "<html
> > xmlns='http://www.w3.org/1999/xhtml'><head><title>Recordatorio Clave


de
> > Acceso LaClinica.Net</title>"
> >
> > CuerpoMail = CuerpoMail & "<style type='text/css'>"
> >
> > CuerpoMail = CuerpoMail & "<!--"
> >
> > CuerpoMail = CuerpoMail & "body { margin-left: 0px; margin-top: 0px;
> > margin-right: 0px; margin-bottom: 0px;}"
> >
> > CuerpoMail = CuerpoMail & ".Estilo1 { font-family: Verdana, Arial,
> > Helvetica, sans-serif; font-size: 12px;}"
> >
> > CuerpoMail = CuerpoMail & ".Estilo2 { color: #337BC3; font-weight:
bold;}"
> >
> > CuerpoMail = CuerpoMail & "-->"
> >
> > CuerpoMail = CuerpoMail & "</style></head><body><table width='100%'>
<tr>
> > <td align='center' valign='middle'> <br />"
> >
> > CuerpoMail = CuerpoMail & "<table width='616' border='0'


cellspacing='0'
> > cellpadding='0'><tr><td colspan='2' align='left'><img src='logo.jpg'
> > width='228' height='41' /></td>"
> >
> > CuerpoMail = CuerpoMail & "</tr><tr><td colspan='2'><img
> src='barrasup.jpg'
> > width='616' height='21' /></td>"
> >
> > CuerpoMail = CuerpoMail & "</tr><tr><td width='42' height='172'
> > bgcolor='#E8F0F2'><div align='left'><p>&nbsp;</p>"
> >
> > CuerpoMail = CuerpoMail & "</div></td><td width='574' valign='top'
> > bgcolor='#E8F0F2' class='Estilo1'><div align='left'><br />"
> >
> > CuerpoMail = CuerpoMail & "<br /><u><span class='Estilo2'>Recordatorio
> clave
> > de acceso LaClinica.Net</span></u><br />"
> >
> > CuerpoMail = CuerpoMail & "<br /><br />Alguna persona, que podría ser
> usted,
> > ha solicitado que se le recuerde su contraseña de LaClinica.Net<br


/><br
> > />Su clave de acceso es:<br /><br /><strong>" & clau & "</strong> <br
/>"
> >
> > CuerpoMail = CuerpoMail & "<br /><br


/><em>LaClinica.Net</em></div></td>
> > </tr><tr><td height='58' bgcolor='#E8F0F2'>&nbsp;</td>"
> >
> > CuerpoMail = CuerpoMail & "<td bgcolor='#E8F0F2'><div align='left'><a
> > href='http://www.laclinica.net' target='_blank'><img src='ir.jpg'
alt='Ir
> a
> > www.laclinica.net' width='106' height='22' border='0'


/></a></div></td>"
> >
> > CuerpoMail = CuerpoMail & "</tr><tr><td colspan='2'><img
> src='barrainf.jpg'
> > width='616' height='19' /></td></tr></table></td>"
> >
> > CuerpoMail = CuerpoMail & "</tr></table></body></html>"
> >
> > ' Preparem objecte mail
> >
> > Dim MiCorreo As Mail.MailMessage
> >
> > MiCorreo = New MailMessage()
> >
> > ' Carreguem els adjunts
> >
> > MiCorreo.Attachments.Add(New MailAttachment(MapPath("logo.jpg")))
> >
> > MiCorreo.Attachments.Add(New MailAttachment(MapPath("barrainf.jpg")))
> >
> > MiCorreo.Attachments.Add(New MailAttachment(MapPath("barrainf.jpg")))
> >
> > MiCorreo.Attachments.Add(New MailAttachment(MapPath("ir.jpg")))
> >
> > MiCorreo.Attachments.Add(New MailAttachment(MapPath("spacer.gif")))
> >
> > MiCorreo.BodyFormat = MailFormat.Html
> >
> > MiCorreo.From = ""
> >
> > MiCorreo.To = txtOlvido.Text
> >
> > 'MiCorreo.Cc > > >
> > MiCorreo.Subject = "prova"
> >
> > MiCorreo.Body = CuerpoMail
> >
> > SmtpMail.SmtpServer = Application("dnsSmtpServer")
> >
> > SmtpMail.Send(MiCorreo)
> >
> > MiCorreo = Nothing
> >
> >
>
>


Respuesta Responder a este mensaje
#3 XusMbl
15/07/2004 - 23:12 | Informe spam
service unavailable? jejeje


"Sashka" escribió en el mensaje
news:%
http://www.eggheadcafe.com/articles/20040527.asp

Sashka

"XusQ" escribió en el mensaje
news:
> Buenas! Estoy intentando mandar imagenes "embebidas" dentro de un HTML


que
> mando por e-mail.
>
> .Net permite hacer esto? imagino que si.. pues el CDONTS de ASP


"clasico"
lo
> hacía...
>
> No obstante, si adjunto las imagenes como atatchments no me las muestra


en
> su sitio, sino que como atattchments :P
>
> A ver si álguien sabe algo
>
> Gracias!
>
>
>
>
>
> Dim CuerpoMail As String
>
> CuerpoMail = "<!DOCTYPE html PUBLIC '-//W3C//DTD XHTML 1.0
Transitional//EN'
> 'http://www.w3.org/TR/xhtml1/DTD/xht...tional.dtd'>"
>
> CuerpoMail = CuerpoMail & "<html
> xmlns='http://www.w3.org/1999/xhtml'><head><title>Recordatorio Clave de
> Acceso LaClinica.Net</title>"
>
> CuerpoMail = CuerpoMail & "<style type='text/css'>"
>
> CuerpoMail = CuerpoMail & "<!--"
>
> CuerpoMail = CuerpoMail & "body { margin-left: 0px; margin-top: 0px;
> margin-right: 0px; margin-bottom: 0px;}"
>
> CuerpoMail = CuerpoMail & ".Estilo1 { font-family: Verdana, Arial,
> Helvetica, sans-serif; font-size: 12px;}"
>
> CuerpoMail = CuerpoMail & ".Estilo2 { color: #337BC3; font-weight:


bold;}"
>
> CuerpoMail = CuerpoMail & "-->"
>
> CuerpoMail = CuerpoMail & "</style></head><body><table width='100%'>


<tr>
> <td align='center' valign='middle'> <br />"
>
> CuerpoMail = CuerpoMail & "<table width='616' border='0' cellspacing='0'
> cellpadding='0'><tr><td colspan='2' align='left'><img src='logo.jpg'
> width='228' height='41' /></td>"
>
> CuerpoMail = CuerpoMail & "</tr><tr><td colspan='2'><img
src='barrasup.jpg'
> width='616' height='21' /></td>"
>
> CuerpoMail = CuerpoMail & "</tr><tr><td width='42' height='172'
> bgcolor='#E8F0F2'><div align='left'><p>&nbsp;</p>"
>
> CuerpoMail = CuerpoMail & "</div></td><td width='574' valign='top'
> bgcolor='#E8F0F2' class='Estilo1'><div align='left'><br />"
>
> CuerpoMail = CuerpoMail & "<br /><u><span class='Estilo2'>Recordatorio
clave
> de acceso LaClinica.Net</span></u><br />"
>
> CuerpoMail = CuerpoMail & "<br /><br />Alguna persona, que podría ser
usted,
> ha solicitado que se le recuerde su contraseña de LaClinica.Net<br /><br
> />Su clave de acceso es:<br /><br /><strong>" & clau & "</strong> <br


/>"
>
> CuerpoMail = CuerpoMail & "<br /><br /><em>LaClinica.Net</em></div></td>
> </tr><tr><td height='58' bgcolor='#E8F0F2'>&nbsp;</td>"
>
> CuerpoMail = CuerpoMail & "<td bgcolor='#E8F0F2'><div align='left'><a
> href='http://www.laclinica.net' target='_blank'><img src='ir.jpg'


alt='Ir
a
> www.laclinica.net' width='106' height='22' border='0' /></a></div></td>"
>
> CuerpoMail = CuerpoMail & "</tr><tr><td colspan='2'><img
src='barrainf.jpg'
> width='616' height='19' /></td></tr></table></td>"
>
> CuerpoMail = CuerpoMail & "</tr></table></body></html>"
>
> ' Preparem objecte mail
>
> Dim MiCorreo As Mail.MailMessage
>
> MiCorreo = New MailMessage()
>
> ' Carreguem els adjunts
>
> MiCorreo.Attachments.Add(New MailAttachment(MapPath("logo.jpg")))
>
> MiCorreo.Attachments.Add(New MailAttachment(MapPath("barrainf.jpg")))
>
> MiCorreo.Attachments.Add(New MailAttachment(MapPath("barrainf.jpg")))
>
> MiCorreo.Attachments.Add(New MailAttachment(MapPath("ir.jpg")))
>
> MiCorreo.Attachments.Add(New MailAttachment(MapPath("spacer.gif")))
>
> MiCorreo.BodyFormat = MailFormat.Html
>
> MiCorreo.From = ""
>
> MiCorreo.To = txtOlvido.Text
>
> 'MiCorreo.Cc > >
> MiCorreo.Subject = "prova"
>
> MiCorreo.Body = CuerpoMail
>
> SmtpMail.SmtpServer = Application("dnsSmtpServer")
>
> SmtpMail.Send(MiCorreo)
>
> MiCorreo = Nothing
>
>


Respuesta Responder a este mensaje
#4 XusQ
20/07/2004 - 18:56 | Informe spam
Pues hoy si va!

(perdona la tardanza en responder(si ya es que me lees))

"Sashka" escribió en el mensaje
news:%23A5%
¿? entre ayer para verificar la dirección y acabo de entrar... recargala!!

Sashka

"XusMbl" escribió en el mensaje
news:
> service unavailable? jejeje
>
>
> "Sashka" escribió en el mensaje
> news:%
> > http://www.eggheadcafe.com/articles/20040527.asp
> >
> > Sashka
> >
> > "XusQ" escribió en el mensaje
> > news:
> > > Buenas! Estoy intentando mandar imagenes "embebidas" dentro de un


HTML
> que
> > > mando por e-mail.
> > >
> > > .Net permite hacer esto? imagino que si.. pues el CDONTS de ASP
> "clasico"
> > lo
> > > hacía...
> > >
> > > No obstante, si adjunto las imagenes como atatchments no me las
muestra
> en
> > > su sitio, sino que como atattchments :P
> > >
> > > A ver si álguien sabe algo
> > >
> > > Gracias!
> > >
> > >
> > >
> > >
> > >
> > > Dim CuerpoMail As String
> > >
> > > CuerpoMail = "<!DOCTYPE html PUBLIC '-//W3C//DTD XHTML 1.0
> > Transitional//EN'
> > > 'http://www.w3.org/TR/xhtml1/DTD/xht...tional.dtd'>"
> > >
> > > CuerpoMail = CuerpoMail & "<html
> > > xmlns='http://www.w3.org/1999/xhtml'><head><title>Recordatorio Clave
de
> > > Acceso LaClinica.Net</title>"
> > >
> > > CuerpoMail = CuerpoMail & "<style type='text/css'>"
> > >
> > > CuerpoMail = CuerpoMail & "<!--"
> > >
> > > CuerpoMail = CuerpoMail & "body { margin-left: 0px; margin-top: 0px;
> > > margin-right: 0px; margin-bottom: 0px;}"
> > >
> > > CuerpoMail = CuerpoMail & ".Estilo1 { font-family: Verdana, Arial,
> > > Helvetica, sans-serif; font-size: 12px;}"
> > >
> > > CuerpoMail = CuerpoMail & ".Estilo2 { color: #337BC3; font-weight:
> bold;}"
> > >
> > > CuerpoMail = CuerpoMail & "-->"
> > >
> > > CuerpoMail = CuerpoMail & "</style></head><body><table width='100%'>
> <tr>
> > > <td align='center' valign='middle'> <br />"
> > >
> > > CuerpoMail = CuerpoMail & "<table width='616' border='0'
cellspacing='0'
> > > cellpadding='0'><tr><td colspan='2' align='left'><img src='logo.jpg'
> > > width='228' height='41' /></td>"
> > >
> > > CuerpoMail = CuerpoMail & "</tr><tr><td colspan='2'><img
> > src='barrasup.jpg'
> > > width='616' height='21' /></td>"
> > >
> > > CuerpoMail = CuerpoMail & "</tr><tr><td width='42' height='172'
> > > bgcolor='#E8F0F2'><div align='left'><p>&nbsp;</p>"
> > >
> > > CuerpoMail = CuerpoMail & "</div></td><td width='574' valign='top'
> > > bgcolor='#E8F0F2' class='Estilo1'><div align='left'><br />"
> > >
> > > CuerpoMail = CuerpoMail & "<br /><u><span


class='Estilo2'>Recordatorio
> > clave
> > > de acceso LaClinica.Net</span></u><br />"
> > >
> > > CuerpoMail = CuerpoMail & "<br /><br />Alguna persona, que podría


ser
> > usted,
> > > ha solicitado que se le recuerde su contraseña de LaClinica.Net<br
/><br
> > > />Su clave de acceso es:<br /><br /><strong>" & clau & "</strong>


<br
> />"
> > >
> > > CuerpoMail = CuerpoMail & "<br /><br
/><em>LaClinica.Net</em></div></td>
> > > </tr><tr><td height='58' bgcolor='#E8F0F2'>&nbsp;</td>"
> > >
> > > CuerpoMail = CuerpoMail & "<td bgcolor='#E8F0F2'><div


align='left'><a
> > > href='http://www.laclinica.net' target='_blank'><img src='ir.jpg'
> alt='Ir
> > a
> > > www.laclinica.net' width='106' height='22' border='0'
/></a></div></td>"
> > >
> > > CuerpoMail = CuerpoMail & "</tr><tr><td colspan='2'><img
> > src='barrainf.jpg'
> > > width='616' height='19' /></td></tr></table></td>"
> > >
> > > CuerpoMail = CuerpoMail & "</tr></table></body></html>"
> > >
> > > ' Preparem objecte mail
> > >
> > > Dim MiCorreo As Mail.MailMessage
> > >
> > > MiCorreo = New MailMessage()
> > >
> > > ' Carreguem els adjunts
> > >
> > > MiCorreo.Attachments.Add(New MailAttachment(MapPath("logo.jpg")))
> > >
> > > MiCorreo.Attachments.Add(New


MailAttachment(MapPath("barrainf.jpg")))
> > >
> > > MiCorreo.Attachments.Add(New


MailAttachment(MapPath("barrainf.jpg")))
> > >
> > > MiCorreo.Attachments.Add(New MailAttachment(MapPath("ir.jpg")))
> > >
> > > MiCorreo.Attachments.Add(New MailAttachment(MapPath("spacer.gif")))
> > >
> > > MiCorreo.BodyFormat = MailFormat.Html
> > >
> > > MiCorreo.From = ""
> > >
> > > MiCorreo.To = txtOlvido.Text
> > >
> > > 'MiCorreo.Cc > > > >
> > > MiCorreo.Subject = "prova"
> > >
> > > MiCorreo.Body = CuerpoMail
> > >
> > > SmtpMail.SmtpServer = Application("dnsSmtpServer")
> > >
> > > SmtpMail.Send(MiCorreo)
> > >
> > > MiCorreo = Nothing
> > >
> > >
> >
> >
>
>


email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida