Doorgaan naar de website
OCLC Support

WindowCount

Find the syntax, use, parameters, return values, and an example for the WindowCount macro command in Connexion client.
Syntax nCount = CS.WindowCount
Use to Give the number of open windows.
Parameters None
Comments Counts only record and list windows only.
Return values An integer representing the number of open windows.
Example Sub Main()

     Dim CS As Object
     Set CS = GetObject(,“Connex.Client”)

     If CS.IsOnline = False Then
          CS.Logon ““, ““, ““
     End If

     CS.OpenWorkform “bks”

     CS.Search “WC”, “#1”

     CS.Search “WC”, “gon,wi,th,w”

     MsgBox CStr(CS.WindowCount) + “ open windows”
End Sub

What this example does
  • Logs on to Connexion if not already logged on, using the default authorization and password you selected in Tools > Options > Authorizations tab.
  • Opens a workform with the Books format.
  • Searches WorldCat for record number 1 (opens a record).
  • Searches WorldCat for Gone with the Wind (opens a group list).
  • Returns the total number of open record and list windows (in this case 3) in the message: 3 open windows.