在本地网络系统上安装软件时出错！访问被拒绝。 （异常来自HRESULT：0X80070005（E_ACCESSDENIED））

Question

 Dim wmins = ("//192.168.1.5/root/cimv2") 
     objOS = New ManagementObjectSearcher(wmins, "SELECT * FROM Win32_OperatingSystem ") 
     objCS = New ManagementObjectSearcher(wmins, "SELECT * FROM Win32_ComputerSystem") 
     objPR = New ManagementObjectSearcher(wmins, "SELECT * FROM Win32_Processor") 
     objHS = New ManagementObjectSearcher(wmins, "SELECT * FROM Win32_DiskDrive") 
     objIS = New ManagementObjectSearcher(wmins, "SELECT * FROM Win32_Product") 
     For Each objMgmt In objOS.Get 
        The error is: Access is denied. (Exception from HRESULT: 0x80070005 (E_ACCESSDENIED)) 


      m_strOSName = objMgmt("name").ToString() 
      m_strOSVersion = objMgmt("version").ToString() 
      m_strComputerName = objMgmt("csname").ToString() 
      m_strWindowsDir = objMgmt("windowsdirectory").ToString() 
     Next 

我只是想列出我的局域网系统中的所有已安装的软件的这一切

Answer 1

我想你没有权限来访问您要访问的路径。请检查您的机器的访问权限。