Solved

** Time Saver: Shortcut to Outlook Address Book **

Posted on 1999-01-26
3
1,664 Views
Last Modified: 2008-02-26
I have been hunting around for the solution to this problem for about a week now with no success.

Q) I have been trying to customise the office shortcut bar with some shortcuts to outlook features. I have had success with the referencing of IPM class types in the shortcut target command line to bring up new mail forms, contacts list, tasks etc.

What i want to know is how can i reference in a form script or command line switch to bring up the Global Address book from a shortcut in one click from the office bar or desktop?

I have tried using the open item sub to bring up the address book via a IPM class reference but my knowledge of the object models and VB arent sufficient.
0
Comment
Question by:nbruse
  • 2
3 Comments
 
LVL 2

Expert Comment

by:Bodya
ID: 1622785
The problem with the address books is that it is no access to it provided by Outlook object model. The knowledge of MAPI will be rather helpfull here. But, may be you can specify your tast more explicitly, that we shall be able to find another way. Certainly, the address book is very seldom needed as itself, it is needed for certain purposes, i.e. composing the letter, getting a list of contacts etc., which can be realised with help of other Outlook features.
0
 
LVL 2

Accepted Solution

by:
Bodya earned 70 total points
ID: 1622786
Oh I find a desision. Look at this VBasic code
(in your VB project you should set references to the following libraries:
 Microsof Outlook Object Library
Microsoft Office Object Library)

Dim oApp As Outlook.Application
Dim oCB As Office.CommandBar
Dim oCBContr As Office.CommandBarControl

Set oApp = CreateObject("Outlook.Application")
'getting reference to menu Tools
Set oCB = oApp.ActiveExplorer.CommandBars.ActiveMenuBar.Controls("Tools").CommandBar
'command "Address Book..." is a third item in menu
Set oCBContr = oCB.Controls(3)
oCBContr.Execute

------------------
this code do the following:
1. Opens Outlook
2. Uses the menu command "Address book...", which is the third menu item in the menu "Tools" (in my version of Outlook)
to open the Address book

So, you can write a VB program with this code, make an exe file and place the shortcut to it on your Office shortcut bar.

0
 

Author Comment

by:nbruse
ID: 1622787
Thanks Bodya,
I had thought about doing it that way, but i had no idea about the VB commands to do it. One other problem i have is that i only have the VB editor that comes with office 97 and i cant seem to create an executable. Is there a scripting tool that can run a script file in win 95. Otherwise i think i can get my hands on an VB compiler from somewhere. Rgds

0

Featured Post

Efficient way to get backups off site to Azure

This user guide provides instructions on how to deploy and configure both a StoneFly Scale Out NAS Enterprise Cloud Drive virtual machine and Veeam Cloud Connect in the Microsoft Azure Cloud.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Are you unable to connect or configure Hotmail email account in Microsoft Outlook 2010, 2007? Or Outlook.com emails are not downloading to Outlook? Lets’ see the problem and resolve Outlook Connector error syncing folder hierarchy (0x8004102A).
MS Outlook is a world-class email client application that is mainly used for e-communication globally.  In this article, we will discuss the basic idea about MS Outlook, its advanced features, and types of MS Outlook File formats.
Get people started with the process of using Access VBA to control Outlook using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Microsoft Outlook. Using automation, an Access applic…
A short tutorial showing how to set up an email signature in Outlook on the Web (previously known as OWA). For free email signatures designs, visit https://www.mail-signatures.com/articles/signature-templates/?sts=6651 If you want to manage em…

775 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question