windows - 检查网络驱动器是否正常工作

Question

我已经有一个 vbs 脚本来检查它是否映射到服务器中的网络驱动器：

Set objFSO = CreateObject("Scripting.FileSystemObject")
Set colDrives = objFSO.Drives

For Each objDrive in colDrives
    If CBool(objDrive.DriveType = 3) Then ' Network disk
           If (objFSO.DriveExists(objDrive.DriveLetter) = True) Then
              Wscript.Echo "Network Drive Mapped : " & objDrive.DriveLetter
           End If
    End If
Next

问题是它没有说明该网络驱动器是否仍然存在。例如，在一台服务器中有 3 个网络驱动器：

但是其中一个（驱动器 Y:) 已失去连接。

我试图找出什么 vbs 命令可以给出这个结果，但我还没有找到它。

Answer 1

尝试使用 Drive 对象“IsReady”方法。如果为 TRUE，则驱动器可用。