例
以下の例は、autECLXfer オブジェクトに関連した接続について、 ホストからファイルを受け取り、それをワークステーションに送信する方法を示しています。
DIM XferObj as Object
DIM autECLConnList as Object
DIM NumRows as Long
Set XferObj = CreateObject("ZIEWin.autECLXfer")
Set autECLConnList = CreateObject("ZIEWin.autECLConnList")
' Initialize the connection with the first connection in the list
autECLConnList.Refresh
XferObj.SetConnectionByHandle(autECLConnList(1).Handle)
' For example, send the file to VM
XferObj.ReceiveFile "c:\windows\temp\thefile.txt",
"THEFILE TEXT A0",
"CRLF ASCII"