Question

我正在尝试在运行程序时自动删除程序的文件。如果我在Windows中手动删除文件，程序会识别更改，但如果我用脚本删除文件，则不。

但是，所有文件都会被删除。我尝试了一个bat和一个vbs脚本，手动执行脚本和/或通过程序内的调用 - 总是得到相同的结果：识别手动删除，不删除脚本。我应该提一下，我可以从LUA 4.0中调用脚本/可执行文件来自动删除文件。

如果我在Windows中删除文件并且与脚本删除的方式不同，会发生什么？有没有办法100％模仿Windows删除例程？或者是否有一些秘密'文件夹得到了更新'标志，我不知道？自然文件夹属性DateLastAccessed和DateLastModified会更新。

为了完整起见，这里是我的脚本（他们删除任何适合*Random*.level的现有文件并删除空文件夹）：

BAT：

REM delete all "Random" maps
del /S *Random*.level
REM remove empty folders
for /f "delims=" %%d in ('dir /S /B /A:D ^| sort /r') do rd "%%d"

VBS：

' create shell
Set objShell = CreateObject("Wscript.Shell")
' get current path
strPath = objShell.CurrentDirectory
' create file system object
Set oFSO = CreateObject("Scripting.FileSystemObject")
' delete all random level files
ProcessSubFolders oFSO.GetFolder(strPath)


Sub ProcessSubFolders(oFolder)
    ' get all files in the folder
    Set cFiles = oFolder.Files
    ' for every file
    For Each oFile In cFiles
        ' check if it's a level file and has "Random" in its name
        If Right(oFile.Name, Len(".level")) = ".level" And InStr(oFile.Name, "Random") Then
            ' if true delete it
            oFile.Delete
        End If
    Next

    ' process all subfolders in the same manner
    For Each oSubFolder In oFolder.SubFolders
        ProcessSubFolders oSubFolder
    Next

    ' if folder is empty
    If oFolder.SubFolders.Count = 0 And oFolder.Files.Count = 0 Then
        ' delete it
        oFolder.Delete 
    End If
End Sub

Answer 1

Shell.Application对象能够执行文件系统操作，就好像它们是manually initiated一样。例如，Folder.CopyHere方法允许通过将文件复制到Windows Compressed Folders来创建zip文件。您会看到文件复制进度条和所有内容。

因此，通过扩展，使用相同的Shell.Application对象执行文件删除的行为与删除手动文件的行为相同。这是我编写的一个简短的JScript脚本来测试我的理论：

var shl = new ActiveXObject("Shell.Application");
var items = shl.NameSpace("c:\\users\\me\\desktop").Items();

for (var i=0; i<items.Count; i++) {
    if (/\.tmp$/i.test(items.Item(i).Name)) {
        WSH.Echo('deleting ' + items.Item(i).Name);
        items.Item(i).InvokeVerb('delete');
    }
}

...从我的桌面删除* .tmp。不幸的是，对于它遇到的每个.tmp文件，我得到一个确认窗口对话框，询问“你确定要将此文件发送到回收站吗？”粗略调查时，only workaround I've seen不是删除文件，而是将文件移动到临时文件夹，然后删除文件夹。我不确定这是否能满足你的条件，但我认为值得尝试。

手动删除和脚本删除之间的区别？！（蝙蝠或vbs）

1 个答案:

手动删除和脚本删除之间的区别？！ （蝙蝠或vbs）

1 个答案:

手动删除和脚本删除之间的区别？！（蝙蝠或vbs）