Últimos mensajes - Powered by IBM

Palabras claves

Programa predeterminado de correo...

16/09/2004 - 17:30 por Lonvriz | Informe spam

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()

Siga el debate

4 respuestas

Tengo una respuesta

Preguntas similare

Mostrar todos los temas similares

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()

.

Responder a este mensaje

#2 Lonvriz

16/09/2004 - 18:11 | Informe spam

Gracias pero eso no es. Ya se como enviar correo pero no es eso lo que
quiero hacer.

Tengo un programa residente en memoria que chequea servidores pop3 para ver
cuando hay correo nuevo. Cuando llega, doy al usuario un aviso y la
posibilidad de abrir SU programa de correo para cogerlos. Simplemente es
eso.

Gracias de todos modos.

"Freddy Cáceres" escribió en el mensaje
news:16a301c49c04$ff423db0$
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()

.

Responder a este mensaje

#3 Freddy Cáceres

16/09/2004 - 19:27 | Informe spam

mmmm me dejaste medio pillado, que se me ocurre:

- usar la funcion api( FindExecutable ) para saber a que
programa esta asociada la extencion EML.

- La otra podria ser sacar del Registro de Win los path de
los programas, pero aca no sabras si esta por defecto o no:
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\App
Paths\OUTLOOK.EXE\
...
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\App
Paths\EUDORA.EXE\
...
etc

Saludos
-
Freddy Cáceres
Santiago - Chile

Gracias pero eso no es. Ya se como enviar correo pero no

es eso lo que

quiero hacer.

Tengo un programa residente en memoria que chequea

servidores pop3 para ver

cuando hay correo nuevo. Cuando llega, doy al usuario un

aviso y la

posibilidad de abrir SU programa de correo para cogerlos.

Simplemente es

eso.

Gracias de todos modos.

"Freddy Cáceres" escribió en

el mensaje

news:16a301c49c04$ff423db0$
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()

.

.

Responder a este mensaje

#4 Lonvriz

17/09/2004 - 09:22 | Informe spam

Eso si que me puede valer, lo prueba enseguida, gracias

"Freddy Cáceres" escribió en el mensaje
news:006301c49c12$7f546c00$
mmmm me dejaste medio pillado, que se me ocurre:

- usar la funcion api( FindExecutable ) para saber a que
programa esta asociada la extencion EML.

- La otra podria ser sacar del Registro de Win los path de
los programas, pero aca no sabras si esta por defecto o no:
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\App
Paths\OUTLOOK.EXE\
...
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\App
Paths\EUDORA.EXE\
...
etc

Saludos
-
Freddy Cáceres
Santiago - Chile

Gracias pero eso no es. Ya se como enviar correo pero no

es eso lo que

quiero hacer.

Tengo un programa residente en memoria que chequea

servidores pop3 para ver

cuando hay correo nuevo. Cuando llega, doy al usuario un

aviso y la

posibilidad de abrir SU programa de correo para cogerlos.

Simplemente es

eso.

Gracias de todos modos.

"Freddy Cáceres" escribió en

el mensaje

news:16a301c49c04$ff423db0$
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()

.

.

Siga el debate Respuesta

Responder a este mensaje

Ads by Google

Hacer una pregunta

Tengo una respuesta

Busqueda sugerida