Discussion :

[ylabarre]

Bonjour,

j'ai un vbscript qui permet de lancer deux macros vb developpez pour Outlook 2003. Le script appel deux fonctions de Outlook qui lancées depuis le module de dev marche tres bien.
Par contre le script lui marche mais de des fois impossible que celui ci marche, je ne comprends absolument rien. Les deux fois que cela me le fait c'est quand je me delogue de mon poste... De plus j'ai réussi une fois a le refaire mais je ne sais même pas comment j'ai fait

Voici le script :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
'############## DEBUT ###############
'Date : 07 juillet 2007
'Lance une macro d'OUTLOOK quand celui ci est ouvert
   Dim theApp, theNameSpace, theMailItem
     Set theApp = WScript.CreateObject("Outlook.Application")
 On error resume next
 
'ici on lance la macro d'exportation des contacts et du calendrier d'OUTLOOK
Call theApp.ExportContacts
Call theApp.ExportCalendar
 
  set theApp = Nothing
  Set theNameSpace= Nothing
  Set theMailItem= Nothing
'############## FIN ##############################"

Je tiens a préciser que pour qu'il puisse fonctionner Outlook doit bien evidemment être deja lancer.

Lorsque je vais dans la ligne de commande dos je lance le script est rien ne se passe...

S'il vous plait help me !!! Merci pour votre aide.

[ced600]

Enlève la ligne :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

On error resume next

Relance ton script et dit nous si une erreur est généré, et tant qu'à faire donne nous la description de l'erreur.
Cette ligne de code permet au script de continuer à s'exécuter même quand il y a une erreur, c pratique pour éviter que le script s'arrête en cas d'erreur mais c moyen pour débuguer.

[ylabarre]

Merci pour ton aide

En effet j'ai bien une erreur!

la voici :

Script : C\Temp\Export.vbs
Ligne : 10
Caract. : 1
Erreur : Cet objet ne gère pas cette propriété ou cette méthode: 'ExportContacts'
Code : ....
SOurce : Erreur d'execution Microsoft VBscirpt

C'est incroyable qu'il me dise qu'il ne reconnait pas ma fonction ExportContact car celle ci se nomme bien comme ça dans mon module de dev Outlook. Et le pire c'est que pourtant le script fonctionnai deja avant
Je n'y comprend rien!!

[ced600]

Je pense que cette ligne ne marche pas :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Set theApp = WScript.CreateObject("Outlook.Application")

Elle ne crée pas ton objet. essaye :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Set theApp = CreateObject("Outlook.Application")

[ylabarre]

Malheureusement ton idée ne fonctionne pas. j'ai la même erreur.

Je ne sais pas trop quoi faire. Est ce dû a mon projet sous Outlook mal déclaré ou je ne sais quoi ?
De plus peut etre est ce du au fait que pour créer le .vbs je créer un nouveau document texte que je renomme en .vbs et l'ouvre avec le bloc notes pour y mettre le code (insertion de caractere sans m'en rendre compte lors de l'enregistrement) ?

[SfJ5Rpw8]

à priori ... on contraire d'excel le VBA d'outlook ne connaît pas la méthode Run qui pourrai te permettre le lancement d'une macro ....

que contiennent tes 2 macros :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
Call theApp.ExportContacts
Call theApp.ExportCalendar

ne peu-tu pas déplacer ce code dans le .VBS..?