All sorts of threat intelligence is available on the web. Intelligence you can learn from, and use to anticipate and prepare for future attacks.
Dim outlookApp As Outlook.Application = New Outlook.Application 'Dim oNS As Outlook.NameSpace = outlookApp.Session Dim oNS As Outlook.NameSpace = outlookApp.GetNamespace("mapi") Dim oContacts As Outlook.MAPIFolder = oNS.GetDefaultFolder(Outlook.OlDefaultFolders.olFolderContacts) Dim oItems As Outlook.Items = oContacts.Items Dim oContact As Outlook.ContactItem = Nothing For Each contactItem As Outlook.ContactItem In oContacts.Items Debug.WriteLine(contactItem.FullName) Next outlookApp.Quit() outlookApp = Nothing
Join the community of 500,000 technology professionals and ask your questions.
Connect with top rated Experts
13 Experts available now in Live!