Le premier site francophone dédié au développement Pocket PC

Comment utiliser POOM avec eVB ?

Chaque Pocket PC est fourni avec une suite de logiciels, Pocket Word, Pocket Excel, Pocket Internet Explorer, et Pocket Outlook. Pocket Outlook vous permet principalement de gérer vos tâches, vos contacts et vos rendez-vous.

Sur chaque Pocket PC, il existe en standard une DLL (pimstore.dll) qui permet depuis eVB et eVC++ d'accéder aux fonctions et données de Pocket Outlook. Cette DLL expose un model objet que l'on appelle POOM, pour Pocket Outlook Object Model.

Nous allons apprendre dans cet article à préparer eVB pour travailler avec POOM et ensuite à accéder à POOM lui même. Nous apprendrons dans d'autres articles à utiliser POOM pour accéder aux tâches, aux contacts et aux rendez-vous.

Préparer le Pocket PC

Vous n'avez rien à faire au niveau de votre Pocket PC, la DLL nécessaire (pimstore.dll) est présente d'origine.

Préparer eVB

Comme POOM est un model objet, il faut indiquer à eVB que vous allez utiliser les références de POOM. Ceci n'est pas une obligation, mais avec cette manipulation, nous aurons toute l'aide de l'IDE de eVB qui complètera le nom des méthodes et des propriétés et nous listera tous les objets de POOM.

Il vous faut copier le fichier pimstore.dll depuis le CD N°2 des Embedded Visual Tools. Cette DLL se trouve (on suppose que votre lecteur de CD est D:) sur "D:\POCKTSDK\PROGRAM FILES\EMULATION\PALM300\WINDOWS". Vous pouvez copier cette DLL dans votre dossier Windows CE Tools (on suppose que le disque où vous avez installé les Embedded Visual Tools est C:) sur "C:\Windows CE Tools\wce300\MS Pocket PC\Desktop". Il faut ensuite enregistrer cette DLL dans le registre de votre PC. Pour celà, double cliquez sur pimstore.dll et choisissez comme programme de lancement Regsvr32.exe qui se trouve dans le dossier système de Windows. Regsvr32 doit vous signaler par une boite de dialogue que l'enregistrement à réussi.

Lancez maintenant eVB, créez un nouveau projet (avec fenêtre), et choisissez dans le menu Project l'item "References".
La première fois, POOM ne fait pas partie de la liste, il vous faut utiliser le bouton "Browse..." et choisir pimstore.dll que vous venez de copier. Là eVB nous indique qu'il va ajouter cette référence (vous répondez oui) et nous nous retrouvons avec POOM (Microsoft Pocket Outlook Object Model v1.0) référencé dans notre projet.

POOM est référencé dans notre projet.

Le point d'entrée vers POOM

POOM possède un objet "Application" qui permet d'effectuer toutes les opérations. Pour instancier cet objet, vous devez taper ce code :

Dim wPoom as PocketOutlook.Application
Set wPoom = CreateObject("PocketOutlook.Application")

Une fois que vous avez instancé l'objet Application, il vous faut vous ouvrir une session en utilisant la méthode Logon :

Dim wOK As Boolean
Dim wMyErr As Long
On Error Resume Next
Call wPoom.Logon
wMyErr = Err.Number
On Error Goto 0
If wMyErr<>0 Then
Msgbox "La méthode Logon a échouée !"
EndIf

Si wMyErr est à zéro, Logon s'est bien passé et vous pouvez commencer à utiliser vraiment POOM.

Lorsque vous avez terminé avec POOM, vous devez utiliser la méthode Logoff pour terminer proprement votre session :

Call wPoom.Logoff

L'objet Application (notre wPOOM) nous donne déjà quelques renseignements sur la configuration de notre Pocket PC :

Voilà pour cette première partie. Vous savez maintenant accéder à POOM.

Microsoft met à notre disposition une documentation (en anglais biensûr) que vous pouvez télécharger ici.

Attention, sur un Pocket PC, il n'est pas nécessaire de remplacer pimstore.dll par une autre version, celle que votre Pocket PC possède d'origine est la dernière version, la plus récente.

La seconde partie vous expliquera comment accéder aux tâches gérées par Pocket Outlook.

Stéphane Sibué