• Sábado 4 de Mayo de 2024, 20:58

Autor Tema:  Formato Para Envio De Correo  (Leído 1549 veces)

mac_thunder

  • Nuevo Miembro
  • *
  • Mensajes: 14
    • Ver Perfil
Formato Para Envio De Correo
« en: Lunes 4 de Septiembre de 2006, 16:43 »
0
Hola amigos:

Nuevamente con una duda a ver si pueden darme una manito.....
Estoy enviado correos desde una aplicacion Visual.net pero el salto de carro chr(13) & chr(10) no me resulta pues el correo que llega a usuario va sin salto de lineas, alguien sabe como debo solucionar este tema.

            destino = funciones.busca_correo(DDLGesEje.SelectedValue, "usr_email", "id_usuario")
            Mailmsg.To = destino
            email = funciones.busca_correo(usuario, "usr_email", "usr_usuario")
            nombre = funciones.busca_correo(usuario, "usr_nombres", "usr_usuario")
            Mailmsg.From = "\" & "Mi Nombre" & "\ <" & email & ">"

            ' formato del body
            'If chkHtmlFormat.Checked = True Then
            Mailmsg.BodyFormat = Mail.MailFormat.Html
            Mailmsg.Priority = Mail.MailPriority.High          

            Mailmsg.Subject = "Solicitud de Asignación de ajuste " & lb_trab.Text & "-" & TxSolAju.Text & " - Fecha: " & TxFeSoEj.Text & ""
            Mailmsg.Body += "Sr " & destino & ":"
' el chr(13) & chr(10) es el salto de linea........
            Mailmsg.Body += Chr(13) & Chr(10)
            Mailmsg.Body += "Se solicitó la asignación de la solicitud de ajuste " & TxSolAju.Text & ""
            Mailmsg.Body += Chr(13) & Chr(10)
            Mailmsg.Body += "perteneciente al Trabajo N°" & NUMEROTRABAJO & " el dia " & TxFeSoEj.Text & ""
            'Mailmsg.Body += vbCrLf
            Mailmsg.Body += Chr(13) & Chr(10)

junahu

  • Miembro activo
  • **
  • Mensajes: 97
    • Ver Perfil
Re: Formato Para Envio De Correo
« Respuesta #1 en: Jueves 7 de Septiembre de 2006, 01:27 »
0
Hola mac_thunder.

Heché un vistazo al código que has creado y si quitas:

   Mailmsg.BodyFormat = Mail.MailFormat.Html

te crea los saltos de línea.

junahu

  • Miembro activo
  • **
  • Mensajes: 97
    • Ver Perfil
Re: Formato Para Envio De Correo
« Respuesta #2 en: Jueves 7 de Septiembre de 2006, 01:57 »
0
Hola de nuevo, si quieres utilizar

  MailFormat.Html

utiliza el texto en formato html:

  .Body = "<p>uno</p><p>dos </p>"

Saludos.

mac_thunder

  • Nuevo Miembro
  • *
  • Mensajes: 14
    • Ver Perfil
Re: Formato Para Envio De Correo
« Respuesta #3 en: Jueves 7 de Septiembre de 2006, 14:17 »
0
Gracias, ahora si resulta.....