[Visual Basic 6] Esportare dati in Outlook

[bluelions]

Salve a tutti e Buongiorno!!!!!
Qualcuno sa dirmi come posso esportare nella rubrica di outlook (sempre se si può fare) i dati di un data base access che visualizzo all'interno di una dbgrid del mio progetto.
Dovrei esportare Nome Cognome ecc....

Resto in attesa di una Vs risposta

N.B. Complimenti per il Forum, siete molto veloci a rispondere.

Grazie!!!!!!

[MMarzia]

Originariamente inviato da bluelions
N.B. Complimenti per il Forum, siete molto veloci a rispondere.

figurati, è un piacere....

[bluelions]

Però potevi anche darmi la risposta!!!!
Scherzo....
Ragazzi nessuno sa darmi anche un consiglio su questo problema.

Attendo risposta
GRAZIE

[xegallo]

'Legge gli utenti di Exchange o i Contatti
Private Sub LeggiUtenti()
    Dim olkList As Outlook.AddressList
    Dim olkAddressLists As Outlook.AddressEntries
    Dim olkAddressList As Outlook.AddressEntry

    '*** ITA: Elenco indirizzi globale; *** ENG: Global Address List ***
    ' Cambiando il tipo di insieme di indirizzi
    '   è possibile leggere i Contatti anzichè gli utenti di Exchange:
    '   - Set olkList = olkSpace.AddressLists("Elenco indirizzi globale")
    '   - Set olkList = olkSpace.AddressLists("Contatti")
    Set olkList = olkSpace.AddressLists("Elenco indirizzi globale")
    Set olkAddressLists = olkList.AddressEntries

    ' cicla l'insieme dei contatti
    For Each olkAddressList In olkAddressLists
        ' aggiunge l'utente alla listbox
        lstRubrica.AddItem olkAddressList.Name & ": " & olkAddressList.Address
    Next
    
    Set olkList = Nothing
    Set olkAddressLists = Nothing
    Set olkAddressList = Nothing
End Sub

aggiustala un po' dovrebbe essere un buono spunto

[bluelions]

In pratica se ho capito bene con questa procedura prendo i dati da Exchange e li metto in una lista.
A me servirebbe l'inverso prendere i dati da una griglia e metterli in una rubrica di outlook

[bluelions]

Per fare la funzione inversa?
Cioè importare da una form Visual basic in una rubrica di Outlook.
GRAZIE