Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Développement Développement Scripting Microsoft joindre un attachment à un mail

joindre un attachment à un mail

1 réponse
Avatar
michor
Bonjour,

J'ai écrit la ligne suivante en vba pour lancer outlook 6:

Shell "C:\Program Files\Outlook Express\msimn.exe " & "/mailurl:mailto:" _
& v8 & "?subject=" & sujet & "&attachment =" & "D:\Dossier\Toto.xls" &
"&Body=" & texte & ""

<V8 >contient l'adresse mail
<sujet> contient l'objet du mail
<texte> contient le message

Tout fonctionne correctement sauf que le fichier <Toto.xls > n'est jamais
joint.
Je dois faire une erreur de syntaxe qq part!! Que faut-il corriger?

D'avance merci de votre aide

MimiH
Signaler un problème avec ce contenu

1 réponse

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
scraper
Bonjour michor, dans le message
news:OvuS%23%
tu disais :


Bonjour,

J'ai écrit la ligne suivante en vba pour lancer outlook 6:

Shell "C:Program FilesOutlook Expressmsimn.exe " &
"/mailurl:mailto:" _ & v8 & "?subject=" & sujet & "&attachment ="
& "D:DossierToto.xls" & "&Body=" & texte & ""

<V8 >contient l'adresse mail
<sujet> contient l'objet du mail
<texte> contient le message

Tout fonctionne correctement sauf que le fichier <Toto.xls > n'est
jamais joint.
Je dois faire une erreur de syntaxe qq part!! Que faut-il corriger?

D'avance merci de votre aide

MimiH


essaie ça :

'---8<----

Option Explicit

Dim objMai

Set objMail = CreateObject("CDO.Message")

objMail.From = ""
objMail.To = ""
objMail.Subject = "test"
objMail.Textbody = "coucou"
objMail.AddAttachment "C:test.vbs"
objMail.Send

Set objMail=Nothing
wscript.quit


'---8<----


les erreurs sont pas gérées par ce bout de code

pour ça, vois un peu du côté du site de JCB, il y a un superbe exemple avec
contrôle des adresses, etc .... ;-)



--

Attention ! Adresse mail invalide ...
Pour me contacter, cliquez sur le lien ci-dessous:
http://scraper.chez.tiscali.fr/contact.htm

scraper