function cleanDescription([string] $url)
{
	$url = $url.Replace("title=", "")
	$url = $url.Replace("`"","")
	$url = $url.Substring(0,6)
 
    return $url
}
 
if ($Args.count -lt 1) {
 
    'No Parameter!'
    'Usage:'
    './fb.ps1 days in the future (e.g. 0 - Today; 1 - Tomorrow; -1 - Yesterday)'
    ''
	'Today:'
	'./fb.ps1 0'
    }
else{ 
[int]$days = $args[0]
 
$casserverName = "Exchange-Server"
$dllpath = "C:\Program Files\Microsoft\Exchange\Web Services\1.0\Microsoft.Exchange.WebServices.dll"
[void][Reflection.Assembly]::LoadFile($dllpath)
$service = New-Object Microsoft.Exchange.WebServices.Data.ExchangeService([Microsoft.Exchange.WebServices.Data.ExchangeVersion]::Exchange2007_SP1)
 
 
$uri=[system.URI] ("https://" + $casserverName + "/ews/exchange.asmx")
$service.Url = $uri
 
 
$mbHash = @{ }
 
$tmValHash = @{ }
$tidx = 0
for($vsStartTime=[DateTime]::Parse([DateTime]::Now.ToString("yyyy-MM-dd 0:00")).AddDays($days);$vsStartTime -lt [DateTime]::Parse([DateTime]::Now.ToString("yyyy-MM-dd 0:00")).AddDays($days+1);$vsStartTime = $vsStartTime.AddMinutes(30)){
	$tmValHash.add($vsStartTime.ToString("HH:mm"),$tidx)	
	$tidx++
}
 
get-mailbox -ResultSize unlimited | foreach-object{
	if ($mbHash.ContainsKey($_.WindowsEmailAddress.ToString()) -eq $false){
		$mbHash.Add($_.WindowsEmailAddress.ToString(),$_.DisplayName)
	}
}
$Attendeesbatch = [activator]::createinstance(([type]'System.Collections.Generic.List`1').makegenerictype([Microsoft.Exchange.WebServices.Data.AttendeeInfo]))
 
$StartTime = [DateTime]::Parse([DateTime]::Now.ToString("yyyy-MM-dd 0:00")).AddDays($days)
$EndTime = $StartTime.AddDays(1)
 
 
$displayStartTime =  [DateTime]::Parse([DateTime]::Now.ToString("yyyy-MM-dd 08:00")).AddDays($days)
$displayEndTime = [DateTime]::Parse([DateTime]::Now.ToString("yyyy-MM-dd 20:30")).AddDays($days)
 
$drDuration = new-object Microsoft.Exchange.WebServices.Data.TimeWindow($StartTime,$EndTime)
$AvailabilityOptions = new-object Microsoft.Exchange.WebServices.Data.AvailabilityOptions
$AvailabilityOptions.RequestedFreeBusyView = [Microsoft.Exchange.WebServices.Data.FreeBusyViewType]::DetailedMerged
 
$batchsize = 100
$bcount = 0
$bresult = @()
if ($mbHash.Count -ne 0){
	$mbHash.GetEnumerator() | Sort Value | foreach-object {
		if ($bcount -ne $batchsize){
			$Attendee1 = new-object Microsoft.Exchange.WebServices.Data.AttendeeInfo($_.Key)
			$Attendeesbatch.add($Attendee1)
			$bcount++
		}
		else{
			$availresponse = $service.GetUserAvailability($Attendeesbatch,$drDuration,[Microsoft.Exchange.WebServices.Data.AvailabilityData]::FreeBusy,$AvailabilityOptions)
			foreach($avail in $availresponse.AttendeesAvailability.OverallResult){$bresult += $avail}
			$Attendeesbatch = [activator]::createinstance(([type]'System.Collections.Generic.List`1').makegenerictype([Microsoft.Exchange.WebServices.Data.AttendeeInfo]))
			$bcount = 0
			$Attendee1 = new-object Microsoft.Exchange.WebServices.Data.AttendeeInfo($_.Key)
			$Attendeesbatch.add($Attendee1)
			$bcount++
		}
	}
}
$availresponse = $service.GetUserAvailability($Attendeesbatch,$drDuration,[Microsoft.Exchange.WebServices.Data.AvailabilityData]::FreeBusy,$AvailabilityOptions)
$usrIdx = 0
$frow = $true
foreach($res in $availresponse.AttendeesAvailability){
      if ($frow -eq $true){
	  	$fbBoard = $fbBoard + "<table><tr><td align=`"center`"><b>"+$StartTime.ToString("dd-MM-yyyy")+"</b></td><td align=`"right`" style=`"width=50;`"><b>Free:</b></td><td bgcolor=`"#41A317`" align=`"center`" style=`"width=50;`" ></td>" + "`r`n"
		$fbBoard = $fbBoard + "<td align=`"center`" style=`"width=50;`"><b>Tentative:</b></td><td bgcolor=`"#828383`" align=`"center`" style=`"width=50;`" ></td>" + "`r`n"
		$fbBoard = $fbBoard + "<td align=`"center`" style=`"width=50;`"><b>Busy:</b></td><td bgcolor=`"#153E7E`" align=`"center`" style=`"width=50;`" ></td>" + "`r`n"
		$fbBoard = $fbBoard + "<td align=`"center`" style=`"width=50;`"><b>OOF:</b></td><td bgcolor=`"#4E387E`" align=`"center`" style=`"width=50;`" ></td>" + "`r`n"
		$fbBoard = $fbBoard + "</tr>"
		$fbBoard = $fbBoard + "<tr bgcolor=`"#95aedc`">" +"`r`n"
		$fbBoard = $fbBoard + "<td align=`"center`" style=`"width=200;`" ><b>User</b></td>" +"`r`n"
		for($stime = $displayStartTime;$stime -lt $displayEndTime;$stime = $stime.AddMinutes(30)){
			$fbBoard = $fbBoard + "<td align=`"center`" style=`"width=50;`" ><b>" + $stime.ToString("HH:mm") + "</b></td>" +"`r`n"
		}
		$fbBoard = $fbBoard + "</tr>" + "`r`n"
		$frow = $false
	}
	for($stime = $displayStartTime;$stime -lt $displayEndTime;$stime = $stime.AddMinutes(30)){
 
		if ($stime -eq $displayStartTime){
			$fbBoard = $fbBoard + "<td bgcolor=`"#CFECEC`"><b>" + $mbHash[$Attendeesbatch[$usrIdx].SmtpAddress] + "</b></td>"  + "`r`n"
			$c = 0
		}
 
		$title = "title="
		$description = ""
		if ($res.MergedFreeBusyStatus[$tmValHash[$stime.ToString("HH:mm")]] -ne $null){
			$gdet = $false
			$FbValu = $res.MergedFreeBusyStatus[$tmValHash[$stime.ToString("HH:mm")]]
			switch($FbValu.ToString()){
				"Free" {$bgColour = "bgcolor=`"#41A317`""}
				"Tentative" {$bgColour = "bgcolor=`"#828383`""
					     $gdet = $true
 
					}
				"Busy" {$bgColour = "bgcolor=`"#153E7E`""
					     $gdet = $true
 
					}
				"OOF" {$bgColour = "bgcolor=`"#4E387E`""
					     $gdet = $true
 
					}
				"NoData" {$bgColour = "bgcolor=`"#98AFC7`""}
				"N/A" {$bgColour = "bgcolor=`"#98AFC7`""}		
			}
			if ($gdet -eq $true){
				if ($res.CalendarEvents.Count -ne 0){
					if($c -lt $res.CalendarEvents.Count){
					#for($ci=0;$ci -lt $res.CalendarEvents.Count;$ci++){
						[int]$start = $res.CalendarEvents[$c].StartTime.ToString("HHmm")
						[int]$end = $res.CalendarEvents[$c].EndTime.ToString("HHmm")
						if($end -ge 0)
						{
							$end = 2000
						}
						[int]$time = $stime.ToString("HHmm")
						#Write-Host $start $time $end
						if ($time -ge $start-25 -band $time -le $end){	
							$c += 1
							if($res.CalendarEvents[$c-1].Details.IsPrivate -eq $False){
								$subject = ""
								$location = ""
								#Write-Host $c
								#Write-Host $mbHash[$Attendeesbatch[$usrIdx].SmtpAddress]
								#Write-Host $res.CalendarEvents[$c-1].StartTime.ToString("HH:mm")
 
								#Write-Host $time
								#Write-Host $res.CalendarEvents[$c-1].EndTime.ToString("HH:mm")
								#Write-Host $res.CalendarEvents[$c-1].Details.Subject
								if ($res.CalendarEvents[$c-1].Details.Subject -ne $null){
 
									$subject = $res.CalendarEvents[$c-1].Details.Subject.ToString()
								}
								if ($res.CalendarEvents[$c-1].Details.Location -ne $null){
									$location = $res.CalendarEvents[$c-1].Details.Location.ToString()
								}
								$title = $title + "`"" + $subject + "`r`n" + "Wo: " + $location + "`" "
							}else{
								$title = $title + "Privat"
							}
						}
					}
 
				}
			}
 
		}
		else{
			$bgColour = "bgcolor=`"#98AFC7`""
		}
		if($title -ne "title="){
 
			$description = cleanDescription($title)
			$fbBoard = $fbBoard + "<td " + $bgColour + " " + $title + "><font color=#FFFFFF>"+$description+"</font></td>"  + "`r`n"
		}
		else{
			$fbBoard = $fbBoard + "<td " + $bgColour + "></td>"  + "`r`n"
		}
 
	}
	$fbBoard = $fbBoard + "</tr>"  + "`r`n"
	$usrIdx++
}
$fbBoard = $fbBoard + "</table>"  + "  " 
$fbBoard | out-file "c:\fbboard\fbboard$days.htm"
}