DFS İstemci Bilgisayarı Keşfi

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

Bu nesne, keşfedilen her bilgisayar için DFS İstemci Bilgisayarı sınıfının bir örneğini oluşturur ve istemci bilgisayarların DFS Ad Alanları'nın kullanılabilirliğini izlemesini etkinleştirmek için kullanılır.

Knowledge Base article:

Özet

Bu nesne, keşfedilen her bilgisayar için DFS İstemci Bilgisayarı sınıfının bir örneğini oluşturur ve istemci bilgisayarların DFS Ad Alanları'nın kullanılabilirliğini izlemesini etkinleştirmek için kullanılır.

Bu nesne varsayılan olarak devre dışıdır. Etkinleştirildiğinde, bu nesne DFSNClientDiscovery.vbs betiğini çalıştırır.

Bir bilgisayarın DFS ad alanlarına, klasörlere (bağlantılar) ve klasör hedeflerine erişim kabiliyetini test etmek için bu nesneyi etkinleştirin. Ad alanı sınaması büyük miktarda ağ trafiği oluşturabileceğinden, bu nesneyi çok fazla sayıda bilgisayar üzerinde etkinleştirmeyin. Bunun yerine, geçersiz kılmaları kullanarak bu nesneyi yalnızca belirli bilgisayarlarda etkinleştirin.

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>