Learn how to a build a cloud-first strategyRegister Now

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 509
  • Last Modified:

Creating A VB Form to View Multiple peoples Calendar

Hi All,

I want to create a simple vb 6.0 form, which will allow me to view and edit several peoples outlook 2000 calendar's at once (4 people). lets say for example the users and mail server are as follows :-

Exchange server = mail2000
person1            =  Rich
Person2            =  Dave
Person3            =  Paul
Person 4           =  Bob

Anyone have any idea's please,
Cheers,
Ribuck
0
ribuck
Asked:
ribuck
  • 5
  • 2
1 Solution
 
jimbobmcgeeCommented:
There are controls in VB called 'Microsoft Outlook Recipient Control' and 'Microsoft Outlook View Control'.  I've not used them, myself, but maybe they might allow you to at least query the mailboxes to some extent?
0
 
jimbobmcgeeCommented:
In case you don't have the View Control, it can be downloaded, freely, from:  http://www.microsoft.com/downloads/details.aspx?FamilyId=831F957F-3190-48DA-A099-2BDBC7397623&displaylang=en

HTH
0
 
ribuckAuthor Commented:
Jimbibmcgee,

how do i use this control within VB ?
0
Technology Partners: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

 
jimbobmcgeeCommented:
To actually use the control, you would first need to reference it.  I believe it is done by going to Tools/References (that might just be within VBA, though -- I have no VB6 testing area at the moment).  
The link I posted above points to a Microsoft help file that you can download and use as a reference guide for the control itself...
0
 
jimbobmcgeeCommented:
I managed to get it working in VBA, it should be fairly similar in VB6.

Reference the Outlook View Control, with Tools -> References
Drag a View Control into a Form; size it and name it as required (default name ViewCtl1)
Set up some method of choosing the user to view; a listbox, textbox & submit button or series of commandbuttons, etc

Now, when a user is chosen execute the following line:
                            ViewCtl1.OpenSharedDefaultFolder user, foldertype

where user is a string containing the alias of the user
and foldertype is a vb/ol constant for the type of folder you are viewing

e.g.
                            ViewCtl1.OpenSharedDefaultFolder "joe.bloggs", olxFolderCalendar

will open joe.bloggs' calendar folder in the View Control.

You must have the rights to view the folders you want to see; check the Outlook help file for details on sharing the calendar file.

I guess if you want to see more than one calendar at a time, you could create more than one View Control, then call them as such:
                            ViewCtl1.OpenSharedDefaultFolder "user.1", olxFolderCalendar
                            ViewCtl2.OpenSharedDefaultFolder "user.2", olxFolderCalendar
                            ViewCtl3.OpenSharedDefaultFolder "user.3", olxFolderCalendar
                            ViewCtl4.OpenSharedDefaultFolder "user.4", olxFolderCalendar

as long as each calendar folder is shared and you do have read access to the folder.

Regards,
jimbobmcgee
0
 
ribuckAuthor Commented:
Think it must be Different in VB6 as references can only be in the format of *.olb, *.tlb or *.dll, and the file i downloaded was a .chm file, which i believe is purely just a help file.

Should it not be some sort of OCX or DLL file ?

Cheers,
Richard
0
 
jimbobmcgeeCommented:
You are right, my mistake.  The link is to a help file on the usage of the control.  

If you have installed Office (2000/XP/2003) you should already have the Microsoft Outlook View Control -- it is called OUTLCTL.DLL and should be somewhere within the Office folder tree.  Once referenced in your project, its methods should be available to you.
0

Featured Post

Concerto's Cloud Advisory Services

Want to avoid the missteps to gaining all the benefits of the cloud? Learn more about the different assessment options from our Cloud Advisory team.

  • 5
  • 2
Tackle projects and never again get stuck behind a technical roadblock.
Join Now