Ciao a tutti, dopo ore di modifiche e studi al codice sono riuscito a gestire un po' tutto.
Ora il mio problema principale è che non riesco a gestire il doppio archivio pst.
Cioè per il momento cicla e mi carica tutte le e-mail presenti nel file dati predefinito (oNS.GetDefaultFolder(Outlook.OlDefaultFolders.olF olderInbox), io vorrei se possibile leggere anche altri file dati ma non riesco a trovare una corretta soluzione.
Ecco una parte di cordice


codice:
  Dim objFolder As Outlook.MAPIFolder = Nothing
            Dim oApp As Outlook.Application = New Outlook.Application()
            ' Get Mapi NameSpace.
            Dim oNS As Outlook.NameSpace = oApp.GetNamespace("mapi")
            oNS.Logon(Comboprofilo.Text, Missing.Value, False, True) ' TODO:
            Dim oInbox As Outlook.MAPIFolder
            oInbox = oNS.GetDefaultFolder(Outlook.OlDefaultFolders.olFolderInbox)


            Dim oItems As Outlook.Items


            If Lista_Folders.Text = "Posta in arrivo" Then
                oItems = oInbox.Items
            Else
                oItems = oInbox.Folders(Lista_Folders.Text).Items
            End If


            ' Get unread e-mail messages.
            ' oItems = oItems.Restrict("[Unread] = true")


            slblMess.Text = "Totale " & oItems.Count


            ToolStripProgressBar1.Maximum = oItems.Count


            ' Loop each unread message.
            Dim oMsg As Outlook.MailItem
            Dim i As Integer
            Dim lista As ListViewItem


 .............
.......
....
qualcuno potrebbe darmi qualche dritta su come agire?!?
Grazie anticipatamente