Enviar mail..
Hola de nuevo, esta es más difícil.. Me gustaría que mi programa pudiera abrir el Correo predeterminado y lo dejara listo para escribir un mail a alguien, gracias por ayudarme.
Un abrazo
Un abrazo
Respuesta de fvomaster
1
Acá te envío mi ayuda..
Public 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
Public Const SW_SHOW = 5
En el evento click de un boton...
Private Sub Command1_Click()
Dim X as Long
X = ShellExecute hWnd, "open", "mailto:[email protected]", vbNullString, vbNullString, SW_SHOW
End Sub
Eso sería, revísalo...
Public 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
Public Const SW_SHOW = 5
En el evento click de un boton...
Private Sub Command1_Click()
Dim X as Long
X = ShellExecute hWnd, "open", "mailto:[email protected]", vbNullString, vbNullString, SW_SHOW
End Sub
Eso sería, revísalo...
