LocalComputer 集合

包含一个对象,该对象对应于要访问其目录的计算机。 此对象保存计算机级别设置信息。 如果对从 COMAdminCatalog 类创建的对象调用 Connect 方法,则 LocalComputer 集合中的 对象包含有关要访问其目录的远程计算机的信息。

此集合不支持 COMAdminCatalogCollection 对象的 AddRemove 方法。

成员

LocalComputer 集合继承自 IUnknown 接口,但没有其他成员。

可以从此集合导航到以下任何集合:

可以从以下集合导航到此集合:

属性

集合中的 COMAdminCatalogObject 对象支持以下属性:

ApplicationProxyRSN

条目
说明 默认情况下,应用程序代理使用的远程服务器名称。
Access ReadWrite
类型 字符串
默认 ""
最小系统 Windows 2000

 

CISEnabled

条目
说明 指示是否启用 COM Internet 服务。
Access ReadWrite
类型 Bool
默认 错误
最小系统 Windows 2000

 

DCOMEnabled

条目
说明 设置为 True 以在计算机上启用 DCOM。
Access ReadWrite
类型 Bool
默认 True
最小系统 Windows 2000

 

DefaultAuthenticationLevel

条目
说明 将“身份验证”设置为“默认”的应用程序使用的身份验证级别。 值对应于远程过程调用 (RPC) 身份验证设置。
Access ReadWrite
类型 Long Possible values:COMAdminAuthenticationDefault (0) COMAdminAuthenticationNone (1) COMAdminAuthenticationConnect (2) COMAdminAuthenticationCall (3) COMAdminAuthenticationPacket (4) COMAdminAuthenticationIntegrity (5) COMAdminAuthenticationPrivacy (6)
默认 COMAdminAuthenticationConnect (2)
最小系统 Windows 2000

 

注意

COM 调用 CoInitializeSecurity 时,COMAdminAuthenticationDefault 映射到 COMAdminAuthenticationConnect。 建议在枚举中使用常量,而不是数值。

 

DefaultImpersonationLevel

条目
说明 如果未设置模拟级别,则允许。
Access ReadWrite
类型 Long Possible values:COMAdminImpersonationAnonymous (1) COMAdminImpersonationIdentify (2) COMAdminImpersonationImpersonate (3) COMAdminImpersonationDelegate (4)
默认 COMAdminImpersonationIdentify (2)
最小系统 Windows 2000

 

注意

建议在枚举中使用常量,而不是数值。

 

DefaultToInternetPorts

条目
说明 确定提供的默认端口类型是 Internet (True) 还是 Intranet (False) 。
Access ReadWrite
类型 Bool
默认 错误
最小系统 Windows 2000

 

说明

条目
说明 计算机的说明。
Access ReadWrite
类型 字符串
默认 ""
最小系统 Windows 2000

 

DSPartitionLookupEnabled

条目
说明 指示是否将分区映射的用户签入域存储。
Access ReadWrite
类型 Bool
默认 True
最小系统 Windows Server 2003

 

InternetPortsListed

条目
说明 确定端口属性中列出的端口是用于 Internet (True) 还是用于 Intranet (False) 。
Access ReadWrite
类型 Bool
默认 错误
最小系统 Windows 2000

 

IsRouter

条目
说明 如果计算机是组件负载均衡 (CLB) 服务的路由器,则设置为 True。 仅当计算机上当前安装了组件负载均衡服务时,才能将此属性设置为 True;否则,COMADMIN_E_REQUIRES_DIFFERENT_PLATFORM出错。
Access ReadWrite
类型 Bool
默认 错误
最小系统 Windows 2000

 

如果此属性设置为 True,则会配置 CLB 服务器并在启动时启动。 服务器将添加到 ApplicationCluster 集合(如果尚不存在)。

LoadBalancingCLSID

条目
说明 要平衡的 对象的 CLSID。
Access ReadWrite
类型 字符串
默认 Null
最小系统 Windows XP

 

LocalPartitionLookupEnabled

条目
说明 指示是否将分区映射的用户签入本地存储。
Access ReadWrite
类型 Bool
默认 True
最小系统 Windows Server 2003

 

名称

条目
说明 计算机的名称。 将去除字符串开头和末尾的额外空格。当对此集合的对象调用 KeyName 属性方法时,将返回此属性。
Access WriteOnce
类型 字符串
默认 “我的电脑”
最小系统 Windows 2000

 

OperatingSystem

条目
说明 本地计算机上安装的操作系统。
Access ReadWrite
类型 Long Possible values:COMAdminOSNotInitialized (0) COMAdminOSWindows3_1 (1) COMAdminOSWindows9x (2) COMAdminOSWindows2000 (3) COMAdminOSWindows2000AdvancedServer (4) COMAdminOSWindows2000Unknown (5) COMAdminOSUnknown (6) COMAdminOSWindowsXPPersonal (11) COMAdminOSWindowsXPProfessional (12) COMAdminOSWindowsNETStandardServer (13) COMAdminOSWindowsNETEnterpriseServer (14) COMAdminOSWindowsNETDatacenterServer (15) COMAdminOSWindowsNETWebServer (16)
默认 COMAdminOSNotInitialized (0)
最小系统 Windows 2000

 

PartitionsEnabled

条目
说明 指示是否可以在本地计算机上使用 COM+ 分区。 如果此属性为 False,则任何使用 COM+ 分区的尝试都会导致错误。
Access ReadWrite
类型 Bool
默认 错误
最小系统 Windows Server 2003

 

端口

条目
说明 描述供 Internet 或 Intranet 使用的端口的字符串,具体取决于 InternetPortsListed 属性;例如,“500-599: 600-800”。
Access ReadWrite
类型 字符串
默认 ""
最小系统 Windows 2000

 

ResourcePoolingEnabled

条目
说明 允许使用资源分配器。
Access ReadWrite
类型 Bool
默认 True
最小系统 Windows 2000

 

RPCProxyEnabled

条目
说明 控制是否启用 RPC IIS 代理。 RPC IIS 代理与 IIS 结合使用,从 IIS 转发对 RPC 机制的调用,并且是 COM Internet 服务的核心部分之一,通过将 CISEnabled 设置为 True 来启用此代理。 有关 RPCProxyEnabled 的详细信息,请参阅 HTTP RPC 安全性
Access ReadWrite
类型 Bool
默认 错误
最小系统 Windows 2000

 

SecureReferencesEnabled

条目
说明 在保护 IUnknown::AddRef 和 IUnknown::Release 方法的跨进程调用的 DCOM 计算机中强制实施 。
Access ReadWrite
类型 Bool
默认 错误
最小系统 Windows 2000

 

SecurityTrackingEnabled

条目
说明 如果对对象启用了安全跟踪,则设置为 True。
Access ReadWrite
类型 Bool
默认 True
最小系统 Windows 2000

 

SRPActivateAsActivatorChecks

条目
说明 确定软件限制策略 (SRP) 如何处理激活即激活器连接。 如果设置为 True,则为服务器对象配置的 SRP 信任级别与客户端对象的 SRP 信任级别进行比较,而较高 (更严格的) 信任级别用于运行服务器对象。 如果设置为 False,则服务器对象使用客户端对象的 SRP 信任级别运行,而不考虑配置服务器的 SRP 信任级别。
Access ReadWrite
类型 Bool
默认 True
最小系统 Windows XP

 

SRPRunningObjectChecks

条目
说明 确定软件限制策略 (SRP) 如何处理与现有进程的尝试连接。 如果设置为 False,则不会检查连接到正在运行的对象是否适合相应的 SRP 信任级别。 如果设置为 True,则正在运行的对象必须具有与客户端对象相等或更高的 (比客户端对象更严格的) SRP 信任级别。 例如,具有 Unrestricted SRP 信任级别的客户端对象无法连接到具有不允许的 SRP 信任级别的正在运行的对象。
Access ReadWrite
类型 Bool
默认 True
最小系统 Windows XP

 

TransactionTimeout

条目
说明 如果在一个事务中执行大量操作,则应设置为足够的值(以秒为单位)。 默认超时期限为 60 秒,最大超时期限为 3600 秒 (1 小时) 。 将此属性设置为 0 将禁用事务超时。 此属性可以通过使用 Components 集合的 ComponentTransactionTimeout 属性被各个 组件 重写。
Access ReadWrite
类型 长 (0-3600)
默认 60
最小系统 Windows 2000

 

示例

以下 Microsoft Visual Basic 示例演示如何连接到远程计算机,并使用远程计算机的 LocalComputer 集合获取其 SecurityTrackingEnabled 属性。 若要使用此示例,请添加 COM+ 管理员类型库作为对 Visual Basic 项目的引用。

Function RemoteComputerConnect(strComputer As String _
) As Boolean  ' Return False if any errors occur.
    
    RemoteComputerConnect = False   ' Initialize the function.
    On Error GoTo My_Error_Handler  ' Initialize error handling.

    Dim boolSTE As Boolean
    Dim objCatalog As COMAdminCatalog
    Dim objRemoteRootColl As COMAdminCatalogCollection
    Dim objRemoteComputerColl As COMAdminCatalogCollection
    Dim objRemoteComputerItem As COMAdminCatalogObject
    
    Set objCatalog = CreateObject("COMAdmin.COMAdminCatalog")
    Set objRemoteRootColl = objCatalog.Connect(strComputer)
    Set objRemoteComputerColl = objRemoteRootColl.GetCollection( _
      "LocalComputer", objRemoteRootColl.Name)
    objRemoteComputerColl.Populate
    Set objRemoteComputerItem = objRemoteComputerColl.Item(0)
    boolSTE = objRemoteComputerItem.Value("SecurityTrackingEnabled")
    If boolSTE Then
        MsgBox "Security Tracking is enabled on " & strComputer
    Else
        MsgBox "Security Tracking is NOT enabled on " & strComputer
    End If

    Set objRemoteComputerItem = Nothing
    Set objRemoteComputerColl = Nothing
    Set objRemoteRootColl = Nothing
    Set objCatalog = Nothing
    RemoteComputerConnect = True  ' Successful end to procedure
    Exit Function

My_Error_Handler:  ' Replace with specific error handling.
    MsgBox "Error # " & Err.Number & " (Hex: " & Hex(Err.Number) _
      & ")" & vbNewLine & Err.Description
    Set objRemoteComputerItem = Nothing
    Set objRemoteComputerColl = Nothing
    Set objRemoteRootColl = Nothing
    Set objCatalog = Nothing
End Function


若要使用 函数,请为远程计算机的名称提供字符串值。 以下 Visual Basic 代码演示如何连接到名为“RemoteComputerName”的计算机。

Sub Main()
    If Not RemoteComputerConnect("RemoteComputerName") Then
        MsgBox "RemoteComputerConnect failed."
    End If
End Sub

另请参阅

COM+ 管理集合