Home
  •  

DFS 客户端计算机发现

Microsoft.Windows.FileServer.DFSN.DfsClientDiscovery (Discovery)

此对象为发现的每一台计算机创建 DFS 客户端计算机类的实例，并用于启用客户端计算机来监视 DFS 命名空间的可用性。

Knowledge Base article:

摘要

此对象为发现的每一台计算机创建 DFS 客户端计算机类的实例，并用于启用客户端计算机来监视 DFS 命名空间的可用性。

默认情况下，此对象已禁用。启用时，此对象运行 DFSNClientDiscovery.vbs 脚本。

启用此对象可测试计算机是否可以访问 DFS 命名空间、文件夹（链接）和文件夹目标。请勿在众多计算机上启用此对象，因为命名空间测试会产生大量网络流量。而是仅在特定计算机上使用替代项启用此对象。

Element properties:

TargetMicrosoft.Windows.Computer
EnabledFalse
Frequency43200
RemotableFalse

Object Discovery Details:

Discovered Classes and their attribuets:

Member Modules:

ID Module Type TypeId RunAs 
DS DataSource Microsoft.Windows.TimedScript.DiscoveryProvider Default

Source Code:

<Discovery ID="Microsoft.Windows.FileServer.DFSN.DfsClientDiscovery" Enabled="false" Target="Windows!Microsoft.Windows.Computer" ConfirmDelivery="false" Remotable="true" Priority="Normal">

  <Category>Discovery</Category>

  <DiscoveryTypes>

    <DiscoveryClass TypeID="Microsoft.Windows.FileServer.DFSN.Client"/>

  </DiscoveryTypes>

  <DataSource ID="DS" TypeID="Windows!Microsoft.Windows.TimedScript.DiscoveryProvider">

    <IntervalSeconds>43200</IntervalSeconds>

    <SyncTime/>

    <ScriptName>DFSNClientDiscovery.vbs</ScriptName>

    <Arguments>0 $MPElement$ $Target/Id$ $Target/Property[Type="Windows!Microsoft.Windows.Computer"]/PrincipalName$</Arguments>

    <ScriptBody><Script>Option Explicit

SetLocale("en-us") 

Dim SourceType, SourceID, ManagedEntityId, oArgs, oAPI, sDfsClientName

Set oAPI = CreateObject("MOM.ScriptAPI")

If Err.Number &lt;&gt; 0 Then

	Wscript.Quit -1

End if

Set oArgs = WScript.Arguments

if oArgs.Count &lt; 4 Then

	'call oAPI.LogScriptEvent("DFSNClientDiscovery.vbs", 100, 1, "Expected 4 arguments. There were only " &amp; oArgs.Count &amp; " arguments. Exiting script.")

	Wscript.Quit -1

End If



Dim oDiscData

Dim oDfsClient



SourceType = oArgs(0)

SourceId = oArgs(1)

ManagedEntityId = oArgs(2)

sDfsClientName = oArgs(3)



set oDiscData = oAPI.CreateDiscoveryData(SourceType, SourceId, ManagedEntityId)

If Err.Number &lt;&gt; 0 Then

	Wscript.Quit -1

End if



set oDfsClient = oDiscData.CreateClassInstance("$MPElement[Name='Microsoft.Windows.FileServer.DFSN.Client']$")

call oDfsClient.AddProperty("$MPElement[Name='Windows!Microsoft.Windows.Computer']/PrincipalName$", sDfsClientName)

call oDfsClient.AddProperty("$MPElement[Name='System!System.Entity']/DisplayName$", "DFS Client")

Call oDiscData.AddInstance(oDfsClient)



Call oAPI.Return(oDiscData)</Script></ScriptBody>

    <TimeoutSeconds>300</TimeoutSeconds>

  </DataSource>

</Discovery>