在c#中从远程机器获取映射的网络驱动器

本文关键字:获取 映射 驱动器 网络 机器 程机器 | 更新日期: 2023-09-27 17:52:12

我想使用WMI c#在远程机器中列出映射的网络驱动器。我使用以下代码

      ConnectionOptions connectionOptions = new ConnectionOptions();
            connectionOptions.Username = "myAdminUser";
            connectionOptions.Password = "Password";
            connectionOptions.Impersonation = ImpersonationLevel.Impersonate;
            ManagementScope Scope = new ManagementScope(@"''" + "myClientMachine" + @"'root'cimv2", connectionOptions);
            Scope.Connect();
            ManagementObjectSearcher win32Drives = new ManagementObjectSearcher(Scope,
 new ObjectQuery(@"SELECT Name,UserName FROM Win32_NetworkConnection'"));
            foreach (ManagementObject DriveData in win32Drives.Get())
            {
                string drivePath = (string)DriveData["Name"];
                string userName = (string)DriveData["UserName"];
            } 

我在我的服务器机器上运行这段代码,并使用管理凭据从
获取映射驱动器我的客户端机器…当我使用Admin凭据时,此代码返回0结果。但同时,当我使用我的客户端用户凭据时,它返回客户端用户的映射驱动器。

这里,我的问题是,是否有任何方法可以为所有用户获得客户端机器中的所有映射驱动器?

在c#中从远程机器获取映射的网络驱动器

是的,您可以利用winmgmts查询并通过vbscript从脚本扫描计算机中检索它们

'Define variables, constants and objects 
strComputer="<remote machine here>" 
Const HKEY_USERS = &H80000003 
Set objWbem = GetObject("winmgmts:") 
Set objRegistry = GetObject("winmgmts://" & strComputer & "/root/default:StdRegProv") 
Set objWMIService = GetObject("winmgmts:"  & "{impersonationLevel=impersonate}!''" & strComputer & "'root'cimv2") 
'Go and get the currently logged on user by checking the owner of the Explorer.exe process.   
Set colProc = objWmiService.ExecQuery("Select Name from Win32_Process" & " Where Name='explorer.exe' and SessionID=0") 
If colProc.Count > 0 Then 
    For Each oProcess In colProc 
        oProcess.GetOwner sUser, sDomain 
    Next 
End If 
'Loop through the HKEY_USERS hive until (ignoring the .DEFAULT and _CLASSES trees) until we find the tree that  
'corresponds to the currently logged on user. 
lngRtn = objRegistry.EnumKey(HKEY_USERS, "", arrRegKeys)     
For Each strKey In arrRegKeys 
    If UCase(strKey) = ".DEFAULT" Or UCase(Right(strKey, 8)) = "_CLASSES" Then 
    Else 
        Set objSID = objWbem.Get("Win32_SID.SID='" & strKey & "'") 
'If the account name of the current sid we're checking matches the accountname we're looking for Then 
'enumerate the Network subtree 
        If objSID.accountname = sUser Then  
            regpath2enumerate = strkey & "'Network" 'strkey is the SID 
            objRegistry.enumkey hkey_users, regpath2enumerate, arrkeynames 
'If the array has elements, go and get the drives info from the registry 
            If Not (IsEmpty(arrkeynames)) Then 
                For Each subkey In arrkeynames 
                    regpath = strkey & "'Network'" & subkey 
                    regentry = "RemotePath" 
                    objRegistry.getstringvalue hkey_users, regpath, regentry, dapath 
                    wscript.echo subkey & ":" & vbTab & dapath 
                Next 
            End If 
        End If 
    End If 
Next 

http://gallery.technet.microsoft.com/scriptcenter/3dd6af3e - edfa - 4581 bc35 - 805314 - f26bb8

或者你可以使用c#版本:

http://bytes.com/topic/net/answers/170583-list-mapped-drives-remote-machine