Detectie van DFS-clientcomputer

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

Met dit object wordt een instantie van de klasse DFS-clientcomputer gemaakt voor elke gedetecteerde computer. Dit object wordt gebruikt om clientcomputers in te schakelen voor het bewaken van de beschikbaarheid van DFS-naamruimten.

Knowledge Base article:

Samenvatting

Met dit object wordt een instantie van de klasse DFS-clientcomputer gemaakt voor elke gedetecteerde computer. Dit object wordt gebruikt om clientcomputers in te schakelen voor het bewaken van de beschikbaarheid van DFS-naamruimten.

Dit object is standaard uitgeschakeld. Indien ingeschakeld, wordt met dit object het script DFSNClientDiscovery.vbs uitgevoerd.

Schakel dit object in om te testen of een computer toegang heeft tot DFS-naamruimten, mappen (koppelingen) en mapdoelen. Het wordt afgeraden dit object in te schakelen op een groot aantal computers omdat het testen van naamruimten een grote hoeveelheid netwerkverkeer veroorzaakt. Overschrijf in plaats daarvan parameters om dit object alleen op specifieke computers in te schakelen.

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>