VB脚本解锁远程中的所有文件

Question

是否可以解锁远程其他用户打开的文件夹中的所有文件。

使用vbscript。

Answer 1

您无法在本地终止，除非本地意味着您在托管文件共享的服务器上。通过打开的会话终止与服务器的连接。如果他们是办公室文档，则需要对其进行适当配置，以允许多个用户同时打开它们。这里有一些脚本通过终止附加到这些文件的会话来解锁文件。

查看网络会话/用户 - 或者使用：net session

Set objConnection = GetObject(“WinNT://server/LanmanServer”)
Set Sessions = objConnection.Sessions
For Each session in Sessions
    Wscript.Echo “Computer: ” & session.Computer
    Wscript.Echo “Connected Time: ” & session.ConnectTime
    Wscript.Echo “Idle Time: ” & session.IdleTime
    Wscript.Echo “Name: ” & session.Name
    Wscript.Echo “User: ” & session.User
    Wscript.Echo
Next

查看网络会话的打开文件

Set objConnection = GetObject(“WinNT://server/LanmanServer”)
Set SessionFiles = objConnection.Resources
For Each objResource in SessionFiles
    Wscript.Echo “Path: ” & objResource.Path
    Wscript.Echo “User: ” & objResource.User
    Wscript.Echo
Next

终止会话

Set objConnection = GetObject("WinNT://server/LanmanServer")
Set Sessions = objConnection.Sessions
For Each resource in Sessions
    'net session \\computername /delete /y
    Sessions.Remove(resource.Name)
Next