Syntax
ServerCount = Object.ServerCount
Type = short, read only
Description
ServerCount is used along with ServerNumber, ServerName, ServerAlias, and ClientIniPath properties. ServerCount only reflects a value greater than 1 (one) if a valid ClientIniPath & configuration file (LLMWClnt.ini) with multiple servers listed is set. The default for this property is 1 (the Default Server). This property is useful for iterating through a list of servers to get the names and aliases for display to the user. If you are not using the ClientIniPath property with multiple servers specified in the .ini file, ServerCount has no use.
Example
'this example sets the
ClientIniPath property to a .ini file name. It then
'populates a list box
control with the server names and aliases found in
'the ini file. The
iteration is controlled with the ServerCount property.
Dim i As
Integer
On Error GoTo Handler
frmFront.ClientX1.ClientIniPath =
Trim(txtClientIniLocation.Text)
For i = 1 To frmFront.ClientX1.ServerCount -
1
frmFront.ClientX1.SetServer (i)
lstServers.AddItem frmFront.ClientX1.ServerName & " ALIAS " &
frmFront.ClientX1.ServerAlias
Next i
See also: