Forums Neueste Beiträge
 

Application.CreateItem

27/01/2009 - 22:12 von Thomas Gahler | Report spam
Hallo zusammen

Und gleich noch eine zweite Frage.

Mit 'Application.CreateItem(olContactItem)' kann ich einen neuen Kontakt
anlegen. Nur dieser Kontakt wird im 'Kontakte-Ordner' angelegt. Im
Objektmodell habe ich keine Methode gefunden, die einen Kontakt zu einem
bestimmten Ordner anlegt.

So stelle ich mir das vor:
- Set olOrdner = olApp.Session.GetFolderFromID(<HierDieNummer>)
- Set olKontakt = olOrdner.CreateItem(olContactItem)
geht so was àhnliches auf irgendeinem Weg?

Oder ganz einfach, wie legt ihr einen Kontakt in einem bestimmten Ordner an?



Zweite Frage:
Habe hier zu Hause kein Exchange und deshalb die Frage ohne überhaupt etwas
zu prüfen können.
- Können Kontakte-Ordner in den 'Öffentlichen Ordner' als schreibgeschützt
dem Anwender zur Verfügung gestellt werden?
- Falls ja gibt es eine Eigenschaft, die ich abfragen kann ob der Ordner
'nur lesend' oder auch mit 'schreibrechten' im Zugriff steht?


Besten Dank für alle Tipps



Thomas Gahler
MVP für Word
Co-Autor von »Microsoft Word-Programmierung.
Das Handbuch« (MS Press)


- Windows Vista (SP1), Office 2007 (SP?)
 

Lesen sie die antworten

#1 Peter Marchert
28/01/2009 - 06:59 | Warnen spam
On 27 Jan., 22:12, "Thomas Gahler"
wrote:
Hallo zusammen



Guten Morgen Thomas,

Und gleich noch eine zweite Frage.

Mit 'Application.CreateItem(olContactItem)' kann ich einen neuen Kontakt
anlegen. Nur dieser Kontakt wird im 'Kontakte-Ordner' angelegt. Im
Objektmodell habe ich keine Methode gefunden, die einen Kontakt zu einem
bestimmten Ordner anlegt.



Sub test()

Dim objFolder As Folder
Dim objContact As Outlook.ContactItem

Set objFolder = Outlook.Session.GetDefaultFolder
(olFolderContacts).Folders("test")
Set objContact = objFolder.Items.Add(olContactItem)

objContact.Save

Set objContact = Nothing
Set objFolder = Nothing

End Sub

Zweite Frage:



Das ist schon die dritte Frage ;-)

Habe hier zu Hause kein Exchange und deshalb die Frage ohne überhaupt etwas
zu prüfen können.
- Können Kontakte-Ordner in den 'Öffentlichen Ordner' als schreibgeschützt
dem Anwender zur Verfügung gestellt werden?



Mit der Redemption können Rechte gelesen und geschrieben werden:

http://www.dimastr.com/redemption/rdo/RDOACL.htm.
http://www.dimastr.com/redemption/rdo/RDOACE.htm

Freundlicher Gruß
Peter Marchert

Infos, Workshops & Software für
Outlook®: www.outlook-stuff.com

Ähnliche fragen