A question about Vista's built-in Disk Defragmenter

madmatt

Awesome is as awesome does.
Political Access
Joined
5 Apr 2002
Messages
13,314
Has anyone figured out how to defragment just one disk? Clicking "Defragment now" appears to perform the action on all disks.
 
Here's a script to just defrag only drive c in vista.
Save it as whatever.vbs

Code:
strComputer = "." 
Dim Wmi : Set Wmi = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2") 
Dim Act : Set Act = CreateObject("Wscript.Shell")
Dim ObjItem,ColItems,GB, Var1
  GB = Int(1073741824)
Set ColItems = Wmi.ExecQuery("SELECT * FROM Win32_LogicalDisk",,48) 
   For Each ObjItem in ColItems 
    If ObjItem.DriveType = 3 Then 
     If InStr(ObjItem.Caption,"C") Or InStr(ObjItem.Caption,"c") Then 
      Var1 = objItem.Size - objItem.FreeSpace
      Act.Popup "Preparing To Defrag This Drive" & vbCrLf &_
      Space(3) & "Drive Letter"& vbTab & ObjItem.Caption & vbCrLf &_
      Space(3) & "Volume Name" & vbTab & objItem.VolumeName & vbCrLf &_
      Space(3) & "Total Size" & vbTab & FormatNumber(objItem.Size/GB,2) & " GB" & vbCrLf &_
      Space(3) & "Free Space" & vbTab & FormatNumber(objItem.FreeSpace/GB,2) & " GB" & vbCrLf &_
      Space(3) & "Used Space" & vbTab & FormatNumber(Var1/GB,2) & " GB", 3,"Defrag",4128
      Act.Run("Defrag.exe " & ObjItem.Caption &"\"),2,True
     End If  
    End If 
   Next
  Act.Popup "Finished The Defrag",7,"Finshed Defrag",4128
 
Last edited by a moderator:
Nice one Andy, I'll take a copy of that if you don't mind :)
 
Has anyone figured out how to defragment just one disk? Clicking "Defragment now" appears to perform the action on all disks.

I've never been able to use the dang thing.

Keeps saying my disks don't need to be defragged :(

Bleh.
 
I'm not too fond of the built-in utility. I like that you can schedule it but I don't like that you can't choose which drive(s).
 
yeah... me too

i hope they upgrade it in sp1 (although its unlikely)
 
The only reason I don't like it is the fact that you cannot choose which drive. I could care less about the drive map.

Thanks for the script, I will defiantly check it out.
 
cool article andy... apparently i was wrong and longhorn updates (of the defrag util) will be available for vista

cool!
 

Members online

No members online now.

Latest profile posts

Also Hi EP and people. I found this place again while looking through a oooollllllldddd backup. I have filled over 10TB and was looking at my collection of antiques. Any bids on the 500Mhz Win 95 fix?
Any of the SP crew still out there?
Xie wrote on Electronic Punk's profile.
Impressed you have kept this alive this long EP! So many sites have come and gone. :(

Just did some crude math and I apparently joined almost 18yrs ago, how is that possible???
hello peeps... is been some time since i last came here.
Electronic Punk wrote on Sazar's profile.
Rest in peace my friend, been trying to find you and finally did in the worst way imaginable.

Forum statistics

Threads
62,015
Messages
673,494
Members
5,621
Latest member
naeemsafi
Back