Example

This example prompts for a command name, then displays a message stating whether or not it can be recorded:

Sub GetCommandRecordingDemo ()

 With Session

  Dim inputCommand as String, isItRecordable As Integer

  inputCommand = InputBox$("What command do you want to check?")

  isItRecordable = .GetCommandRecording(inputCommand)

  If isItRecordable Then

   MsgBox inputCommand & " is Recordable."

  Else

   MsgBox inputCommand & " is not recordable."

  End If

 End With

End Sub