AFFile Class

<SerializableAttribute>
Public Class AFFile
	Implements IComparable, IComparable(Of AFFile), 
	IEquatable(Of AFFile)

Dim instance As AFFile

[SerializableAttribute]
public ref class AFFile : IComparable, IComparable<AFFile^>, 
	IEquatable<AFFile^>

[<SerializableAttribute>]
type AFFile =  
    class
        interface IComparable
        interface IComparable<AFFile>
        interface IEquatable<AFFile>
    end

' This example demonstrates how to create an AFFile for an attribute
' and extended property for an element and display information about it.

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

' Get the path to a file
Dim path As String = System.IO.Path.Combine(System.IO.Path.GetTempPath(), "TestFile.txt")
Dim fs As FileStream = System.IO.File.Create(path)
fs.Close()

' Create an Element
Dim myElement As AFElement = myDB.Elements.Add("MyElement")

' Create an Attribute
Dim myAttribute As AFAttribute = myElement.Attributes.Add("MyAttribute")

' Create an AFFile for the Attribute Value
Dim file As New AFFile(myAttribute)
file.Upload(path)
myAttribute.SetValue(file, Nothing)

' Display File Information
Console.WriteLine("Name of File = {0}", file.Name)
Console.WriteLine("Owner = {0}", file.Owner)

' Download the File from the Server.
file = CType(myAttribute.GetValue().Value, AFFile)
Dim fileStream As Stream = file.Download
Console.WriteLine("Stream Size = {0}", fileStream.Length)

' Create an AFFile for an ExtendedProperty Value
file = New AFFile
file.Upload(path)
myElement.ExtendedProperties.Add("MyProperty", file)

' Display File Information
Console.WriteLine("Name of File = {0}", file.Name)
Console.WriteLine("Owner = {0}", file.Owner)

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.