AFDatabases Class

Public NotInheritable Class AFDatabases
	Inherits AFNamedCollection(Of AFDatabase)

Dim instance As AFDatabases

public ref class AFDatabases sealed : public AFNamedCollection<AFDatabase^>

[<SealedAttribute>]
type AFDatabases =  
    class
        inherit AFNamedCollection<AFDatabase>
    end

' This example demonstrates how to use several properties of the DB object.

' Get the Database
Dim myPISystems As New PISystems
Dim myPISystem As PISystem = myPISystems.DefaultPISystem
Dim myDB As AFDatabase = myPISystem.Databases.DefaultDatabase

' Display information about the Default DB
Console.WriteLine("Name of Default DB = {0}", myDB.Name)
Console.WriteLine("Description of Default DB = {0}", myDB.Description)
Console.WriteLine("UniqueID of Default DB = {0}", myDB.UniqueID)

' Set the DB to the First DB
myDB = myPISystem.Databases(0)

' Display the name, description, and PIServerName of the first db
Console.WriteLine("Name of First DB = {0}", myDB.Name)
Console.WriteLine("Description of First DB = {0}", myDB.Description)
Console.WriteLine("UniqueID of First DB = {0}", myDB.UniqueID)

' Add a new Database
Dim newDB As AFDatabase = myPISystem.Databases.Add("NewDatabase")
newDB.Description = "This is a new Database"

' Display the Database Count
Console.WriteLine("Database Count = {0}", myPISystem.Databases.Count)

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.