Suche | Statistiken | Benutzerliste | Access-FAQ | Datenschutz Foren
donkarl Forum
donkarl Forum ->  Themen -> Access -> Diskussion ansehen

Du bist als Gast eingelogt. ( Anmelden | Registrieren )
  • Outlook Kontakte auslesen vs. Kontakte anzeigen...
  • swetrain27.09.13 17:42
       └ RE: Outlook Kontakte auslesen vs. Kontakte anzei... Karlsruher07.10.13 12:35
  • Beziehungen prüfen
  • dreho02.10.13 05:25
       └ RE: Beziehungen prüfen Karl Donaubauer03.10.13 12:03
       └ RE: Beziehungen prüfen Karlsruher07.10.13 12:19
  • Subabfrage in einem Berichtsfeld = #Name ?
  • bkleine27.09.13 13:17
       └ RE: Subabfrage in einem Berichtsfeld = #Name ? PeterDoering01.10.13 10:58
  • DCount mit string
  • bhausu24.09.13 12:24
       └ RE: DCount mit string Karl Donaubauer24.09.13 13:33
          └ RE: DCount mit string bhausu25.09.13 11:39
  • zweifache Verbindung zur Tabelle
  • cdt_roger18.09.13 18:50
       └ RE: zweifache Verbindung zur Tabelle Karl Donaubauer18.09.13 19:55
          └ RE: zweifache Verbindung zur Tabelle cdt_roger20.09.13 20:46
       └ RE: zweifache Verbindung zur Tabelle cdt_roger20.09.13 21:12
          └ RE: zweifache Verbindung zur Tabelle Karl Donaubauer20.09.13 22:11
       └ RE: zweifache Verbindung zur Tabelle cdt_roger23.09.13 19:59
  • Beziehung anzeigen
  • dreho16.09.13 04:56
       └ RE: Beziehung anzeigen Karlsruher17.09.13 08:22
  • 2010: Datumswert verglichen mit großer Zahl
  • bkleine16.09.13 13:03
       └ RE: 2010: Datumswert verglichen mit großer Zahl Karl Donaubauer16.09.13 13:12
          └ RE: 2010: Datumswert verglichen mit großer Zahl bkleine16.09.13 15:45
             └ RE: 2010: Datumswert verglichen mit großer Zahl StefanWirrer16.09.13 16:25
  • Ist die Seriennummer als Primärschlüssel sinnvoll?
  • AK31012.09.13 16:57
       └ RE: Ist die Seriennummer als Primärschlüssel sin... PeterDoering14.09.13 20:01
          └ RE: Ist die Seriennummer als Primärschlüssel s... AK31016.09.13 08:24
  • DLookup bringt Fehler
  • bhausu13.09.13 13:36
       └ RE: DLookup bringt Fehler Karl Donaubauer13.09.13 14:02
          └ RE: DLookup bringt Fehler bhausu13.09.13 14:35
  • Access 2007 Systemobjekte
  • Srv-0211.09.13 21:55
       └ RE: Access 2007 Systemobjekte Karl Donaubauer12.09.13 18:29
          └ RE: Access 2007 Systemobjekte Srv-0212.09.13 22:20
  • A03 unter Win7
  • achenbach11.09.13 10:08
  • Access Stammtisch München am 12.09.2013 (Do)
  • StefanWirrer10.09.13 09:14
  • Umstieg Access 2003 --> Access 2010
  • A.S.06.09.13 10:37
       └ RE: Umstieg Access 2003 --> Access 2010 Karl Donaubauer06.09.13 11:52
          └ RE: Umstieg Access 2003 --> Access 2010 Karl Donaubauer06.09.13 12:35
             └ RE: Umstieg Access 2003 --> Access 2010 A.S.09.09.13 11:04
  • Umstieg Access2003 auf A2010
  • diwe0106.09.13 17:36
       └ RE: Umstieg Access2003 auf A2010 PeterDoering09.09.13 10:38
          └ RE: Umstieg Access2003 auf A2010 diwe0109.09.13 11:00
  • Datensätze vertauschen
  • pwakolbi03.09.13 11:58
       └ RE: Datensätze vertauschen Karl Donaubauer03.09.13 12:39
          └ RE: Datensätze vertauschen pwakolbi05.09.13 21:14
    swetrain
    Gesendet: 27.09.13 17:42
    Betreff: Outlook Kontakte auslesen vs. Kontakte anzeigen


    Hallo zusammen,

    mit unten stehendem Code lese ich mir in Access die Kontake aus meinem Outlook-Adressbuch aus (NICHT die globale Adressliste, sondern meine "lokalen" Kontakte.
    Was mich nun sehr stuzig macht, ist, dass dabei auch Kontakte ausgegeben werden, die ich schon längst gelöscht habe und die auch nicht mehr im Adressbuch angezeigt werden.
    Weiß von Euch jemand, weshalb das so ist, bzw. wie man da einen Abgleich hinbekommt?

    OS: Win7 64 bit
    Access: 2003
    Outlook 2010 an Exchange 2010
    Alle Updates/SP's sind installiert

    Danke für alle Infos

    Jochen


    Dim olApp As Outlook.Application
    Dim olNs As Outlook.NameSpace
    Dim olFolder As Outlook.MAPIFolder
    Dim olItem As Outlook.ContactItem
    Dim olItemAdd As Outlook.ContactItem

    On Error Resume Next
    Set olApp = GetObject(, "Outlook.Application")

    Set olNs = olApp.GetNamespace("MAPI")

    Set olFolder = olNs.GetDefaultFolder(olFolderContacts)

    For Each olItem In olFolder.Items
    With olItem
    Debug.Print .FullName
    End With
    Next olItem


    ex:
    olNs.Logoff
    Set olNs = Nothing
    Set olApp = Nothing
    Set olFolder = Nothing
    Set olItem = Nothing
    Exit Sub

    eh:
    MsgBox Err.Description, vbCritical, "Fehler-Nr.: " & Err.Number
    Resume ex
    Top of the page Bottom of the page


    Seite: < 42 43 44 45 46 47 ... 48 49 50 51 52 53 54 ... >
    Suche in diesem Forum
    Druckfreundliche Version
    (Alle Cookies von dieser Seite löschen.)