Defragmentation

[Bad boy Warrior]

The defrag screen is useless compared to XP where it at least showed what percent it was done and showed colour co-ordinated files etc etc. In Vista this isnt the case any reg tweak or something to have it like XP or am i stuck with it?

thanks

[cluberti]

The only way to get something more XP-like is to install a defrag program.

[DonDamm]

I opt for Vopt8. It is fast, reliable and scheduleable. The program is lite and nimble and if you like to watch it provides a good show! :^) It's made by Golden Bow, one of the oldest and best in the business. Oh, and it's built for Vista.

[MIKE MANE 60]

There is a free defrag tool for download here: http://www.auslogics.com/disk-defrag/index.php

It works fine and gives back the ability to defrag individual partitions/disks

See screen shots here: http://www.auslogics.com/disk-defrag/screenshot.php

Edited June 11, 2007 by MIKE MANE 60

[garnet]

I've always been on Diskeeper, i love the new GUI and freedom from scheduling defrags in the new edition. Its runs fine on the Vista too.

[spacesurfer]

I do my defragmentation at night. No need to third-party. Let windows do it's job at night.

[ripken204]

wow i havnt defragged for a couple of months! i use diskeeper beta for vista.

[MIKE MANE 60]

I do my defragmentation at night. No need to third-party. Let windows do it's job at night.

I am a bit confused by that. Are you saying that you have found a way of defragging an individual partition or a disk from within Vista ?

At the moment if I leave it running overnight it just runs through all five HDD's and would still be running way into the next day.

The only way I've found I can do a selective defrag it is with third party software, am I missing some important information here ?

Anybody know how to do this from within Vista please pass the info on . Thanks.

[spacesurfer]

As far as I know, Vista does not defrag all drives (or partitions). You select which drive (or partitions) to defrag. I run defrag by right-clicking on the drive --> tools --> defrag. (I'm not in Vista right now so I can't confirm these steps). It actually analyzes the partition you select first and recommends whether to defrag or not to defrag.

When I defrag, I only do the OS drive.

[MIKE MANE 60]

Thanks for the reply. I must say that I didn't think of right clicking and choosing, I just went straight into Defrag.

I'll have another go when I go back to Vista.

Thanks.

[Nocturnus]

wow i havnt defragged for a couple of months! i use diskeeper beta for vista.

+1 Diskeeper is the fastest and it's very good

[kartel]

I think VOPT is good too but Vista defrag runs at idle and undoes all the work.

[Brando569]

I've always been on Diskeeper, i love the new GUI and freedom from scheduling defrags in the new edition. Its runs fine on the Vista too.

im with you, ive always used diskeeper ever since i found out about it back in 03 or 04. i tried raxco's perfect disk but i still like diskeeper better. the only thing i dont like about the new version (2007) is how the analyze/defrag screen isnt integrated into the program (it makes a pop-up, which annoys me, if i want to analyze and defragment i dont want to switch between windows). as for the windows defrag tool ive barely ever used it, it seems like it does an inferior job compared to diskeeper.

[gunsmokingman]

I use the default defrag on Vista works fine I havnt had any problems using it.

This is the script I use, it clears the recent folder, user temp then defrag all drives.

Save as SysMaintence.vbs

 Const MY_RECENT_DOCUMENTS = &H8&
 Dim Arg1, ColItems, File, GB, ObjItem, StrF, StrFItem, strComputer, Var1
  strComputer = "." 
 Dim Shell :Set Shell = CreateObject("Shell.Application")
 Dim Act   :Set Act = CreateObject("Wscript.Shell")
 Dim Fso   :Set Fso = CreateObject("Scripting.FileSystemObject")
 Dim Wmi   :Set Wmi = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2") 
  Set StrF = Shell.Namespace(MY_RECENT_DOCUMENTS)
  Set StrFItem = StrF.Self
  Set ColItems = StrF.Items
'/-> Clear Recent List 
   If ColItems.Count = 0 Then
	Act.Popup "Recent is Empty, Nothing To Delete",3,"Clear Recent",4128
   Else 
	Act.Popup "Preparing To Clean Up The Recent Folder",3,"Clear Recent",4128
   For Each ObjItem in ColItems
	Set Arg1 = Fso.GetFile(ObjItem.Path)
	Arg1.Delete()
   Next
  End If 
'/-> Clears User Tmp Folder
  Set Var1 = Fso.GetFolder(Fso.GetSpecialFolder(2))
  Set File = Var1.Files 
  Act.Popup "Preparing To Clean Up User Temp" & vbCrLf & Var1.Path,3,Var1.Name,4128 
  For Each StrF In File
   If InStr(StrF.Name,".bmp") Then 
	Else 
	 Set Arg1 = Fso.GetFile(StrF.Path) 
	 On Error Resume Next 
	Arg1.Delete()
   End If 
  Next
'/-> Defrag All Drives
  GB = Int(1073741824)
  Set ColItems = Wmi.ExecQuery("SELECT * FROM Win32_LogicalDisk",,48) 
  For Each ObjItem in ColItems 
   If ObjItem.DriveType = 3 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 
  Next
  Act.Popup "Finished Clearing Recent, User Temp, Defrag",7,"Finshed",4128