Comment envoyer un Email avec Access

Pour le truc de la date voulue pour générer je sais pas exactement (j'imagine avec Now) mais pour ce qui est de l'E-Mail tu peux faire un truc comme ca:

Dim myOlApp As New Outlook.Application
Dim myItem As Outlook.MailItem
Set myItem = myOlApp.CreateItem(olMailItem)
'tu crée l'objet de type e-mail

eMail="machin@truc.fr"

myItem.Attachments.Add "C:\Temp\Temp.txt", _
olByValue, 1, "Fichier temporaire"
myItem.Recipients.Add (eMail)
myItem.Subject = "Essai d'envoi de mail"
myItem.Body = "Mail généré par l'appli de gestion xxx"


Dim response As VbMsgBoxResult
response = MsgBox("Voulez vous envoyer un mail à : " & eMail, vbOKCancel, "Envoi de mail")
If response = vbOK Then myItem.Send

'méthode myItem.Display pour l'ouvrir dans outlook


Mais chez moi ca affiche une confirmation( Outlook 2k) disant que un prog va envoyer des mails avec votre nom.
Par contre si quelqu'un pouvait me dire si on peut la virer cette protection ... (sans envoyer des mail avec winsock, je tiens à le faire avec outlook)

Excuse moi mais t'aurais pu mettre un minimum de commentaire.
Merci
-------------------------------
Réponse au message :
-------------------------------

> Pour le truc de la date voulue pour générer je sais pas exactement (j'imagine avec Now) mais pour ce qui est de l'E-Mail tu peux faire un truc comme ca:
>
> Dim myOlApp As New Outlook.Application
> Dim myItem As Outlook.MailItem
> Set myItem = myOlApp.CreateItem(olMailItem)
> 'tu crée l'objet de type e-mail
>
> eMail="machin@truc.fr"
>
> myItem.Attachments.Add "C:\Temp\Temp.txt", _
> olByValue, 1, "Fichier temporaire"
> myItem.Recipients.Add (eMail)
> myItem.Subject = "Essai d'envoi de mail"
> myItem.Body = "Mail généré par l'appli de gestion xxx"
>
>
> Dim response As VbMsgBoxResult
> response = MsgBox("Voulez vous envoyer un mail à : " & eMail, vbOKCancel, "Envoi de mail")
> If response = vbOK Then myItem.Send
>
> 'méthode myItem.Display pour l'ouvrir dans outlook
>
>
> Mais chez moi ca affiche une confirmation( Outlook 2k) disant que un prog va envoyer des mails avec votre nom.
> Par contre si quelqu'un pouvait me dire si on peut la virer cette protection ... (sans envoyer des mail avec winsock, je tiens à le faire avec outlook)