begin process at 2012 02 11 11:16:39
  Trouver un code source :
 
dans
 
[ Dernières recherches ]
Accueil > 

Code

 > 

Tutoriaux

 > COMMUNIQUER AVEC OUTLOOK

COMMUNIQUER AVEC OUTLOOK


 Information sur la source

Note :
1 / 10 - par 1 personne
1,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Tutoriaux Niveau :Débutant Date de création :21/07/2003 Date de mise à jour :30/08/2004 19:53:27 Vu :14 999
Auteur : dragon

Ecrire un message privé
Site perso
Commentaire sur cette source (12)
Ajouter un commentaire et/ou une note

 Description

permet d'envoyer des courriel ou des task par outlook
présentement configurer pour des task, juste à changer cette ligne là : Set objItem = objOLApp.CreateItem(olTaskItem)

oublierz pas de référencier outlook (je sais pas si ça marche avec outlook express)

Source

  • Public Function AssignTask(personne as string, jour as date, sujet as string, texte as string)
  • Dim objOLApp As Outlook.Application
  • Dim objItem As Outlook.TaskItem
  • Dim objRecipient As Outlook.Recipient
  • Set objOLApp = CreateObject("Outlook.Application")
  • Set objItem = objOLApp.CreateItem(olTaskItem)
  • With objItem
  • .Assign
  • Set objRecipient = .Recipients.Add(personne )
  • .DueDate = jour
  • .Subject = sujet
  • .body = texte
  • .Send
  • End With
  • Set objItem = Nothing
  • Set objOLApp = Nothing
  • End Function 
Public Function AssignTask(personne as string, jour as date, sujet as string, texte as string)

Dim objOLApp As Outlook.Application
Dim objItem As Outlook.TaskItem
Dim objRecipient As Outlook.Recipient

Set objOLApp = CreateObject("Outlook.Application")
Set objItem = objOLApp.CreateItem(olTaskItem)

    With objItem
            .Assign

            Set objRecipient = .Recipients.Add(personne )
    
            .DueDate = jour
            .Subject = sujet 
            .body = texte
            .Send
    End With
    
Set objItem = Nothing
Set objOLApp = Nothing
    
    End Function



 Historique

30 août 2004 19:53:27 :
correction de français

 Sources du même auteur

Source avec Zip Source avec une capture Source .NET (Dotnet) RADIOBUTTON EN .NET SUR PLUSIEURS CONTENEURS DIFFÉRENTS
SUPPRIMER LES DOUBLONS D'UNE TABLE (VBA ACCESS)
Source avec Zip Source avec une capture Source .NET (Dotnet) PATRON ITERATEUR, TUTORIAL PATRON 4
Source avec Zip Source avec une capture Source .NET (Dotnet) [VB.NET] FORM AVEC DES SCROLLBARS AUTOMATIQUE
Source avec Zip Source .NET (Dotnet) PATRON OBSERVER, TUTORIAL PATRON 3
Toutes les sources de dragon

 Sources de la même categorie

Source avec Zip DLL PERSONNALISÉ AVEC ÉVÈNEMENTS ET PROPRIÉTÉS EN VB6. par Number7
Source avec Zip Source .NET (Dotnet) EXEMPLE DU TUTORAIL "CLASSES MÉTIER" par Adn56
Source avec Zip Source avec une capture Source .NET (Dotnet) GESTION DES LISTES : RANGEMENT (LIST.SORT) ET FILTRAGE (LIST... par kbalist
Source avec Zip EXEMPLE SUR LES MENUS POUR AIDER LES DÉBUTANTS COMME MOI ;-) par viragoloco
LES OPÉRATIONS DE LA LISTE CHAINÉE par smaili
Toutes les sources de la catégorie Tutoriaux

Commentaires et avis

Commentaire de Frank339 le 22/07/2003 13:57:29

pour moi aucun problème, mais peux tu mettres un zip ?

Commentaire de dragon le 22/07/2003 14:22:56

il y a pas de zip, c,est une méthode à mettre dans un module qui reçoi les valeurs en paramètre

il y a pas d'interface, ni rien de tout ça

Commentaire de surfzoid le 17/10/2005 19:00:05

salut
j ai repris ton principe mais pour les contacts outlook
pour l instant l ajout sous vb.net donne ça:
    Public Function AssignTask(ByVal personne As String, ByVal jour As Date, ByVal sujet As String, ByVal texte As String)

        Dim objOLApp As Outlook.Application
        Dim objItem As Outlook._ContactItem
        Dim objRecipient As Outlook.ContactItem

        objOLApp = CreateObject("Outlook.Application")
        objItem = objOLApp.CreateItem(Outlook.OlItemType.olContactItem)

        With (objItem)
            .FullName = "zztest"
            .Email1Address = "zz@test.com"
            .Save()
        End With

        objItem = Nothing
        objOLApp = Nothing

    End Function

mais je but dejas sur un probleme qui est les sous dossiers de mon dossier contacts
en suite il suffira de rajouter dans l onglet champs une "id" unique un peut comme sur une base de données et on obtient la possibilité d un carnet partagé ou syncronisé sur son reseau local

Commentaire de surfzoid le 17/10/2005 19:02:28

dsl j ai oublier d enlever la ligne Dim objRecipient As Outlook.ContactItem
et de dire aussi que c est hyper chaud de trouver de la doc, dans les tooltips lors d une survol par exemple de "Outlook._ContactItem" y a nada comme aide on ait vraiment obliger de tout deviner

Commentaire de schumileboss le 17/07/2006 17:57:58

J'ai mis la première fonction dans ma page. Mais vs2003 souligne tous les Outlook.* en me disant que le type n'est pas défini.
Il n'y a pas un namespace à ajouter?

Merci
mickael

Commentaire de dragon le 17/07/2006 18:26:03

t'as pas référencier Outlook

Commentaire de schumileboss le 18/07/2006 09:38:36

Et comment je fait pour le référencier?

Merci

Commentaire de dragon le 18/07/2006 23:41:48

où que je suis il est pas installer, donc je vais te dire les termes de mémoire

en VB6.0, tu dois faire Ctrl + T
Sous access, ouvre un module et dasn les menu ça s'appel références
Sous Vb.net, dans ta liste de fichier, tu as référence en haut complètement

Commentaire de schumileboss le 24/07/2006 09:51:32

Merci j'ai réussi.
Bonne journée

Commentaire de ManuAntibes le 28/06/2007 08:41:21

Salut

j'ai ce message d'erreur avec Visual Basic 2005 express.
Sur la ligne de code  "objItem = objOLApp.CreateItem(Outlook.OlItemType.olContactItem)"

Impossible d'effectuer un cast d'un objet COM de type 'System.__ComObject' en type d'interface 'Microsoft.Office.Interop.Outlook.TaskItem'. Cette opération a échoué, car l'appel QueryInterface sur le composant COM pour l'interface avec l'IID '{00063035-0000-0000-C000-000000000046}' a échoué en raison de l'erreur suivante : Cette interface n'est pas prise en charge (Exception de HRESULT : 0x80004002 (E_NOINTERFACE)).

Que dois je faire ??
Merci

Commentaire de dragon le 28/06/2007 15:30:19

ce n'est pas un code .Net tout simplement
tu peux faire dequoi de semblable,mais tu devras adapter.

.Net permet de recevoir des référence COM, donc il ne devrait pas avoir de problème de ce côté.

Mais, je n'ai plus retouché à Outlook depuis longtemps

Commentaire de lionyz le 27/06/2011 14:45:11

Bonjour,

Le code Vb6 fonctionne pour envoyer un texte
Quel est le code pour envoyer une imege ou Logo(fichier .bmp)comme en-tête du texte
Merci de votre aide

 Ajouter un commentaire

Nos sponsors


Sondage...

Comparez les prix


Archos 7 home tablet - 2 Go
Entre 149€ et 159€

Visiter le guide achat

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode
 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 1,357 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales
Outils Convertisseur VB/C# Snippets et scripts Outils en ligne La ToolBox
Communauté Programmation Photographie Technologie Newsgroups Emploi Forum Blogs
Guide d'achat Téléphonie mobile Image et son Informatique Bureautique Jeux vidéo
Logiciels Internet & Réseau Développement Market Android Jeux & Loisirs Graphisme Multimédia Sécurité Pilotes
Loisirs Cartes virtuelles Vidéos droles Jeux en ligne Géoguide AndroLib (Android Market)