如何卸载生成的免疫文件

cj4025

这是安装免疫（测试成功）

#NoTrayIcon
#include <Process.au3>
$exe = @ScriptDir & "\jinzhi.txt"
$file = FileOpen($exe, 0)
If $file = -1 Then
    MsgBox(0, "错误", "无法打开文本，请检查相关设置！")
    Exit
EndIf
While 1
    $line = FileReadLine($file)
    If @error = -1 Then ExitLoop
    If $line <> "" Then
        DirCreate("" & $line & "")
        FileSetAttrib("" & $line & "", '+R+H+S+A')
        _RunDOS("echo Y|cacls " & $line & " /P Everyone:n")
    EndIf
WEnd

下面是jinzhi.txt

C:\0.ExE
C:\1.ExE
C:\12.ExE
C:\14.ExE
C:\2.ExE
C:\3.ExE
C:\315.ExE
C:\4.ExE
C:\42102BD8.ExE

这是我搞的 卸载.au3　（测试失败）

#NoTrayIcon
#include <Process.au3>
$exe = @ScriptDir & "\jinzhi.txt"
$file = FileOpen($exe, 0)
If $file = -1 Then
    MsgBox(0, "错误", "无法打开文本，请检查相关设置！")
    Exit
EndIf
While 1
    $line = FileReadLine($file)
    If @error = -1 Then ExitLoop
    If $line <> "" Then
        _RunDOS("echo Y|cacls " & $line & " /P Everyone:y")
         FileSetAttrib("" & $line & "", '-R-H-S-A')
        FileRecycle("" & $line & "")
    EndIf
WEnd

请问如何 搞定去属性和删除免疫文件?

         FileSetAttrib("" & $line & "", '-R-H-S-A')
        FileRecycle("" & $line & "")

这两个怎么试都不去属性和删除文件.

[ 本帖最后由 cj4025 于 2008-6-25 01:17 编辑 ]

cj4025

怎么没有人给解答啊.着急啊,,

cj4025

眼看贴子沉下去了,也没有人给解答下,郁闷 啊.

qq342252004

去掉权限，去掉隐藏，去掉只读，再删除。

cj4025

大哥啊，我试了，不可以啊

cj4025

论坛的高手都到那去了

cj4025

_RunDOS("echo Y|cacls " & $line & " /P Everyone:y")
     FileSetAttrib("" & $line & "", '-R-H-S-A')
        FileRecycle("" & $line & "")

那你看看我这个有错误吗？

cj4025

非常感谢，已经解决 已经给你加分。


不过你告诉我的有点小错误
        FileSetAttrib("" & $line & "", '-RHSA)
应该是
        FileSetAttrib("" & $line & "", '-RHSA')
少个引号。

非常感谢

#NoTrayIcon
#include <Process.au3>
$exe = @ScriptDir & "\jinzhi.txt"
$file = FileOpen($exe, 0)
If $file = -1 Then
    MsgBox(0, "错误", "无法打开文本，请检查相关设置！")
    Exit
EndIf
While 1
    $line = FileReadLine($file)
    If @error = -1 Then ExitLoop
    If $line <> "" Then
        _RunDOS("echo Y|cacls " & $line & " /g Everyone:f")
        FileSetAttrib("" & $line & "", '-RHSA')
        if fileexists ($line) then DirRemove ($line)
        if fileexists ($line) then FileDelete ($line)
    EndIf
WEnd

[ 本帖最后由 cj4025 于 2008-6-25 01:16 编辑 ]