[已解决]清理垃圾问题?

newuser

ToolTip(@CR & '  正在清理系统垃圾文件，请稍候...  ' & @CR, @DesktopWidth - 240, @DesktopHeight - 100)
        $FileName=FileOpen(@TempDir & "\tmp.bat",2+8) ;2表示覆盖原由文件内容，8表示如果目录不存在强行建立
        $sCmdFile = 'del /f /s /q %systemdrive%\*.tmp' & @CRLF _
                         & 'del /f /s /q %systemdrive%\*._mp' & @CRLF _
                         & 'del /f /s /q %systemdrive%\*.log' & @CRLF _
                         & 'del /f /s /q %systemdrive%\*.gid' & @CRLF _
                         & 'del /f /s /q %systemdrive%\*.chk' & @CRLF _
                         & 'del /f /s /q %systemdrive%\*.old' & @CRLF _
                         & 'del /f /s /q %systemdrive%\recycled\*.*' & @CRLF _
                         & 'del /f /s /q %windir%\*.bak' & @CRLF _
                         & 'del /f /s /q %windir%\prefetch\*.*' & @CRLF _
                         & 'rd /s /q %windir%\temp' & @CRLF _
                         & 'md %windir%\temp' & @CRLF _
                         & 'del ' & @TempDir & '\tmp.bat'
        FileWrite(@TempDir & "\tmp.bat", $sCmdFile)
        FileClose($FileName)
        Run(@TempDir & "\tmp.bat", @TempDir, @SW_HIDE)
        DirRemove("c:\Documents and Settings" & @UserName & "\Local Settings\Temp", 1) ;1表示连同子目录一同删除
        Sleep(3000)

以下代码执行没有错误,但为什么没有清除指定文件?

afan

$FileName=FileOpen...
后面的FileWrite(@TempDir & "\tmp.bat"... 应该直接用 FileWrite($FileName,...

newuser

回复 2# afan
谢谢,解决了,自己的不严谨,但看帮助,filewrite()既可以往文件句炳写内容也可以往文件里写啊?

3mile

回复 3# newuser
文件未建立如何打开？
去掉FileOpen ;fileclose这两行即可。

newuser

回复 4# 3mile
;示例 3 ACN例子
;================================================
;脚本目录创建一个名字叫file的文件夹，并且在文件夹内创建一个LOG.TXT文本.
FileClose(FileOpen("file\LOG.TXT",10))
对fileopen()打开的文件不存在就建立不对吗?

3mile

回复 5# newuser
呵呵，怪我没仔细看源码。

lixiaolong

可以清除IE临时缓存吗？

au3x

DirRemove("c:\Documents and Settings\" & @UserName & "\Local Settings\Temp", 1)

这一句，生效吗？

au3x

dim $temp=DirRemove("c:\Documents and Settings\" & @UserName & "\Local Settings\Temp", 1)
msgbox(0," ", $temp

值为：0     我试过，没有效