FileTransferScheme Property Example

This example displays the name of the file transfer scheme for the active session.

Sub Main()

 Dim Sys As Object, Sess As Object

 Set Sys = CreateObject("EXTRA.System")

' Assumes an open session

 Set Sess = Sys.ActiveSession

' Assumes the file transfer scheme has previously been set

 MsgBox "The current file transfer scheme is " + Sess.FileTransferScheme + "."

End Sub