Home
  •  

Odnajdowanie komputerów klienckich DFS

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

Ten obiekt tworzy wystąpienie klasy Komputer kliencki DFS dla każdego odnalezionego komputera. Obiekt służy do umożliwienia komputerom klienckim monitorowania dostępności obszarów nazw systemu plików DFS.

Knowledge Base article:

Podsumowanie

Ten obiekt tworzy wystąpienie klasy Komputer kliencki DFS dla każdego odnalezionego komputera. Obiekt służy do umożliwienia komputerom klienckim monitorowania dostępności obszarów nazw systemu plików DFS.

Ten obiekt jest domyślnie wyłączony. Gdy jest włączony, uruchamia skrypt DFSNClientDiscovery.vbs.

Włącz ten obiekt, aby przetestować dostęp komputera do obszarów nazw systemu plików DFS, folderów (łączy) i elementów docelowych folderów. Nie włączaj tego obiektu na dużej liczbie komputerów, ponieważ testowanie obszaru nazw może wygenerować bardzo dużo ruchu w sieci. Zamiast tego użyj zastąpień, aby włączyć obiekt tylko na określonych komputerach.

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>