AppConnModelRecord Object

Use the AppConnModelRecord object to manage model records.

Click a method to see more information on its use, syntax, and parameters:

Count
ElementNames
FromXMLString
GetTerminalAttributes
Index

Count Method

Used to get the numbers of records in the AppConnModelRecord object.

Syntax

object.Count

Part	Description
object	An AppConnModelRecord object
Count	The number of records in the AppConnModelRecord object

Remarks

Use the Count method to get the numbers of records in the AppConnModelRecord object.

Example

Dim Verastream_Session As AppConnModel
Dim AttributeRecord As AppConnModelRecord
Dim strModelName, strServerName, strEntity, strMessage As String

strModelName = "CCSDemo"
strServerName = "localhost"
strEntity = "SignonPanel"

Set Verastream_Session = New AppConnModel
Verastream_Session.ConnectToModel strServerName, strModelName
Verastream_Session.SetCurrentEntity (strEntity)

Set AttributeRecord = New AppConnModelRecord
Set AttributeRecord = Verastream_Session.GetAttributes

strMessage = "The number of records is " & AttributeRecord.Count
MsgBox strMessage, vbExclamation, "Verastream Message"

Set AttributeRecord = Nothing
Verastream_Session.Disconnect
Set Verastream_Session = Nothing

ElementNames Property

Used to get an AppConnStringList object with the element names on the entity.

Syntax

Set AttributeList = object.ElementNames

Part	Description
AttributeList	An AppConnStringList object
object	An AppConnModelRecord object

Remarks

Used to get an AppConnStringList object with the element names on the entity so you can further manipulate them with the AppConnStringList methods.

Example

Dim Verastream_Session As AppConnModel
Dim AttributeRecord As AppConnModelRecord
Dim strModelName, strServerName, strEntity, strMessage As String
Dim AttributeList As AppConnStringList
Dim I As Integer

strModelName = "CCSDemo"
strServerName = "localhost"
strEntity = "MainMenu"

Set Verastream_Session = New AppConnModel
Verastream_Session.ConnectToModel strServerName, strModelName
Verastream_Session.SetCurrentEntity (strEntity)

Set AttributeRecord = New AppConnModelRecord
Set AttributeRecord = Verastream_Session.GetAttributes

Set AttributeList = AttributeRecord.ElementNames

For I = 1 To AttributeRecord.Count
    MsgBox ("Attribute " & AttributeList(I) & " = " & AttributeRecord(I))
Next

Set AttributeRecord = Nothing
Verastream_Session.Disconnect
Set AttributeList = Nothing
Set Verastream_Session = Nothing

FromXMLString Method

Used to set a record from an XML representation.

Syntax

object.FromXMLString(Record)

Part	Description
object	An AppConnModelRecord object
Record	An XML representation of the record

Remarks

Use the FromXMLString method to set a record from an XML representation.

Example

GetTerminalAttributes Method

Used to get the host terminal attributes from a record.

Syntax

Set TerminalAttributes = object.GetTerminalAttributes(Index)

Part	Description
object	An AppConnModelRecord object
Index	The name or index(starting at 1) of an element in the list
TerminalAttributes	The terminal attributes for the given element

Remarks

Use the GetTerminalAttributes method to get the terminal attributes of an element in a record.

Example

GetTerminalAttributes Method

Used to get the host terminal attributes from a record.

Syntax

Set TerminalAttributes = object.GetTerminalAttributes(Index)

Part	Description
object	An AppConnModelRecord object
Index	The name or index(starting at 1) of an element in the list
TerminalAttributes	The terminal attributes for the given element

Remarks

Use the GetTerminalAttributes method to get the terminal attributes of an element in a record.

Example

Index Property

Used to get the Host Integration recordset index of record.

Syntax

object.Index

Part	Description
object	A record object

Remarks

Use the Index property to get the index of the record.