![]() Loading |
VBScript |
JavaScript |
Powershell |
Search Options: Determine the Size of All the Items Currently in the Recycle Bin
|
||
Const RECYCLE_BIN = &Ha&
Const FILE_SIZE = 3 Set objShell = CreateObject("Shell.Application") Set objFolder = objShell.Namespace(RECYCLE_BIN) Set colItems = objFolder.Items For Each objItem in colItems strSize = objFolder.GetDetailsOf(objItem, FILE_SIZE) arrSize = Split(strSize, " ") intSize = intSize + CLng(arrSize(0)) Next Wscript.Echo intSize & " KB" | ||
© 2008 - 2013 Boris Toll :: Scripts available: 6.481 :: :: scriptbox.toll.at :: :: powered by www.toll.at :: |