|
8#
楼主 |
发表于 2007-3-17 19:05:16
|
只看该作者
原帖由 lxl1638 于 2007-3-17 06:32 PM 发表
支持一下,想知道设置FBWF、设置虚拟内存、安装驱动,这三方面功能的AutoIt源码能否帖上来,论坛上弄AutoIt的人还是不少的。
只是写注册表+运行外部程序
FBWF:RegWrite("HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Services\FBWF", "WinPECacheThreshold", "REG_DWORD", $finalfbwf) ;; set FBWF size
RunWait("sc.exe stop fbwf","", @SW_HIDE)
RunWait("sc.exe start fbwf","", @SW_HIDE) ;; enable FBWF service
虚拟内存:
Func page($size,$filename)
if $filename="" then $filename="d:\pagefile.sys"
if $size=0 Then
if FileExists(@systemdir & "\setpagefile.exe")then Run(@systemdir & "\setpagefile.exe")
Else
if FileExists(@systemdir & "\setpagefile.exe")then Run(@systemdir & "\setpagefile.exe /f " & $filename & " /i " & $size & " /m " & $size )
EndIf
EndFunc
安装驱动:
func devi()
if FileExists(@ScriptDir & "\外置程序\PE_OUTERPART\scandrive.cmd")then run( @ScriptDir & "\外置程序\PE_OUTERPART\scandrive.cmd")
EndFunc |
|