Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

Programa predeterminado de correo...

16/09/2004 - 17:30 por Lonvriz | Informe spam
Ayuda Hacer una pregunta
Hola todos...

Tengo el siguiente código en un botón de un formulario para lanzar el
programa de correo outlook express. El problema viene cuando el usuario
(con muy buen criterio) no utiliza el Outlook Express. Mi pregunta es :

Como puedo averiguar cual es el programa de correo predeterminado del
usuario y su ruta para abrirlo????




Try
System.Diagnostics.Process.Start("msimn.exe")
Catch errOutlook As Exception
MsgBox("Error en Outlook Express : " & errOutlook.Message)
End Try
Me.Close()
email Siga el debateRespuesta 4 respuestasRespuesta Tengo una respuesta
DRAGON AGE™: INQUISITION – Matadragones
 

Leer las respuestas

#1 Freddy Cáceres
16/09/2004 - 17:51 | Informe spam
nose que tan importante para ti es saber cua les és el
programa, estas lineas por si sola levantan el cliente de
correo predeterminado la solucion es mediante MAILTO.

Private Sub EnviaMail( _
ByVal strDireccion As String, _
ByVal strSubject As String, _
ByVal strCuerpo As String, _
Optional ByVal strCC As String = "", _
Optional ByVal strBCC As String = "", _
Optional ByVal blnHTML As Boolean = False)

Dim s As String
s = "mailto:" & strDireccion & "?subject=" & strSubject

If Len(strCC) > 0 Then s = s & "&cc=" & strCC
If Len(strBCC) > 0 Then s = s & "&bcc=" & strBCC

s = s & "&body="
If blnHTML Then s = s & "<html>"

s = s & strCuerpo
If blnHTML Then s = s & "</html>"

Process.Start(s)
End Sub

Private Sub Prueba()
EnviaMail( _
"", _
"Este es el Subject", _
"El Cuerpo", _
"", _
"")
End Sub

Saludos
-
Freddy Cáceres
Santiago - Chile
Hola todos...

Tengo el siguiente código en un botón de un formulario


para lanzar el
programa de correo outlook express. El problema viene


cuando el usuario
(con muy buen criterio) no utiliza el Outlook Express. Mi


pregunta es :

Como puedo averiguar cual es el programa de correo


predeterminado del
usuario y su ruta para abrirlo????




Try
System.Diagnostics.Process.Start("msimn.exe")
Catch errOutlook As Exception
MsgBox("Error en Outlook Express : " & errOutlook.Message)
End Try
Me.Close()


.

Preguntas similares

 

Busqueda sugerida :