Transfers a file from the host to the PC using the IND$FILE protocol.
This sample gets a file from the host. Before you run the sample, make sure the cursor is on a TSO command line.
Sub FileTransferReceiveSample()
path = Environ$("USERPROFILE") & "\Documents\Micro Focus\Reflection\" & "fileName.txt"
'Set the configuration to TSO
ThisIbmTerminal.FileTransfer.XfrHostSys = HostSystem_Tso
ThisIbmTerminal.FileTransfer.INDReceiveFile path, "count.txt", INDFileTransferType_Ascii, FileExistsOption_Append, True
End Sub