Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1546 connectés 

  FORUM HardWare.fr
  Programmation
  XML/XSL

  recuperer le contenu d'un mail

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

recuperer le contenu d'un mail

n°1113646
nico92270
Posté le 09-06-2005 à 10:34:15  profilanswer
 

Bonjour a tous,
 
voila, je travaille sous access et je dois récupérer le contenu d'un mail dont le sujet est "Alerte seveur" tous les jours automatiquement.
J'ai trouvé sur ce forum un sujet la-dessus mais je comprends pas bien:
 
http://forum.hardware.fr/hardwaref [...] 8422-1.htm
 
Ou faut-il que j'insere les lignes de FGA dans les lignes de code de |||||||
 
Merci d'avance a qui pourra m'aider..

mood
Publicité
Posté le 09-06-2005 à 10:34:15  profilanswer
 

n°1114441
betsamee
Asterisk Zeperyl
Posté le 09-06-2005 à 17:05:07  profilanswer
 

tu dois programmer le vba de ton outlook
tu dois aller dans la section ThisOutlookSession
et y mettre ton code vba
Petit exemple utile:

Code :
  1. Private Sub olInboxItems_ItemAdd(ByVal Item As Object)
  2.    
  3.     Dim Ind As Integer
  4.     Dim WSHShell
  5.     Dim ligne As String
  6.     Dim chemin As String
  7.     Dim PJ As Attachment
  8.     Dim rejet
  9.     Dim Ok
  10.     Set rejet = CreateItem(olMailItem)
  11.     Set Ok = CreateItem(olMailItem)
  12.    
  13.     Set WSHShell = CreateObject("wscript.shell" )
  14.     ' si un nouveau message arrive
  15.     chemin = "d:\XXXXX\"
  16.     On Error Resume Next
  17.    
  18.    
  19.     If Item.Class = olMail Then
  20.                                      
  21.                     'copie le fichie
  22.                     'et lance le traitement                     If InStr(1, Item.Subject, "toto" ) <> 0 Then
  23.                        
  24.                          If Item.Attachments.Count > 0 Then
  25.                             Set PJ = Item.Attachments.Item(1)
  26.                             If InStr(1, PJ.DisplayName, "tutu" ) <> 0 Then
  27.                               chemin = chemin & PJ.DisplayName
  28.                               PJ.SaveAsFile (chemin)
  29.                               chemin = "msaccess "
  30.                               chemin = chemin & """"
  31.                               chemin = chemin & "d:\XXXX\XXX.mdb "
  32.                               chemin = chemin & """"
  33.                               chemin = chemin & " /x taMacro /cmd " & PJ.DisplayName
  34.        shell(chemin)
  35.                             Set PJ = Nothing
  36.                             Else
  37.                             If Item.Attachments.Count = 2 Then
  38.                               Set PJ = Item.Attachments.Item(2)
  39.                                  If InStr(1, PJ.DisplayName, "tutu" ) <> 0 Then
  40.                                  chemin = chemin & PJ.DisplayName
  41.                                  PJ.SaveAsFile (chemin)
  42.                                  chemin = "msaccess "
  43.                                  chemin = chemin & """"
  44.                                  chemin = chemin & "d:\XXX\toto.mdb "
  45.                                  chemin = chemin & """"
  46.                                  chemin = chemin & " /x taMacro /cmd " & PJ.DisplayName
  47.                            '      RunProcess (chemin)
  48.                                 End If
  49.                             End If
  50.                             End If
  51.                         End If
  52.                     End If
  53.                   End If


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  XML/XSL

  recuperer le contenu d'un mail

 

Sujets relatifs
[Jsp/Java] Récupérer les propriétés d’une imageProbleme mail en php
Récupérer l'heure du système avec un std::vector<int>importer des noms contenu dans un fichier excel dans outlook
Récupérer le contenu de répertoiresRécupérer l'index d'un item d'un array constant
Récupérer une variable d'environnement[VBS] Coment recupérer ...
récupérer du texte saisie 
Plus de sujets relatifs à : recuperer le contenu d'un mail


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR