AFAttributeSearch Class

Public NotInheritable Class AFAttributeSearch
	Inherits AFSearch(Of AFAttribute)

Dim instance As AFAttributeSearch

public ref class AFAttributeSearch sealed : public AFSearch<AFAttribute^>

[<SealedAttribute>]
type AFAttributeSearch =  
    class
        inherit AFSearch<AFAttribute>
    end

 1' Get the Database
 2Dim myPISystems As New PISystems()
 3Dim myPISystem As PISystem = myPISystems.DefaultPISystem
 4If myPISystem Is Nothing Then
 5    Throw New InvalidOperationException("Default PISystem was not found.")
 6End If
 7Dim myDB As AFDatabase = myPISystem.Databases(dbName)
 8If myDB Is Nothing Then
 9    Throw New InvalidOperationException("Database was not found.")
10End If
11
12' Create a search to find the level of all TankElements.
13Dim count As Integer
14Using search As New AFAttributeSearch(myDB, "FindTankLevel", "Element:{ Name:'TankElement*' } Name:'Level'")
15
16    search.CacheTimeout = TimeSpan.FromMinutes(10)
17
18    count = search.GetTotalCount()
19    Console.WriteLine("Found {0} Elements.", count)
20    For Each item As AFAttribute In search.FindObjects()
21        Console.WriteLine("  Element {0} has {1} Attributes", item.Name, item.Attributes.Count)
22    Next
23End Using

No code example is currently available or this language may not be supported.

No code example is currently available or this language may not be supported.