Cela veut dire que "celui-ci" est déjà en cours d'exécution. Donc je ne comprends pas pourquoi il faudrait le "lancer".
@-salutations
Michel Claveau
PacalT
En fait mon script lance outlook, mais le problème est qu'il faut entrer le mot de passe du compte. Peut-on par script passer ce mot de passe à Outlook, afin de ne pas à avoir à saisir ce mot de passe au clavier?
Bonjour !
Si, comme tu l'indiques,
celui-ci demande le mot de passe
Cela veut dire que "celui-ci" est déjà en cours d'exécution. Donc je ne comprends pas pourquoi il faudrait le "lancer".
@-salutations
Michel Claveau
En fait mon script lance outlook, mais le problème est qu'il faut entrer le
mot de passe du compte. Peut-on par script passer ce mot de passe à Outlook,
afin de ne pas à avoir à saisir ce mot de passe au clavier?
Bonjour !
Si, comme tu l'indiques,
celui-ci demande le mot de passe
Cela veut dire que "celui-ci" est déjà en cours d'exécution. Donc je ne
comprends pas pourquoi il faudrait le "lancer".
En fait mon script lance outlook, mais le problème est qu'il faut entrer le mot de passe du compte. Peut-on par script passer ce mot de passe à Outlook, afin de ne pas à avoir à saisir ce mot de passe au clavier?
Bonjour !
Si, comme tu l'indiques,
celui-ci demande le mot de passe
Cela veut dire que "celui-ci" est déjà en cours d'exécution. Donc je ne comprends pas pourquoi il faudrait le "lancer".
Merci pour ton info. Mais à présent j'ai un nouveau souci. J'ai récupéré sur l'aide microsoft un code associé à l'article 197920, qui permet d'ouvrir une session MAPI et d'envoyer un mail. le code: ## dim objSession Set objSession = CreateObject("MAPI.Session") objSession.Logon "A Valid User Profile"##
Mais là oû ça coince c'est que j'ai ce message:
"Un composant activeX ne peut ouvrir un objet MAPI.session"
Mon script est un .vbs
As-tu une idée?
Merci.
SendKeys ?
Merci pour ton info.
Mais à présent j'ai un nouveau souci. J'ai récupéré sur l'aide microsoft un
code associé à l'article 197920, qui permet d'ouvrir une session MAPI et
d'envoyer un mail.
le code:
##
dim objSession
Set objSession = CreateObject("MAPI.Session")
objSession.Logon "A Valid User Profile"##
Mais là oû ça coince c'est que j'ai ce message:
"Un composant activeX ne peut ouvrir un objet MAPI.session"
Merci pour ton info. Mais à présent j'ai un nouveau souci. J'ai récupéré sur l'aide microsoft un code associé à l'article 197920, qui permet d'ouvrir une session MAPI et d'envoyer un mail. le code: ## dim objSession Set objSession = CreateObject("MAPI.Session") objSession.Logon "A Valid User Profile"##
Mais là oû ça coince c'est que j'ai ce message:
"Un composant activeX ne peut ouvrir un objet MAPI.session"
Mon script est un .vbs
As-tu une idée?
Merci.
SendKeys ?
Do Re Mi chel La Si Do
Bonsoir !
Je ne suis pas sûr que MAPI soit accessible de cette façon. Par contre, CDO, oui.
Voici un exemple d'utilisation de CDO :
Dim str,objEmail Set objEmail = CreateObject("CDO.Message") objEmail.From = "" objEmail.To = objEmail.Subject = "message d'essai" objEmail.Textbody = "Corps (body) du message." objEmail.AddAttachment "C:vodka.jpg" objEmail.Send Wscript.quit
@-salutations
Michel Claveau
Bonsoir !
Je ne suis pas sûr que MAPI soit accessible de cette façon.
Par contre, CDO, oui.
Voici un exemple d'utilisation de CDO :
Dim str,objEmail
Set objEmail = CreateObject("CDO.Message")
objEmail.From = "toto@titi.com"
objEmail.To = gros.minet@cartoon.com
objEmail.Subject = "message d'essai"
objEmail.Textbody = "Corps (body) du message."
objEmail.AddAttachment "C:vodka.jpg"
objEmail.Send
Wscript.quit
Je ne suis pas sûr que MAPI soit accessible de cette façon. Par contre, CDO, oui.
Voici un exemple d'utilisation de CDO :
Dim str,objEmail Set objEmail = CreateObject("CDO.Message") objEmail.From = "" objEmail.To = objEmail.Subject = "message d'essai" objEmail.Textbody = "Corps (body) du message." objEmail.AddAttachment "C:vodka.jpg" objEmail.Send Wscript.quit
@-salutations
Michel Claveau
PacalT
Merci pour le code, mais j'ai toujours ce messag d'erreur. Mais j'ai plus d'infos. Avec REgmon (de sysinternal) je peux voir que le code que tu m'as donné accède aux registres suivants (par Wscript):
" HKCRCLSID{B54F3741-5B07-11CF-A4B0-00AA004A55E8}TreatAs NOT found HKCRCLSID{6C736DB1-BD94-11D0-8A23-00AA00B58E10} NOT FOUND HKCRCDO.MessageClsid NOT FOUND HKCRCDO.Message NOT FOUND
" Hors ces clés n'existent pas. Peux tu me dire si tu as bien ces clés sur ton PC?
Bonsoir !
Je ne suis pas sûr que MAPI soit accessible de cette façon. Par contre, CDO, oui.
Voici un exemple d'utilisation de CDO :
Dim str,objEmail Set objEmail = CreateObject("CDO.Message") objEmail.From = "" objEmail.To = objEmail.Subject = "message d'essai" objEmail.Textbody = "Corps (body) du message." objEmail.AddAttachment "C:vodka.jpg" objEmail.Send Wscript.quit
@-salutations
Michel Claveau
Merci pour le code, mais j'ai toujours ce messag d'erreur. Mais j'ai plus
d'infos. Avec REgmon (de sysinternal) je peux voir que le code que tu m'as
donné accède aux registres suivants (par Wscript):
"
HKCRCLSID{B54F3741-5B07-11CF-A4B0-00AA004A55E8}TreatAs NOT found
HKCRCLSID{6C736DB1-BD94-11D0-8A23-00AA00B58E10} NOT FOUND
HKCRCDO.MessageClsid NOT FOUND
HKCRCDO.Message NOT FOUND
"
Hors ces clés n'existent pas. Peux tu me dire si tu as bien ces clés sur ton
PC?
Bonsoir !
Je ne suis pas sûr que MAPI soit accessible de cette façon.
Par contre, CDO, oui.
Voici un exemple d'utilisation de CDO :
Dim str,objEmail
Set objEmail = CreateObject("CDO.Message")
objEmail.From = "toto@titi.com"
objEmail.To = gros.minet@cartoon.com
objEmail.Subject = "message d'essai"
objEmail.Textbody = "Corps (body) du message."
objEmail.AddAttachment "C:vodka.jpg"
objEmail.Send
Wscript.quit
Merci pour le code, mais j'ai toujours ce messag d'erreur. Mais j'ai plus d'infos. Avec REgmon (de sysinternal) je peux voir que le code que tu m'as donné accède aux registres suivants (par Wscript):
" HKCRCLSID{B54F3741-5B07-11CF-A4B0-00AA004A55E8}TreatAs NOT found HKCRCLSID{6C736DB1-BD94-11D0-8A23-00AA00B58E10} NOT FOUND HKCRCDO.MessageClsid NOT FOUND HKCRCDO.Message NOT FOUND
" Hors ces clés n'existent pas. Peux tu me dire si tu as bien ces clés sur ton PC?
Bonsoir !
Je ne suis pas sûr que MAPI soit accessible de cette façon. Par contre, CDO, oui.
Voici un exemple d'utilisation de CDO :
Dim str,objEmail Set objEmail = CreateObject("CDO.Message") objEmail.From = "" objEmail.To = objEmail.Subject = "message d'essai" objEmail.Textbody = "Corps (body) du message." objEmail.AddAttachment "C:vodka.jpg" objEmail.Send Wscript.quit
@-salutations
Michel Claveau
PacalT
En fait j'ai trouvé. J'ai refait une install d' Outlook avec l'option CDO ce qui a bien installé les clés en question.
Merci pour le code, mais j'ai toujours ce messag d'erreur. Mais j'ai plus d'infos. Avec REgmon (de sysinternal) je peux voir que le code que tu m'as donné accède aux registres suivants (par Wscript):
" HKCRCLSID{B54F3741-5B07-11CF-A4B0-00AA004A55E8}TreatAs NOT found HKCRCLSID{6C736DB1-BD94-11D0-8A23-00AA00B58E10} NOT FOUND HKCRCDO.MessageClsid NOT FOUND HKCRCDO.Message NOT FOUND
" Hors ces clés n'existent pas. Peux tu me dire si tu as bien ces clés sur ton PC?
Bonsoir !
Je ne suis pas sûr que MAPI soit accessible de cette façon. Par contre, CDO, oui.
Voici un exemple d'utilisation de CDO :
Dim str,objEmail Set objEmail = CreateObject("CDO.Message") objEmail.From = "" objEmail.To = objEmail.Subject = "message d'essai" objEmail.Textbody = "Corps (body) du message." objEmail.AddAttachment "C:vodka.jpg" objEmail.Send Wscript.quit
@-salutations
Michel Claveau
En fait j'ai trouvé. J'ai refait une install d' Outlook avec l'option CDO ce
qui a bien
installé les clés en question.
Merci pour le code, mais j'ai toujours ce messag d'erreur. Mais j'ai plus
d'infos. Avec REgmon (de sysinternal) je peux voir que le code que tu m'as
donné accède aux registres suivants (par Wscript):
"
HKCRCLSID{B54F3741-5B07-11CF-A4B0-00AA004A55E8}TreatAs NOT found
HKCRCLSID{6C736DB1-BD94-11D0-8A23-00AA00B58E10} NOT FOUND
HKCRCDO.MessageClsid NOT FOUND
HKCRCDO.Message NOT FOUND
"
Hors ces clés n'existent pas. Peux tu me dire si tu as bien ces clés sur ton
PC?
Bonsoir !
Je ne suis pas sûr que MAPI soit accessible de cette façon.
Par contre, CDO, oui.
Voici un exemple d'utilisation de CDO :
Dim str,objEmail
Set objEmail = CreateObject("CDO.Message")
objEmail.From = "toto@titi.com"
objEmail.To = gros.minet@cartoon.com
objEmail.Subject = "message d'essai"
objEmail.Textbody = "Corps (body) du message."
objEmail.AddAttachment "C:vodka.jpg"
objEmail.Send
Wscript.quit
En fait j'ai trouvé. J'ai refait une install d' Outlook avec l'option CDO ce qui a bien installé les clés en question.
Merci pour le code, mais j'ai toujours ce messag d'erreur. Mais j'ai plus d'infos. Avec REgmon (de sysinternal) je peux voir que le code que tu m'as donné accède aux registres suivants (par Wscript):
" HKCRCLSID{B54F3741-5B07-11CF-A4B0-00AA004A55E8}TreatAs NOT found HKCRCLSID{6C736DB1-BD94-11D0-8A23-00AA00B58E10} NOT FOUND HKCRCDO.MessageClsid NOT FOUND HKCRCDO.Message NOT FOUND
" Hors ces clés n'existent pas. Peux tu me dire si tu as bien ces clés sur ton PC?
Bonsoir !
Je ne suis pas sûr que MAPI soit accessible de cette façon. Par contre, CDO, oui.
Voici un exemple d'utilisation de CDO :
Dim str,objEmail Set objEmail = CreateObject("CDO.Message") objEmail.From = "" objEmail.To = objEmail.Subject = "message d'essai" objEmail.Textbody = "Corps (body) du message." objEmail.AddAttachment "C:vodka.jpg" objEmail.Send Wscript.quit
