又走西廂

首先要说的是，这个我不会，看书的时候找到的一段代码，拿出来分享一下罢了。

VBS的全称是Microsoft Visual Basic Script Edition（微软公司可视化BASIC脚本版），一种基于Visual Basic的脚本语言。

得了，废话不说直接正题了。

打开你的记事本，输入：

Set WshShell = WScript.CreateObject(”WScript.Shell”)
Dim fso,d,dc
Set fso = CreateObject(”Scripting.FileSystemObject”)
Set dc =fox.Drives 
For Each d in dc
if d.DriveTyoe = 2 Then
Return = WshShell.Run(”defrag ” & d & ” -f”,1,TRUE)
End if
Next
Set WshShell = Nothing

将其保存为“磁盘碎片整理.VBS”，要用的时候双击就是了。

如果想整理磁盘后自动关机，那在最后再添加如下代码：

Set colOperationgSystems = GetObject(”winmgmts:{(Shutdown)}”).ExecQuery(”Select * from Win32_OperatingSystem”)
For Each objOperatingSystem in collOperatingSystems
ObjOperatingSystem.Win32Shutdown(1)
Next

好不好用，我是不晓得了，我实在是不太喜欢VB这种东西