Reporting is one of the most important and least talked about aspects of a world-class threat intelligence program. Here’s how to do it right.
Public Sub SearchForItem(strEntryID As String) Dim obj_CurrentOlkFolder As Outlook.MAPIFolder Dim olkApp As Object, _ olkNS As Object, _ OlkFolder As Object, _ olkItem As Object, _ strQuery As String Set olkApp = GetObject(, "Outlook.Application") Set olkNS = olkApp.Session Set olkItem = olkNS.GetItemFromID(strEntryID) If TypeName(olkItem) = "nothing" Then MsgBox "No match found" Else olkItem.Display End If Set OlkFolder = Nothing Set olkNS = Nothing Set olkApp = Nothing End Sub
|Windows and Outlook 2013: Popup alert on mail to certain folder?||2||19|
|VBA to Save an Unread Outlook Message Attachment with a variable name based on a counter||2||26|
|Conditional Formatting - Date()||8||24|
|How to return the focus to the row of the datagrid (vb6) even though the SQL data rows exceed the max windows rows displayed.||16||32|
Join the community of 500,000 technology professionals and ask your questions.
Connect with top rated Experts
11 Experts available now in Live!