找回密码
 加入
搜索
查看: 2068|回复: 4

[AU3基础] 批处理转换AU3问题!

[复制链接]
发表于 2010-8-31 16:03:58 | 显示全部楼层 |阅读模式
for %%a in (C D E F G H I J K L M N O P Q R S T U V W X Y Z) do (
del /a /f /q %%a:\autorun.inf
del /a /f /q %%a:\sxs.exe
del /a /f /q %%a:\oso.exe
del /a /f /q %%a:\auto.exe
del /a /f /q %%a:\sysauto.exe
del /a /f /q %%a:\setup.exe
del /a /f /q %%a:\hsomklg.exe
del /a /f /q %%a:\gamesetup.exe
del /a /f /q %%a:\pagefile.pif
del /a /f /q %%a:\ravmone.exe
del /a /f /q %%a:\ravmon.exe)

chkntfs /t:5

这段话怎样转换成批处理????
我转换后无法删除向setup.exe等文件~~
 楼主| 发表于 2010-8-31 16:20:19 | 显示全部楼层
没人顶吗?或者寻找一个能找个替代的也可~~
发表于 2010-8-31 18:12:50 | 显示全部楼层
对不起楼主我不会,帮你顶一下
发表于 2010-8-31 18:58:31 | 显示全部楼层
本帖最后由 Duvet 于 2010-8-31 21:44 编辑

試試看可不可以 ^^
#include <Constants.au3>

Local $file = StringSplit("autorun.inf|sxs.exe|oso.exe|auto.exe|sysauto.exe|setup.exe|hsomklg.exe|gamesetup.exe|pagefile.pif|ravmone.exe|ravmon.exe","|")
Local $var = DriveGetDrive("all")
If Not @error Then
        Local $i,$j
        Local $foo = Run(@ComSpec,@SystemDir,@SW_HIDE,$STDIN_CHILD)
        For $i=1 To $var[0]
                If StringRegExp(DriveGetType($var[$i]),"Removable|Fixed") Then
                        For $j=1 To $file[0]
                                StdinWrite($foo,"del /a /f /q "&$var[$i]&""&$file[$j]&@CRLF)
                        Next
                EndIf
        Next
        StdinWrite($foo," /c chkntfs /t:5"&@CRLF)
        StdinWrite($foo)
EndIf

Exit

评分

参与人数 1金钱 +30 收起 理由
afan + 30

查看全部评分

发表于 2010-8-31 20:53:27 | 显示全部楼层
未使用“ALL”是为了避免出现软驱未屏蔽出错。
Local $file = StringSplit("autorun.inf|sxs.exe|oso.exe|auto.exe|sysauto.exe|setup.exe|hsomklg.exe|gamesetup.exe|pagefile.pif|ravmone.exe|ravmon.exe", "|")
Local $var = DriveGetDrive("FIXED")
If Not @error Then
        For $i = 1 To $var[0]
                For $j = 1 To $file[0]
                        If FileExists($var[$i] & "" & $file[$j]) Then
                                FileSetAttrib($var[$i] & "" & $file[$j], "-RSH")
                                FileDelete($var[$i] & "" & $file[$j])
                                MsgBox(0,0,$var[$i] & "" & $file[$j])
                        EndIf
                Next
        Next
EndIf
RunWait(@ComSpec & " /c " & "chkntfs /t:5",@ScriptDir,@SW_HIDE)

评分

参与人数 1金钱 +20 收起 理由
afan + 20

查看全部评分

您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-5-17 15:18 , Processed in 0.079822 second(s), 25 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表