好的,部分归功于Fadi的评论,这让我发现了一条稍微不同的谷歌路径,我发现我的方式是我的方式answer。这个答案是为了找到一个文件的UNC而设计的,所以我稍微修改了它。
这里是我的代码:
Public Shared Function GetDriveUNC(ByVal sDrive As String) As String
If sDrive.IndexOf(":") Then
Dim searcher As New ManagementObjectSearcher("SELECT RemoteName FROM win32_NetworkConnection WHERE LocalName = '" + sDrive.Substring(0, 2) + "'")
For Each managementObject As ManagementObject In searcher.[Get]()
Dim sRemoteName As String = TryCast(managementObject("RemoteName"), String)
Return (New Uri(sRemoteName)).ToString()
Next
Return sDrive
Else
Return sDrive
End If
End Function
也许是这样的:[如何检查映射网络驱动器连接(https://stackoverflow.com/q/17848370/4039286) – Fadi
感谢一个想法,但这将返回映射驱动器的驱动器号。我正在查看是否在映射的所有驱动器中,是否有指向UNC \\ MyServer \ Share的驱动器。 –