[VBA-Outlook XP] folder instellen en item een waarde geven

[Verwijderd]

situatie:
ik heb een form (ContactItem) gemaakt met een knop erop, ik wil dat wanneer er op deze knop wordt gedrukt een nieuw probleem (PostItem) wordt gemaakt, die gekoppeld is met die ContactItem..

ik had hiervoor het volgende al gemaakt, het wil me alleen niet lukken:

code:

Sub cmdProblemen_Click()
    Dim myNameSpace
    Dim myFolder
    Dim myItem
    Dim myItems

    Dim pobjPageGeneral
    Dim klantField

    'het instellen van de folder waar de problemen in opgeslagen moeten worden
    Set myNameSpace = Application.GetNameSpace("MAPI") 
    Set myFolder    = myNamespace.PickFolder
    Set myItems     = myFolder.Items 
    Set myItem      = myItems.Add("IPM.Post.probleem")

    'een nieuw probleem creëren
    Set pobjPageGeneral = myItem.GetInspector.ModifiedFormPages("Bericht")
    Set klantField      = pobjPageGeneral.Controls("Klant")
    klantField.Text     = EntryID
    myItem.Display
End Sub

ik gebruik nu myNamespace.PickFolder... op deze manier moet je elke keer als je op het knopje drukt een map selecteren waar je het PostItem wilt gaan posten... ik wil dit graag vantevoren instellen... (de folder moet zijn: "myHelpdesk\Problemen")
hoe ik dit moet doen snap ik alleen niet, de meeste voorbeelden die ik vind maken gebruik van de DefaultFolders... en met de methode Folders() wil het mij ook niet echt lukken, blijf foutmelding krijgen "onbekend object" of "onbekende foutmelding"
dus weet iemand hoe ik dat kan doen??

wie kan mij helpen??

[ Voor 29% gewijzigd door Verwijderd op 14-05-2003 09:45 ]