From: Rich on
I have a Users directory on a drive, where all my users have a subfolder with
their user name. inside everyone's folder is a certain folder, lets call it
TooBig, that i need to know the size for for each user. does anyone have a
script that would maybe dump the size of each user's TooBig folder to a file
I can review?

From: Pegasus [MVP] on


"Rich" <richjone(a)noemail.noemail> wrote in message
news:A14FA439-CED8-4045-B954-9EB668E1C4BB(a)microsoft.com...
> I have a Users directory on a drive, where all my users have a subfolder
> with
> their user name. inside everyone's folder is a certain folder, lets call
> it
> TooBig, that i need to know the size for for each user. does anyone have
> a
> script that would maybe dump the size of each user's TooBig folder to a
> file
> I can review?
>

There are numerous tools ready-made for just this purpose, most of them
free. Here are two of them:
- DriveUse:
http://members.ozemail.com.au/~nulifetv/freezip/freeware/index.html
- Bullet Proof Folder sizes: http://www.foldersizes.com/
If you prefer to write your own then I'm sure someone would help you, as
long as you start with a solid idea and are prepared to do most of the
coding yourself.

From: Kevin Bumber on
Rich,

Here's something we have running on our network to find the size of
users 'My Documents' directory. Our flavor runs at log-on on a users
computer. You may be able to modify this to meet your needs. The
version below will echo the results of the users profile size, instead
of echoing the results we write them to a database.

'VBScript
Const CONVERSION_FACTOR = 1048576

'you need to access the environment variables from the system
Set WshShell = WScript.CreateObject("WScript.Shell")

'then tell the shell object to look at the environment variables with
a type of
'Process
Set WshSysEnv = WshShell.Environment("PROCESS")

'populate the 'sprofile' variable with the contents of the
'USERPROFILE'
sProfile = WshSysEnv("USERPROFILE")

Set objFSO = CreateObject("scripting.FileSystemObject")

set objFolder = objFSO.GetFolder(sProfile)

'Here you convert the bits result from objFolder.size to MB'
iSize = objFolder.size / CONVERSION_FACTOR

Wscript.Echo iSize