Click a method to see more information on its use, syntax, and parameters:
object.Add String
Part | Description |
object | An AppConnStringList |
String | A text string |
Dim Verastream_Session As AppConnModel Dim AttributeList As AppConnStringList Dim strModelName, strServerName, strEntity As String strModelName = "CCSDemo" strServerName = "localhost" strEntity = "SignonPanel" Set Verastream_Session = New AppConnModel Verastream_Session.ConnectToModel strServerName, strModelName Set AttributeList = Verastream_Session.GetEntityAttributes(strEntity) MsgBox ("There are " & AttributeList.Count & " attributes on the entity.") AttributeList.Add ("NewAttributeName") MsgBox ("There are now " & AttributeList.Count & " attributes on the entity.") Verastream_Session.Disconnect Set AttributeList = Nothing Set Verastream_Session = Nothing
Used to remove all elements from an AppConnStringList.
object.Clear
Part | Description |
object | An AppConnStringList |
Dim Verastream_Session As AppConnModel Dim AttributeList As AppConnStringList Dim strModelName, strServerName, strEntity As String strModelName = "CCSDemo" strServerName = "localhost" strEntity = "SignonPanel" Set Verastream_Session = New AppConnModel Verastream_Session.ConnectToModel strServerName, strModelName Set AttributeList = Verastream_Session.GetEntityAttributes(strEntity) MsgBox ("There are " & AttributeList.Count & " attributes on the entity.") AttributeList.Clear MsgBox ("There are now " & AttributeList.Count & " attributes in the list.") Verastream_Session.Disconnect Set AttributeList = Nothing Set Verastream_Session = Nothing
Used to clone an AppConnStringList.
Set Copy = object.Clone
Part | Description |
object | An AppConnStringList |
Copy | A copy of the AppConnStringList |
Dim Verastream_Session As AppConnModel Dim AttributeList, AttributeListClone As AppConnStringList Dim strModelName, strServerName, strEntity As String Dim I As Integer strModelName = "CCSDemo" strServerName = "localhost" strEntity = "SignonPanel" Set Verastream_Session = New AppConnModel Verastream_Session.ConnectToModel strServerName, strModelName Set AttributeList = Verastream_Session.GetEntityAttributes(strEntity) MsgBox ("There are " & AttributeList.Count & " attributes in AttributeList.") Set AttributeListClone = AttributeList.Clone MsgBox ("There are now " & AttributeListClone.Count & _ " attributes in AttributeListClone.") Verastream_Session.Disconnect Set AttributeList = Nothing Set AttributeListClone = Nothing Set Verastream_Session = Nothing
Used to get the number of elements in the AppConnStringList.
object.Count
Part | Description |
object | An AppConnStringList |
Dim Verastream_Session As AppConnModel Dim AttributeList As AppConnStringList Dim strModelName, strServerName, strEntity As String Dim I As Integer strModelName = "CCSDemo" strServerName = "localhost" strEntity = "SignonPanel" Set Verastream_Session = New AppConnModel Verastream_Session.ConnectToModel strServerName, strModelName Set AttributeList = Verastream_Session.GetEntityAttributes(strEntity) MsgBox ("There are " & AttributeList.Count & " attributes on the entity.") Verastream_Session.Disconnect Set AttributeList = Nothing Set Verastream_Session = Nothing
Retrieves the Locale for the AppConnStringList.
Syntax
Locale = object.GetLocale
Part | Description |
object | An AppConnStringList |
Locale |
The locale designation |
Dim Verastream_Session As AppConnModel Dim AttributeList As AppConnStringList Dim strModelName, strServerName, strEntity As String Dim I As Integer strModelName = "CCSDemo" strServerName = "localhost" strEntity = "SignonPanel" Set Verastream_Session = New AppConnModel Verastream_Session.ConnectToModel strServerName, strModelName Set AttributeList = Verastream_Session.GetEntityAttributes(strEntity) AttributeList.SetLocale ("en_us") MsgBox ("The locale is " & AttributeList.GetLocale) Verastream_Session.Disconnect Set AttributeList = Nothing Set Verastream_Session = Nothing
Used to get and set an element in an AppConnStringList.
object.Item(Index) or object.Item("Name")
object.(Index) or object.("Name")
object!Name
Part | Description |
object | An AppConnStringList |
Index | The name or index(starting at 1) of an element in the AppConnStringList |
Name | The name of an element in the AppConnStringList |
Dim Verastream_Session As AppConnModel Dim AttributeList As AppConnStringList Dim strModelName, strServerName, strEntity As String Dim I As Integer strModelName = "CCSDemo" strServerName = "localhost" strEntity = "SignonPanel" Set Verastream_Session = New AppConnModel Verastream_Session.ConnectToModel strServerName, strModelName Set AttributeList = Verastream_Session.GetEntityAttributes(strEntity) MsgBox ("The first attribute is " & AttributeList.Item(1)) MsgBox ("The first attribute is " & AttributeList.Item("UserID")) MsgBox ("The first attribute is " & AttributeList(1)) MsgBox ("The first attribute is " & AttributeList("UserID")) MsgBox ("The first attribute is " & AttributeList!UserID) Verastream_Session.Disconnect Set AttributeList = Nothing Set Verastream_Session = Nothing
Used to remove an element from an AppConnStringList.
object.Remove Index
Part | Description |
object | An AppConnStringList |
Index | The name or index(starting at 1) of an element in the AppConnStringList |
Dim Verastream_Session As AppConnModel Dim AttributeList As AppConnStringList Dim strModelName, strServerName, strEntity As String Dim I As Integer strModelName = "CCSDemo" strServerName = "localhost" strEntity = "SignonPanel" Set Verastream_Session = New AppConnModel Verastream_Session.ConnectToModel strServerName, strModelName Set AttributeList = Verastream_Session.GetEntityAttributes(strEntity) MsgBox ("There are " & AttributeList.Count & " attributes in AttributeList.") AttributeList.Remove (1) ' Removes the first attribute in the list MsgBox ("There are " & AttributeList.Count & " attributes in AttributeList.") Verastream_Session.Disconnect Set AttributeList = Nothing Set Verastream_Session = Nothing
Sets the Locale for the AppConnStringList.
object.SetLocale Locale
Part | Description |
object | An AppConnStringList |
Locale |
The locale designation |
Dim Verastream_Session As AppConnModel Dim AttributeList As AppConnStringList Dim strModelName, strServerName, strEntity As String Dim I As Integer strModelName = "CCSDemo" strServerName = "localhost" strEntity = "SignonPanel" Set Verastream_Session = New AppConnModel Verastream_Session.ConnectToModel strServerName, strModelName Set AttributeList = Verastream_Session.GetEntityAttributes(strEntity) AttributeList.SetLocale ("en_us") MsgBox ("The locale is " & AttributeList.GetLocale) Verastream_Session.Disconnect Set AttributeList = Nothing Set Verastream_Session = Nothing
© 1999-2007 Attachmate Corporation. All rights reserved. Terms of Use.