Comment peut-on envoyer un courrier électronique à partir de vb en utilisant OutLook Express

Il existe un WinAPI function qui permet d'ouvrir le programme e-mail par default avec l'address e-mail du recepteur, mais tu peux pas mettre de titre ou de message a partir de cette fonction (c'est ShellExecute si je me souviens bien). Sinon, il faut créer un programme toi mème qui utilise un serveur POP3 pour envoyer les messages sans l'aide de Outlook (SMTP pour recevoir les messages).

je peux te donner un bon site, mais il est en anglais.

http://www.execpc.com/~dg/tutorial/howmapi/howmapi.htm



-------------------------------
Réponse au message :
-------------------------------

Il existe un WinAPI function qui permet d'ouvrir le programme e-mail par default avec l'address e-mail du recepteur, mais tu peux pas mettre de titre ou de message a partir de cette fonction (c'est ShellExecute si je me souviens bien). Sinon, il faut créer un programme toi mème qui utilise un serveur POP3 pour envoyer les messages sans l'aide de Outlook (SMTP pour recevoir les messages).
-------------------------------

rien de plus simple

dans un module

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


dans la feuille

ret& = ShellExecute(Me.hwnd, "Open", "mailto:to@aol.com?subject='mon sujet'&body=" blabla, "", App.Path, 1)

ce code est super et fonctionne a la perfection, le soucis s'est que un utilisateur doit valider l'envoi du MAIL dans outlook et mon aplication est installée sur une serveur sans écran qui gère des importations e fichiers internet et doit envoyer un Mail automatiquement a un utilisateur quand il y a un Prob.
Comment faire... HELP



-------------------------------
Réponse au message :
-------------------------------

>
> rien de plus simple
>
> dans un module
>
> 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
>
>
> dans la feuille
>
> ret& = ShellExecute(Me.hwnd, "Open", "mailto:to@aol.com?subject='mon sujet'&body=" blabla, "", App.Path, 1)
>
>
>

Peut-on mettre une image dans body ?


Elie