モバイル・デバイスとリモート・サーバー間のファイル転送です。

プロパティ

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


 

  • No labels