TA的每日心情 | 开心 2014-7-28 21:47 |
---|
签到天数: 2 天 [LV.1]初来乍到
|
使用XP自带的磁盘碎片管理程序整理磁盘碎片时,不能自动整理所有磁盘,只能我们手动整理完一个再整理另一个,这对于我们这些懒人来说,确实不可忍受,所以只能出些懒招了。
# P, w) v& @, o0 o" q4 i方法一:5 @+ v8 L* I7 i5 ?5 s
使用批处理,将以下代码保存为文件 AutoDefrag.bat
9 ^) N- b, z$ C, \# vfor %%d in (c: d: e do defrag %%d /f
8 w/ G* n: W+ H2 }$ Z, `0 W6 C7 O需要整理碎片的时候,只要双击该文件即可。其中,c: d: e: 为要整理的分区盘符,可根据自己的实际情况自行添加或更改。 + L" [3 g/ H4 D( M, W9 e
方法二:& X+ L. h5 g. p2 d' {+ f! s
使用 solid; BORDER-TOP: 1px solid; BORDER-LEFT: 1px solid; BORDER-BOTTOM: 1px solid" cellPadding=0 width="80%" border=1> '批量整理磁盘碎片脚本
# \8 q* J" _, W& _1 N6 Y uset WshShell = CreateObject("WScript.Shell")
; z0 ^! h J B# g'启动图形界面的整理程序 0 q: y8 c# ^+ E/ W d) M$ X e3 H' ^5 e
WshShell.Run "dfrg.msc"
4 I# t5 h G# K1 Z! w: NWScript.Sleep 1000
/ [1 z* P0 [2 f0 Z'等待1秒钟,用于程序启动 : j( `& u3 V: b8 I
While WshShell.AppActivate("磁盘碎片整理程序") = FALSE
, u2 Y0 B% S7 [* z0 n i0 _wscript.sleep 1000
; v3 g' @* }0 G$ T% t( ] wWend 5 l3 F1 p9 y' T `
'将磁盘碎片整理程序选为当前窗口 ) L9 g* n5 g @2 L1 h
WshShell.AppActivate "磁盘碎片整理程序"
9 U- X8 R( S% G: {( ^WScript.Sleep 200
x& i3 h* J+ K, G'按下“ALT+A”打开下拉菜单 2 M. \8 L0 N% f! Y3 j2 v
WshShell.SendKeys "%A"
0 s: R: b2 I, j8 \WScript.Sleep 200
6 J H% u) z& s6 r'按下“D”键 # }5 z2 w% X3 X/ ~# E
WshShell.SendKeys "D" 5 x' d7 [. a" L- b
'整理完毕后等待5秒钟 . w( `* @- `& F/ F C0 E, u" a" p
While WshShell.AppActivate("磁盘碎片整理完毕") = FALSE " W+ I2 _" L; c: @$ F/ P# A
wscript.sleep 5000
, S( e9 g$ Z6 H% LWend
: b8 ]4 m, R/ E* C7 f1 @; `( \* d'激活该窗口
; U0 k, B( t0 rWshShell.AppActivate "磁盘碎片整理完毕"
7 F- ?. L3 V4 p& q7 A! AWScript.Sleep 200 7 j/ z7 ?% |. Y( H- j6 a7 [
WshShell.Sendkeys "{TAB}"
) g1 X9 W# s3 R& G* FWscript.Sleep 500 , q; I1 h. i/ V( w" J
WshShell.Sendkeys "{ENTER}"
2 c7 S7 I+ w# e& j2 K2 qWscript.Sleep 500 - J6 ^: Z( S+ r1 B8 H K$ c
'按下“ALT+F4”关闭整理程序 + s o d' A; t& u. e: r! L" S
WshShell.Sendkeys "%{F4}" D" p, a7 ^- Z0 Z g) b/ C% `
使用方法:双击 |
|