Passa al contenuto principale
Supporto OCLC

DeleteToEndOfCell

Find the syntax, use, parameters, return values, and an example for the DeleteToEndOfCell macro command in Connexion client.
Sintassi CS.DeleteToEndOfCell
Use to Delete text from the cursor position to the end of the cell.
Parameters Nessuno
Return values Nessuno
Esempio Sub Main()
 

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

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

     CS.Search “WC”, “#1”

     If ItemType = 0 Then
          CS.CursorRow = 3
          CS.CursorColumn = 6
          CS.DeleteToEndOfCell
     End If
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.
  • Searches WorldCat for record number 1.
  • If the result is an open WorldCat record, places the cursor in the sixth character position in the third field of the record (row 3, column 6) and deletes the text to the end of the cell, starting with the sixth character.