The ActiveInspector object will give you access to the currently opened item
via the CurrentItem property:
Dim objMail As Outlook.MailItem
If ActiveInspector.CurrentItem.Class = olMailItem Then
Set objMail = ActiveInspector.CurrentItem
MsgBox "Voting Response: " & objMail.VotingResponse
End If

Signature
Eric Legault (Outlook MVP, MCDBA, MCTS: Messaging & Collaboration)
Try Picture Attachments Wizard for Outlook:
http://www.collaborativeinnovations.ca
Blog: http://blogs.officezealot.com/legault/
> Hi,
>
[quoted text clipped - 9 lines]
>
> Raph
rgoubet@yahoo.fr - 30 May 2006 19:55 GMT
Thanks. Strangely, the VotingResponse property returns an empty string,
although the tracking tab of the mail does contain information...