How to code MS Outlook Shortcut Bar in VB

Cheun Kiat

unread,

Mar 14, 2001, 9:52:34 PM3/14/01

to

Hi,

I would like to use the MS Outlook (Shortcut) Bar in my VB application to
serve as a menu handler. How do I go about doing it? Anyone has a clue.

Thanks

Cheun

Cheun Kiat

unread,

Mar 15, 2001, 4:47:41 AM3/15/01

to

Thanks for your advice. I have tried out the sample codes from VB online
help. But I still have some doubts:
1. Those sample codes are for customising MS Outlook. But I would like to
deploy the Outlook Shortcut Bar as an independent or separate menu bar.
Hence, I wonder if the sample codes can serve my purpose.

2. Is there a VB control available in VB6 that can use command buttons and
icons to serve as a menu handler?

Regards,

Cheun

"Neo [MVP Outlook]" <n...@mvps.org> wrote in message
news:#rQsn5QrAHA.1224@tkmsftngp04...
> This is for Outlook 2000 only, but you might want to take a look at the
> following properties.
>
> OutlookBarGroup
> OutlookBarGroups
> OutlookBarPane
> OutlookBarShortcut
> OutlookBarShortcuts
> OutlookBarStorage
>
> But in a nutshell when looking at the online help, you have this code
> snippet.
>
> Dim myOlApp As New Outlook.Application
> Dim myOlBar As Outlook.OutlookBarPane
> Dim myolGroup As Outlook.OutlookBarGroup
> Dim myOlShortcuts As Outlook.OutlookBarShortcuts
> Set myOlBar = myOlApp.ActiveExplorer.Panes.Item("OutlookBar")
> Set myolGroup = myOlBar.Contents.Groups.Item(1)
> Set myOlShortcuts = myolGroup.Shortcuts
> myOlShortcuts.Add "http://www.microsoft.com", _
> "Microsoft Home Page", 3
>
> "Cheun Kiat" <cheu...@tokai.com.sg> wrote in message
> news:e#nZBsPrAHA.1796@tkmsftngp02...

Cheun Kiat

unread,

Mar 15, 2001, 4:47:57 AM3/15/01

to

Regards,

Cheun

Neo [MVP Outlook]

unread,

Mar 15, 2001, 12:12:32 AM3/15/01

to

This is for Outlook 2000 only, but you might want to take a look at the
following properties.

OutlookBarGroup
OutlookBarGroups
OutlookBarPane
OutlookBarShortcut
OutlookBarShortcuts
OutlookBarStorage

But in a nutshell when looking at the online help, you have this code
snippet.

Dim myOlApp As New Outlook.Application
Dim myOlBar As Outlook.OutlookBarPane
Dim myolGroup As Outlook.OutlookBarGroup
Dim myOlShortcuts As Outlook.OutlookBarShortcuts
Set myOlBar = myOlApp.ActiveExplorer.Panes.Item("OutlookBar")
Set myolGroup = myOlBar.Contents.Groups.Item(1)
Set myOlShortcuts = myolGroup.Shortcuts
myOlShortcuts.Add "http://www.microsoft.com", _
"Microsoft Home Page", 3

"Cheun Kiat" <cheu...@tokai.com.sg> wrote in message
news:e#nZBsPrAHA.1796@tkmsftngp02...

Hollis D. Paul

unread,

Mar 15, 2001, 3:16:59 PM3/15/01

to

In article <O105$TTrAHA.1456@tkmsftngp04>, Cheun Kiat wrote:
> 2. Is there a VB control available in VB6 that can use command buttons and
> icons to serve as a menu handler?
>

The object for the Office Tool bar are in the Office Type Library, which,
when you go to set your reference to it, is shown as Microsoft Office 9.0
Object Library. The file name is MSO9.dll.

Hollis D. Paul [MVP - Outlook]
Hol...@outlookbythesound.com
h...@compuserve.com
Using Virtual Access 4.52 build 277 (32-bit), Windows 2000 build 2195

Mukilteo, WA USA

Neo [MVP Outlook]

unread,

Mar 16, 2001, 7:45:20 AM3/16/01

to

This response to user was sent offline to a private email, but figured it
should help the group as well.

ah... MS doesn't have such a control, but I think vbaccelerator.com might
have control/sample that will help you on your path. (I think it is called
the vbAccelerator ListBar control this in under the code/controls section.)

"Cheun Kiat" <cheu...@tokai.com.sg> wrote in message

news:O105$TTrAHA.1456@tkmsftngp04...