Opening Inbox

1. Select Project==> Reference ==> Messenger Api Type Library
2. Now but this code into the form load and the other at the top

Private Sub Form_Load() Set objMessenger = New MessengerAPI.Messenger End Sub

Option Explicit Private WithEvents objMessenger As MessengerAPI.Messenger

3. In a command button insert the following code

MessengerAPI.Messenger.OpenInbox