Defrag .vbs

Hola , he visto por la red este script en java para optimizar la defragmentacion :



--defrag.vbs--



Set shell=createobject("WScript.Shell")



shell.run "defrag c:", 2, false



shell.run "defrag d:", 2, false



--cut---



pero no tengo muy claro , que se consigue realmente con esto



Gracias

Saludos

Wenas, creo que lo viste en esta pagina pero terminado en .es, te pongo un recorte del post que yo acabo de leer:

Nos defragmentará, al cerrar windows, el disco C: y el D: (suprimid o añadid las lineas que queráis). Evidentemente, esta defragmentacion llevará tiempo. Pero será bueno ejecutarla una vez al mes, por ejemplo, para que las estadísticas de uso de programas tengan ya contenido válido para la defragmentación

Se refiere al codigo que pusiste, un saludo

Wenas FranGK,



He aplicado el codigo, y al cerrar windows pone que " se esta ejecutando secuencia de comando " y al poco se apaga el pc .Creo que no desfragmentara mucho asi, tambien puede ser que el disco c que es el del so no este fragmentado demasiado, pero lo curioso es que la segundo linea del codigo la que se refiere al disco d no la ejecuta, pues he ejecutado el fichero .vbs y en la pantalla del msdos solo aparece que desfragmenta c y a los pocos segundos se cierra la ventana del dos .Con lo cual, no desfragmenta d .¿Sabes el porque ?



Gracias

Saludos

Wenas, probaste ha hacer esto?

Ejecutamos gpedit.msc.

En “Computer Configuration” -> “Windows Settings” -> Scripts (Startup/Shutdown) podemos incluir un script, por ejemplo, de Visual Basic. En particular, si en el shutdown, le ponemos el nombre de un fichero, llamémosle por ejemplo, defrag.vbs, cuyo contenido sea:

Set shell=createobject(”WScript.Shell”)

shell.run “defrag c:”, 2, false

shell.run “defrag d:”, 2, false

saludos

Wenas,



Yo primero creo el fichero defrag.vbs y luego lo pongo en el apagado, es asi cocmo se tiene que hacer .



gpedit.msc----->configuracion equipo ---->configuracion windows---->archivos de comandos inicio /apagado----->apagar el la ventana que aparece el poy a agregar y aparece otra mas pequeña que pone nombre del archivo de comandos .Ahi le doy a examinar y pongo el arcchivo defrag.vbs acepto y cierro



Gracias

Saludos

me alegro que te haya funcionado, venga un saludo

Si, el tema es que creo que en el poco tiempo que se ejecuta desfragmentara poco , aparte como ya te dije,la unidad d no la desfragmenta , y no se porque, puesto que en el script si que esta la orden .Sabes porque no funciona en d y en c dura tan poco el proceso ?



Gracias

Saludos

Wenas,



Buscando por la red he encontrado este codigo de visual basic qie al parecer si que desfragmenta el segundo disco .El codigo es el siguiente







Set WshShell = WScript.CreateObject("WScript.Shell")



Dim fso, d, dc

Set fso = CreateObject("Scripting.FileSystemObject")

Set dc = fso.Drives

For Each d in dc

If d.DriveType = 2 Then

Return = WshShell.Run("defrag " & d & " -f", 1, TRUE)

End If

Next



Set WshShell = Nothing



Este codigo desfragmenta todos los hdd que tengas en el pc .Lo Puedo poner en el apagado de pc como el primero ?



Gracias

Saludos