Helpful to verify reports of your own downtime, or to double check a downed website you are trying to access.
One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.
Dim objOutlook As Outlook.Application Set objOutlook = New Outlook.Application Dim objNS As Outlook.NameSpace Set objNS = objOutlook.Session Dim objContacts As Outlook.MAPIFolder Set objContacts = objNS.GetDefaultFolder(Outlook.OlDefaultFolders.olFolderContacts) Dim objItems As Object Set objItems = objContacts.Items Dim objItem As Object For Each objItem In objItems ' If TypeOf(objItem) Is Outlook.ContactItem Then Debug.Print objItem.FullName ' End If Next
' If TypeOf(objItem) Is Outlook.ContactItem Then
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
|Windows Live Mail to Outlook 2010 Windows 10||6||52|
|scheduled email to be sent question.||3||26|
|Visual Basic 6: Code needed for TripleDES Encryption/Decryption||13||38|
|Restored mailboxes and OST||11||32|