e-mail en Visual Basic

[Badjov]

Yo tengo un textbox con una direccion de correo electronico. Ahora bien, lo que yo deseo es que el hacer doble click en este textbox, salga el programa de cliente de correo (leame Mozilla mail, Outlock, The bat!, Eudora, etc.). Si es posible con la parte de composición con el enlace puesto y todo (el que tenia en el textbox). Yo se que lo mas posible es que con el unico que pueda funcionar es con Outlock pero eso no me importa, lo unico que quiero es que abra el correo y ya.


Gracias a todos de antemano.
Viva el sexo.

[Jorge_Mota]

mira esto:


Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long


ShellExecute me.HWnd,vbNullString,"MailTo:[email protected]?Subj ect=Correo Automatico",vbNullString,"c:\",1)


este codigo te abrira el correo predeterminado (Eudora, outlook express o el del office, the bat, etc.etc.)

y estara listo para enviar a "[email protected]" con el Titulo
Correo Automatico.

tambien hay una forma para llenar el cuerpo del mensaje de forma automatica, con html, pero ahora no recuerdo como es, si lo necesitas preguntalo y lo busco..l..

Por cierto si pones esto en un acceso directo o desde ejecutar del menu inicio tambien tiene el mismo efecto:

MailTo:[email protected]?Subject=Correo Automatico

Saludos
Guatemala.

[Badjov]

A ver si entendi:

Estas intrucciones las debes colocar dentro de un modulo.

Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

Y estas van, por ejemplo, al presionar un boton:
ShellExecute Me.hwnd, vbNullString, "MailTo:[email protected]?Subject=Correo Automatico", vbNullString, "c:\", 1

Si estoy equivocado en algo, por favor hasmelo saber, ya que no me funciona.

Y si encuentras eso de rellenar el mensaje, me lo darias por favor, es bueno saber esas cosas.


Muchas gracias por atender mi pregunta.

[Badjov]

Ya pude hacer que funcione, gracias.

Voy a seguir esperando el cuerpo de mensaje de todas formas.

Hasta la proxima y gracias de nuevo.

[capoll]

hola he colocado el codigo ta y como pone aqui, pero me sale en la lista de errores que se esperaba una declaracion y me subralla el shell execute de la 2 linea

este es el codigo
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
ShellExecute me.HWnd,vbNullString,"MailTo:[email protected]?Subj ect=Correo Automatico",vbNullString,"c:\",1)

mira a ver si me explicas como lo puedo solucionar
gracias de antemano

[David]

Hola, capoll. Bienvenido al foro.

Por favor, no utilices temas antiguos para realizar preguntas. Recibirás mejores respuestas si abres un nuevo tema y explicas tu pregunta.

Saludos.