AFLibrary Class

<SerializableAttribute>
Public NotInheritable Class AFLibrary
	Inherits AFObject
	Implements IComparable(Of AFLibrary)

Dim instance As AFLibrary

[SerializableAttribute]
public ref class AFLibrary sealed : public AFObject, 
	IComparable<AFLibrary^>

[<SealedAttribute>]
[<SerializableAttribute>]
type AFLibrary =  
    class
        inherit AFObject
        interface IComparable<AFLibrary>
    end

' This example will create a new library and import it into a new Database. 

' Create a new Database on the default PI System
Dim myPISystems As New PISystems()
Dim myPISystem As PISystem = myPISystems.DefaultPISystem

' Create a new library
Dim myLibDB As AFDatabase = myPISystem.Databases.Add("MyLibDB")
Dim myElemTemplate As AFElementTemplate = myLibDB.ElementTemplates.Add("MyElemTemplate")
Dim myAttributeTemplate As AFAttributeTemplate = myElemTemplate.AttributeTemplates.Add("MyAttribute1")
myLibDB.CheckIn()
Dim library As AFLibrary = myPISystem.Libraries.Add(myLibDB, "Standard")
library.Description = "This is the standard library."

' Get the standard Library
library = myPISystem.Libraries("Standard")
Console.WriteLine("Current number of Libraries = {0}", myPISystem.Libraries.Count)

Dim myDB As AFDatabase = myPISystem.Databases.Add("MyDB")
If library IsNot Nothing Then
    ' Display Library information
    Console.WriteLine("Description of Library = {0}", library.Description)
    Console.WriteLine("Name of Library = {0}", library.Name)
    Console.WriteLine("UniqueID of Library = {0}", library.UniqueID)

    ' Import the Library into the Database
    library.Import(myDB)
End If

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.