Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFSO.GetFolder("C:\Users\boessenc!\)
Running this code on ANY folder on a Vista/2008 or higher workstation will give you a Permission denied error:
Microsoft VBScript runtime error: Permission denied
Running this on any older version of Windows such as Windows XP or 2003 works without problems. The test above I ran the script against my users profile - a folder which of course my account has access to demonstrating the issue.
I also tested running this script against the WMI database with the FileSize property of the Win32_Directory class. That doesn't work either.
As a result need to utilise another method for grabbing the directory size.