Recipient.FreeBusy (Outlook)

Returns free/busy information for the recipient.

The default is to return a string representing one month of free/busy information compatible with the Microsoft Schedule+ Automation format (that is, the string contains one character for each MinPerChar minute, up to one month of information from the specified Start date). If the optional argument CompleteFormat is omitted or False, then "free" is indicated by the character 0 and all other states by the character 1. If CompleteFormat is True, then the same length string is returned as defined above, but the characters now correspond to the OlBusyStatus constants.

FreeBusy (Start, MinPerChar, CompleteFormat)

Public Sub GetFreeBusyInfo() 
 Dim myNameSpace As Outlook.NameSpace 
 Dim myRecipient As Outlook.Recipient 
 Dim myFBInfo As String 
 
 Set myNameSpace = Application.GetNamespace("MAPI") 
 Set myRecipient = myNameSpace.CreateRecipient("Nate Sun") 
 On Error GoTo ErrorHandler 
 myFBInfo = myRecipient.FreeBusy(#11/11/2003#, 60 * 24) 
 MsgBox myFBInfo 
 Exit Sub 
ErrorHandler: 
 MsgBox "Cannot access the information. " 
End Sub

Arguments

The following arguments are required:

Start (Date) - The start date for the returned period of free/busy information.

MinPerChar (Long) - The number of minutes per character represented in the returned free/busy string.

Optional arguments

The following argument is optional

CompleteFormat (OlBusyStatus) - True if the returned string should contain not only free/busy information, but also values for each character according to the OlBusyStatus constants.

Possible values are