http://blogs.technet.com/b/heyscriptingguy/archive/2009/02/02/how-can-i-tell-how-much-free-disk-space-a-user-has.aspxI know most people have heard of Moore’s Law that is named after Gordon Moore, but have you ever heard of Bob’s law? Bob was the senior network administrator when I first became an IT pro, and he created what he called Bob's Law. Briefly stated it saysen-USTelligent Evolution Platform Developer Build (Build: 5.6.50428.7875)http://blogs.technet.com/b/heyscriptingguy/archive/2009/02/02/how-can-i-tell-how-much-free-disk-space-a-user-has.aspx#3379775Wed, 12 Jan 2011 12:24:55 GMTd5e57398-b9ef-4490-9955-07cbb4e4a80d:3379775Vivek Shokeen<p>Hi Friends pls use this script for all systems.</p> <p>Set fso = CreateObject ( &quot;Scripting.FileSystemObject&quot;)</p> <p>Set ObjInputFile = fso.OpenTextFile( &quot;Server.txt &quot;, 1, True)</p> <p>Set ObjOutputFile = fso.OpenTextFile( &quot;Result.txt &quot;, 2, True)</p> <p>Const Hard_Disk = 3</p> <p>Do While ObjInputFile.AtEndOfLine &lt;&gt; True</p> <p> StrComputer = ObjInputFile.ReadLine</p> <p> Set ObjWMIService = GetObject(&quot;Winmgmts:&quot; &amp; &quot;{impersonationLevel = impersonate}!\\&quot; &amp; StrComputer &amp; &quot;\root\cimv2&quot;)</p> <p> Set colDisk = ObjWMIService.ExecQuery (&quot; Select * from Win32_LogicalDisk Where DriveType = &quot; &amp; Hard_Disk &amp; &quot;&quot; )</p> <p> For Each objDisk in colDisk</p> <p> ObjOutputFile.WriteLine StrComputer</p> <p> ObjOutputFile.WriteLine &quot;DeviceID: &nbsp;&quot;&amp; vbTab &amp; objDisk.DeviceID</p> <p> ObjOutputFile.WriteLine &quot;Free Disk Space : &nbsp;&quot;&amp; vbTab &amp; objDisk.FreeSpace</p> <p> Next</p> <p>Loop</p> <div style="clear:both;"></div><img src="http://blogs.technet.com/aggbug.aspx?PostID=3379775" width="1" height="1">