[vba] outlook elke x uur iets laten doen of bij afsluiten

[Verwijderd]

Ik heb een script laten maken die een soort html agenda op intranet plaatst zodat iedereen de agenda's van anderen kunnen inzien. Deze heb ik in Outlook (XP) geimplementeerd. Ik kan dit script automatisch laten uitvoeren bij de start van outlook. Ik zou het liever laten uitvoeren bij het afsluiten (want dan zijn immers nieuwe agenda items ingevoerd en mogelijk wordt de pc een week niet meer aangezet waardoor de html agenda niet is bijgewerkt) maar helaas krijg ik dan een foutmelding:
Run-time error: 2147467259 (80004005), automation error, unspecified error. Bij debug geeft ie aan dat ***Set MyApp = CreateObject("Outlook.Application")*** het probleem is. Zoeken in MS help database leverde me niets op.

Dus indien hier een oplossing voor is dan hoor ik het wel. Ik kan in ieder geval niets vinden.

Een andere oplossing zou zijn om bv elke x uur automatisch het script te laten uitvoeren. Echter zit er in VBA geen optie hiervoor in. Iemand een mogelijke oplossing?

[Bud_s]

Die error zegt mij nix (ook niet gezocht overigens)

Wel lijkt het me dat als het script ontworpen is om na de start van outlook iets te doen, het script er dan ook van uit gaat dat outlook draait.

Als jij het doet met het afsluiten, kan het weleens zijn dat het script nog draait terwijl jij outlook al aan het afsluiten is.

Het beste zou je (als je ieder uur wil sturen) iets moeten doen met de windows scheduler (zie FAQ).
En het script zal moeten checken of outlook open is, zoniet het misschien zelf openen.

edit:
Ik zie nu pas dat het VBA is
Beetje onhandig om te starten vanaf de cmdline.
Ga eens op zoek naar een API voor die schedule functie ...

edit2:
misschien heb je hier wat aan.
Dat is dus een sleep functie, laat hem lekker een uur slapen, en laat dan de VBA weer de agenda bijwerken. Ik ben overigens wel benieuwd naar je code

[ Voor 31% gewijzigd door Bud_s op 30-10-2003 19:05 ]

[Verwijderd]

Als je het script wil zien moet je me even je email adres oid doen toekomen....