モバイル・デバイスとリモート・サーバー間のファイル転送です。
プロパティ
RemoteServerUrl
リモート・サーバーへの URL です。URL にはポート番号も含めてください。
RemoteServerUser
リモート・サーバーへのログイン時に使用するユーザー ID です。
RemoteServerPassword
RemoteServerUser に指定されたユーザーのパスワードです。
LocalFile
アップロードするファイルの完全修飾名です
RemoteFile
リモート・ファイルの完全修飾名です。
メソッド
Upload
ファイルをアップロードします。
- 入力引数: なし
- 出力引数: なし
- 戻り値: 状態コード
Download
ファイルをダウンロードします。
- 入力引数: なし
- 出力引数: なし
- 戻り値: 状態コード
イベント
Completed
ファイル転送が終了すると起動されます。
パラメータ：
名前
タイプ
説明
Status
列挙値
状態コードを参照してください。
Message
文字列
サンプル・コード
Define_Com Class(#xDeviceFileTransfer) Name(#FileTransfer)
Evtroutine Handling(#COM_OWNER.Initialize)
#ServerUrl := 'http://10.5.1.270:6501/service/longreach.jsp'
#Userid := 'MYUSER'
#Password := ''
#LocalFile := '/myfiles/file1'
#RemoteFile := '/longreachdata/user/{NAME}/file1'
#Transfer.Enabled := false
Endroutine
Evtroutine Handling(#FileTransfer.Initialize)
#Transfer.Enabled := true
#FileTransfer.RemoteServerUrl := 'http://10.5.1.270:6501/service/longreach.jsp'
Endroutine
Evtroutine Handling(#Transfer.Click)
#FileTransfer.RemoteServerUser := #Userid
#FileTransfer.RemoteServerPassword := #Password
#FileTransfer.LocalFile := #LocalFile
#FileTransfer.RemoteFile := #RemoteFile
If (#Upload.ButtonChecked)
#FileTransfer.Upload
Else
#FileTransfer.Download
Endif
Endroutine
Evtroutine Handling(#FileTransfer.Completed) Status(#lstatus) Message(#lMessage)
#Status := #returnedStatus
If (#Status <> OK)
#StatusMessage := #message
Endif
Endroutine