SVM n°214 avril 2003
SVM n°214 avril 2003
  • Prix facial : 4 €

  • Parution : n°214 de avril 2003

  • Périodicité : mensuel

  • Editeur : Excelsior Publications

  • Format : (204 x 280) mm

  • Nombre de pages : 202

  • Taille du fichier PDF : 178 Mo

  • Dans ce numéro : virus... prévenir, guérir et éradiquer.

  • Prix de vente (PDF) : gratuit

Dans ce numéro...
< Pages précédentes
Pages : 186 - 187  |  Aller à la page   OK
Pages suivantes >
186 187
internez en étapes Créez une boîte pour surveiller vos mails Fabriquer une boîte de dialogue qui vous indique que vous avez du courrier dans la boîte à lettres, c'est plutôt utile pour les heureux possesseurs d'une connexion permanente. L'exercice pourra aussi satisfaire ceux qui rêvent de modeler Outlook, ce machin à tout faire, à leur propre main. Voici donc un exercice Construisez une boîte d'alerte Contrôles I k I A ablEl3 V herojer t 0 IM uftlouve Beide'Click 11.1 3 Intitulé YI Entrez dans l'éditeur de langage Basic par le menu Outils Macro, Visual Basic Editor (raccourci Alt + F11). Private Sub BtHide_Click() Ne.Hide End Sub pour assurer la gestion de certains événements dans Outlook. Notre boîte de dialogue indiquera dans un premier temps la date et l'heure d'arrivée du message et, ensuite, le nom de l'expéditeur du dernier message reçu. Une fois l'exercice maîtrisé, vous améliorerez ces routines, mais attention aux interférences avec les règles de message ! — François Dupin Commencez par créer une fenêtre dans laquelle s'inscriront divers messages. Pour ce faire, choisissez le menu Associez l'alerte à l'arrivée des messages Double-cliquez sur le bouton, la fenêtre de code associé apparaît. La liste de gauche présente les objets disponibles dans ce module. La liste de droite est la liste des procédures associées à l'objet sélectionné : déroulezla pour voir ce que l'on peut faire à un bouton. Ici, dans la 150 svni Avril 2003 Projetl (VbaProject.OTM) L7Jt Microsoft Outlook Objets CetteSessionOu Feuilles l ufNouveauMessage procédure associée au clic, nous inscrivons Me.Hide, qui demande à la fenêtre de se cacher. Rendez-vous maintenant dans l'arborescence du projet, ouvrez Microsoft Outlook Objets en cliquant sur la petite croix, puis double- Insertion, UserForm ; une fenêtre vierge apparaît dans l'espace de montage. Si la boîte à outils n'apparaît pas, cliquez sur le menu Affichage, Boîtes à outils. Cette boîte contient les objets à placer dans une fenêtre : il suffit de cliquer sur un objet, puis sur le fond de cliquez sur Cette Session Outlook pour faire apparaître l'emplacement du code. Ce module ne comporte qu'un objet, l'objet Application. Dans la liste des procédures, choisissez NewMail. Cela crée la procédure ApplicationNewMail, qui s'exécute à Outlook 2000 [- Cher'olnd Laban Lobe Laban "AiRWRI11 «.1111 confirmé la fenêtre. Placez ainsi trois intitulés (labels), l'un au-dessus de l'autre, et un bouton. Reste à aménager tout ça en déplaçant les objets et en réglant leur taille suivant vos désirs ; vous pourrez toujours y revenir pour réaménager la fenêtre en fonction de ce que vous voulez y afficher. PillibaProjc.cLOTM Cel ; cSessionWutiodk(Code) Lao5* ! Application 2d ! Newldld au Private Sub ApplicationNewReili)... UfflouvenuRensnge.Show With UTNouveanileesage.DateResenge.Ctiption - Nov I.Repeint End With End Sun I, ILI Comminedton1 l'arrivée de mails. Les lignes que nous avons écrites affichent d'abord la forme que nous avons construite (ufNouveauMessage), puis met la date du jour dans le label DateMesssage et, enfin, actualise ce label (Paint). Cette procédure ne traite la réception que globalement. Elle ne permet donc pas de traiter chaque mail reçu.
Détournez les alarmes placées dans le calendrier pour qu'elles vous renvoient automatiquement un mail à une autre adresse ou, mieux, un SMS sur votre portable. Les plus étourdis pourront même aller jusqu'à faire envoyer automatiquement les mails de bon anniversaire, bonne Public Sub Inttroldere)objls, As Outicok.AppItcettoe) End Sub Duo ob>MS Outiook.MmeSpece Set obed9 cbjApp.Getnemespece).EAPI.) Set message. obj..Cetnereultralder (olrelderrabos) Tteme Set objNS - enclume Privete 3).0 neeltemtddleyVel ssag Item As Object) tf Item.Cless olle,l nen drnouvemuSeesege.Show End Sub Paramétrez la boîterfflrellffleNTIIMetreilk.. ufrairereauMessage UserformAlphabétique Par catégorie El Apparence BackCola ❑ er-1600000OFtt 6orderColor 8d180000012OE Bor der5tyle 0 - imflorcierStyieNone —Alerte message FcreColor atep0000tm SpecialEffect 6 - frr6peckalEffectBump El Comportement Cycle 0 frnCycleAlForms Enabled True RightToief t Faire 5hoffloclal False El Défilement reepScrollarsrisible 0 - frecroltarstrone ScrolBars 0 - frecrolearseione Scrolheight 0 ScrolLeft 0 ScrotTop ScrolMhdth D Divers (Name) uffioureauMessace Privete WithEvects manne As Outlock.Itess Eith IIEMouveaullessage End MISS End Tt.Expedtteux.CeptIon Item.SentlerMare Iepmlnt Primate Sub Cleattjermlnatell Set meesege lied suri année, ou autres. Des exemples, qui nous ont inspirés, sont fournis dans un article nommé "Responding to Outlook Events in VBA", à l'adresse : http://msdn. microsoft.com/library/default.asp ? url=/library/en-us/dnolbk02/html/odc_ch11olevents.asp. Ils sont en anglais. Faites apparaître la fenêtre Propriétés (bouton droit sur un objet). Cette fenêtre montre maintenant les propriétés de l'objet sélectionné : cliquez (avec la flèche de sélection) sur un autre objet et la liste se modifie. Le nom et le type de l'objet s'affichent dans la liste déroulante en haut des propriétés. Commencez par régler votre boîte d'alerte. D'abord, nommez-la : dans Names, tapez ufNouveauMessage. Pour afficher Alerte message dans la barre de la fenêtre, modifiez Caption. Pour qu'elle Scrutelles messages un à un Pour gérer les messages en arrivée, il faut surveiller le dossier Boîte de réception. — Pour cela, créez un Module de classe : menu Insertion, Module de classe. Nommez ce module FolderEvents via la fenêtre Propriétés. Dès que vous tapez la première ligne de code (WithEvents...), l'objet message s'ajoute dans la liste déroulante des objets. Sélectionnez-le, et, dans la liste procédure, constatez que ses événements y apparaissent. L'événement Alerte message Dernier message reçu aabell ne vous empêche pas de travailler lorsqu'elle est ouverte, choisissez False, dans Show modal. Enfin, pour laisser l'emplacement de la fenêtre à l'utilisateur, choisissez Manual, dans Startup position (Position). itemAdd se produira a chaque fois qu'un item est ajouté dans un dossier (ici, nous nous contenterons d'inscrire l'auteur du message dans le libellé Expéditeur). C'est la procédure InitFolders qui met l'objet Message en liaison avec la boîte de réception (olFolderinbox). Il faut exécuter cette procédure Virdi`dt t, 10.1 t) r X i Application Dim m_folderevents le New Folder[vents Peinte 0116 Appt icac ton_Scecc foldereventa.Intcroldera Application [ne s",à, iU dans le même esprit Demandez de l'aide Placez le curseur sur un mot-clé,ou sélectionnez-le, puis pressez la touche F1. Si ce mot est connu, l'aide s'ouvre directement à la bonne page. N'hésitez pas alors à suivre les liens, et à regarder les exemples. Triez les messages Vous pouvez afficher les messages prioritaires. A l'arrivée d'un message, testez son importance et ne vous laissez déranger que s'il présente de l'intérêt. Vous pouvez aussi mettre en quarantaine des messages contenant certaines expressions. Pour avoir une idée de ces procédures, rendez-vous sur le site indiqué dans l'encadré "Aller plus loin" (ci-contre). Le code de notre programme est disponible sur : pratiquesvm.vnunet/svm214/outlookbasic.htm Cliquez ensuite sur le premier label. Dans Caption, Cacher inscrivez Dernier message reçu. Pour les deux labels suivants, vous ne changerez que leurs noms : dans Name, inscrivez respectivement DateMessage et Expéditeur (leur contenu sera modifié par le programme). Quant au bouton, nommez-lebtHide. afin que Message soit disponible, retournez donc dans CetteSessionOutlook et ajoutez-y la procédure Startup, qui s'exécute au démarrage d'Outlook (modifiez-la si elle existe déjà). Pour qu'elle s'exécute, il faut quitter Outlook et le relancer (ou placer le curseur dans la procédure et appuyer sur F5). Reste à attendre de recevoir des mails, ou à les envoyer vous-même. Avril 2003 svm 151



Autres parutions de ce magazine  voir tous les numéros


Liens vers cette page
Couverture seule :


Couverture avec texte parution au-dessus :


Couverture avec texte parution en dessous :


SVM numéro 214 avril 2003 Page 1SVM numéro 214 avril 2003 Page 2-3SVM numéro 214 avril 2003 Page 4-5SVM numéro 214 avril 2003 Page 6-7SVM numéro 214 avril 2003 Page 8-9SVM numéro 214 avril 2003 Page 10-11SVM numéro 214 avril 2003 Page 12-13SVM numéro 214 avril 2003 Page 14-15SVM numéro 214 avril 2003 Page 16-17SVM numéro 214 avril 2003 Page 18-19SVM numéro 214 avril 2003 Page 20-21SVM numéro 214 avril 2003 Page 22-23SVM numéro 214 avril 2003 Page 24-25SVM numéro 214 avril 2003 Page 26-27SVM numéro 214 avril 2003 Page 28-29SVM numéro 214 avril 2003 Page 30-31SVM numéro 214 avril 2003 Page 32-33SVM numéro 214 avril 2003 Page 34-35SVM numéro 214 avril 2003 Page 36-37SVM numéro 214 avril 2003 Page 38-39SVM numéro 214 avril 2003 Page 40-41SVM numéro 214 avril 2003 Page 42-43SVM numéro 214 avril 2003 Page 44-45SVM numéro 214 avril 2003 Page 46-47SVM numéro 214 avril 2003 Page 48-49SVM numéro 214 avril 2003 Page 50-51SVM numéro 214 avril 2003 Page 52-53SVM numéro 214 avril 2003 Page 54-55SVM numéro 214 avril 2003 Page 56-57SVM numéro 214 avril 2003 Page 58-59SVM numéro 214 avril 2003 Page 60-61SVM numéro 214 avril 2003 Page 62-63SVM numéro 214 avril 2003 Page 64-65SVM numéro 214 avril 2003 Page 66-67SVM numéro 214 avril 2003 Page 68-69SVM numéro 214 avril 2003 Page 70-71SVM numéro 214 avril 2003 Page 72-73SVM numéro 214 avril 2003 Page 74-75SVM numéro 214 avril 2003 Page 76-77SVM numéro 214 avril 2003 Page 78-79SVM numéro 214 avril 2003 Page 80-81SVM numéro 214 avril 2003 Page 82-83SVM numéro 214 avril 2003 Page 84-85SVM numéro 214 avril 2003 Page 86-87SVM numéro 214 avril 2003 Page 88-89SVM numéro 214 avril 2003 Page 90-91SVM numéro 214 avril 2003 Page 92-93SVM numéro 214 avril 2003 Page 94-95SVM numéro 214 avril 2003 Page 96-97SVM numéro 214 avril 2003 Page 98-99SVM numéro 214 avril 2003 Page 100-101SVM numéro 214 avril 2003 Page 102-103SVM numéro 214 avril 2003 Page 104-105SVM numéro 214 avril 2003 Page 106-107SVM numéro 214 avril 2003 Page 108-109SVM numéro 214 avril 2003 Page 110-111SVM numéro 214 avril 2003 Page 112-113SVM numéro 214 avril 2003 Page 114-115SVM numéro 214 avril 2003 Page 116-117SVM numéro 214 avril 2003 Page 118-119SVM numéro 214 avril 2003 Page 120-121SVM numéro 214 avril 2003 Page 122-123SVM numéro 214 avril 2003 Page 124-125SVM numéro 214 avril 2003 Page 126-127SVM numéro 214 avril 2003 Page 128-129SVM numéro 214 avril 2003 Page 130-131SVM numéro 214 avril 2003 Page 132-133SVM numéro 214 avril 2003 Page 134-135SVM numéro 214 avril 2003 Page 136-137SVM numéro 214 avril 2003 Page 138-139SVM numéro 214 avril 2003 Page 140-141SVM numéro 214 avril 2003 Page 142-143SVM numéro 214 avril 2003 Page 144-145SVM numéro 214 avril 2003 Page 146-147SVM numéro 214 avril 2003 Page 148-149SVM numéro 214 avril 2003 Page 150-151SVM numéro 214 avril 2003 Page 152-153SVM numéro 214 avril 2003 Page 154-155SVM numéro 214 avril 2003 Page 156-157SVM numéro 214 avril 2003 Page 158-159SVM numéro 214 avril 2003 Page 160-161SVM numéro 214 avril 2003 Page 162-163SVM numéro 214 avril 2003 Page 164-165SVM numéro 214 avril 2003 Page 166-167SVM numéro 214 avril 2003 Page 168-169SVM numéro 214 avril 2003 Page 170-171SVM numéro 214 avril 2003 Page 172-173SVM numéro 214 avril 2003 Page 174-175SVM numéro 214 avril 2003 Page 176-177SVM numéro 214 avril 2003 Page 178-179SVM numéro 214 avril 2003 Page 180-181SVM numéro 214 avril 2003 Page 182-183SVM numéro 214 avril 2003 Page 184-185SVM numéro 214 avril 2003 Page 186-187SVM numéro 214 avril 2003 Page 188-189SVM numéro 214 avril 2003 Page 190-191SVM numéro 214 avril 2003 Page 192-193SVM numéro 214 avril 2003 Page 194-195SVM numéro 214 avril 2003 Page 196-197SVM numéro 214 avril 2003 Page 198-199SVM numéro 214 avril 2003 Page 200-201SVM numéro 214 avril 2003 Page 202