Vbscript Windows 7赢得';t自动刷新文件夹,使用Sendkey制作vbs脚本进行刷新

Vbscript Windows 7赢得';t自动刷新文件夹,使用Sendkey制作vbs脚本进行刷新,vbscript,Vbscript,因为win7不会刷新我存储日志文件的文件夹,所以我在网上找到了一个脚本,但它似乎不起作用 Sub RefreshSavedFiles() Dim oShellObject Set oShellObject = CreateObject("Wscript.Shell") strFolder = "C:\Users\User\Documents\PDF files saved" oShellObject.AppActivate strFolder oShellObject.SendKeys "{F5

因为win7不会刷新我存储日志文件的文件夹,所以我在网上找到了一个脚本,但它似乎不起作用

Sub RefreshSavedFiles()
Dim oShellObject
Set oShellObject = CreateObject("Wscript.Shell")
strFolder = "C:\Users\User\Documents\PDF files saved"
oShellObject.AppActivate strFolder
oShellObject.SendKeys "{F5}"
End Sub

我有一个备份程序,在将文件备份到服务器之前调用此脚本

这将枚举打开的文件夹并刷新指定的两个文件夹

Set objShell = CreateObject("Shell.Application")
    Set AllWindows = objShell.Windows
    For Each window in AllWindows
        If window.locationname = "C:\" or window.locationname = "website2.com" then
            window.refresh2 3
        End If
    Next

你能解释一下脚本在什么方面不起作用吗?您是否遇到错误?除了
SendKeys
非常脆弱且应尽可能避免之外,为什么备份程序会依赖于Windows资源管理器中显示的文件夹内容?请退后一步,描述您试图解决的实际问题,而不是您认为的解决方案。您的意思是在文件夹中出现特定文件时发送电子邮件吗?我正在通过Putty从plc中提取错误/警报,这些文件存储在连接到plc的计算机上的文件夹中。但是putty会保持日志文件的打开状态,并在发生报警/错误时向其添加新行。然后,我使用一个名为Syncback的程序将此日志文件备份到服务器。同时,有一种信息亭,实时显示工厂上方的警报。但是因为Win7不会自动刷新我的日志文件。如果我按F5键或打开日志文件,它会立即出现在信息亭上。我不确定我是否完全理解您的设置,但我认为最好通过检查文件是否存在,然后显示通知或其他内容。让我简单解释一下我的设置。所以Putty正在文件夹中创建一个日志文件。但是putty会继续运行并向日志文件中添加行。但主要问题是,只有在打开日志文件或存储日志文件的文件夹时,日志文件才会更新(这意味着我的时间戳不会更改)。