Vraag : hoe te om e-mailpunten van één omslag aan een andere op een programma te bewegen dat op een datumcriteria wordt gebaseerd in vooruitzichten.

De regels van vooruitzichten (als automatisch teweeggebracht) behandelen tegelijkertijd slechts één enkele e-mail.  Ook, wordt de regel typisch slechts teweeggebracht wanneer een e-mail wordt ontvangen of sent.

What die ik aan 1) trekker zou houden van is een actie (bewegingsbericht) betreffende een programma (elke nacht), 2) gebaseerd op een datum ontvangen Archief criteria.

Auto geen it. zal snijden

Antwoord : hoe te om e-mailpunten van één omslag aan een andere op een programma te bewegen dat op een datumcriteria wordt gebaseerd in vooruitzichten.

Dit zou het moeten doen.  „Indien“ Ik zeg omdat ik geladen geen 2010 heb en niet tegen het kan testen.  Ik testte het gebruiken van 2007 en het werkte boete.  Volg deze instructies om de code te gebruiken.

1.  Open Blocnote
2.  Kopi�ër de code en kleef het in Blocnote
3.  Sparen het dossier met een .vbs uitbreiding
4.  Cre�ër een geplande taak
5.  Plaats de taak om dit manuscript in werking te stellen
6.  Het manuscript neemt drie parameters: srcFolderPath tgtFolderpath Dagen
     waar
          srcFolderPath is de weg aan de omslag van Vooruitzichten om te bewegen punten van (sluit de weg in citaten in als het een ruimte bevat)
          tgtFolderPath is de weg aan de punten van de de omslag tp beweging van Vooruitzichten aan (sluit de weg in citaten in als het een ruimte bevat)
          De dagen is de leeftijd van berichten u zich wilt bewegen (d.w.z. slechts die die als oud of ouder dan xdagen zijn)
     voorbeeld
          „brievenbus - de damhinde, john \ inbox“ files \ 2010 7 zou dit alle punten bewegen die 7 of meer dagen oud van Onbekende inbox aan een omslag die 2010 in de pstdossier genoemde Files zijn wordt genoemd

     De de omslagwegen van vooruitzichten zijn geen verschillend van de omslagwegen van het dossiersysteem met één uitzondering: zij gebruiken geen aandrijvingsbrief.  De weg aan om het even welke omslag van Vooruitzichten is de naam van elke omslag van de wortel aan de doelomslag.

7.  Test het manuscript door de taak onmiddellijk in werking te stellen.
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:
52:
53:
54:
55:
56:
57:
58:
59:
60:
61:
62:
63:
64:
65:
66:
67:
68:
69:
70:
71:
72:
73:
74:
75:
76:
77:
78:
79:
80:
81:
82:
83:
84:
85:
86:
87:
88:
89:

Schemerige strSrcFolder, strTgtFolder, varDays, olkApp, olkSes, olkSrc, olkTgt, olkLst, olkItm, intCnt
Als WScript.Arguments.Count < 3="" Then="" WScript="">= 12 toen
	    AMPM = „PM“
	Anders
	    AMPM = „AM“
	Eind als
De Functie van het eind

Functie OutlookFolderExists (strFolderPath)
    „Doel: Tests om te zien of bestaat een omslag van Vooruitzichten gebaseerd op een wegkoord.“
    „Geschreven: 4/24/2009“
    „Auteur:  BlueDevilFan“
    „Vooruitzichten: Alle versies“
    OutlookFolderExists = (TypeName (OpenOutlookFolder (strFolderPath))  <> „Niets“)
De Functie van het eind

Functie OpenOutlookFolder (strFolderPath)
    „Doel: Opent een omslag van Vooruitzichten van een omslagweg.“
    „Geschreven: 4/24/2009“
    „Auteur:  BlueDevilFan“
    „Vooruitzichten: Alle versies“
    Schemerige arrFolders, varFolder, bolBeyondRoot
    Op Fout hervat daarna
    Als strFolderPath = "" toen
        Vastgestelde OpenOutlookFolder = niets
    Anders
        Doe terwijl Weggegaan (strFolderPath, 1) = „\“
            strFolderPath = Juist (strFolderPath, Len (strFolderPath) - 1)
        Lijn
        arrFolders = verdelen (strFolderPath, „\“)
        Voor Elke varFolder in arrFolders
            Selecteer Geval bolBeyondRoot
                Vals geval
                    Vastgestelde OpenOutlookFolder = olkSes.Folders (varFolder)
                    bolBeyondRoot = Waar
                Waar geval
                    Vastgestelde OpenOutlookFolder = OpenOutlookFolder.Folders (varFolder)
            Uitgezocht eind
            Als Err.Number <> 0 toen
                Vastgestelde OpenOutlookFolder = niets
                Uitgang voor
            Eind als
        Daarna
    Eind als
    Op Fout GoTo 0
De Functie van het eind
Andere oplossingen  
 
programming4us programming4us