Home
  •  

Détection de DFS ordinateur client

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

Cet objet crée une instance de la classe d'ordinateur client DFS pour chaque ordinateur détecté et il permet d'activer les ordinateurs clients pour surveiller la disponibilité des espaces de noms DFS.

Knowledge Base article:

Résumé

Cet objet crée une instance de la classe d'ordinateur client DFS pour chaque ordinateur détecté et il permet d'activer les ordinateurs clients pour surveiller la disponibilité des espaces de noms DFS.

Cet objet est désactivé par défaut. Lorsqu'il est activé, cet objet exécute le script DFSNClientDiscovery.vbs.

Activez cet objet pour tester la capacité d'un ordinateur à accéder aux espaces de noms DFS, dossiers (liens) et cibles de dossiers. N'activez pas cet objet sur un grand nombre d'ordinateurs car le test de l'espace de noms peut créer une grande quantité de trafic réseau. Plutôt, utilisez le remplacement pour activer cet objet uniquement sur des ordinateurs spécifiques.

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>