14.6.11 xDeviceFileTransfer Widget
Transfer file between mobile device and remote server.
Properties
RemoteServerUrl
URL to the remote server. Include port number in the URL.
RemoteServerUser
Userid to use to login to remote server
RemoteServerPassword
Password for user specified in RemoteServerUser
LocalFile
Fully qualified name of the file to upload
RemoteFile
Fully qualified name of the remote file
Methods
Upload
Upload the file
-
Input Arguments: None.
-
Output Argument: None.
-
Return Value: Status code
Download
Download the file
-
Input Arguments: None.
-
Output Argument: None.
-
Return Value: Status code
Events
Completed
Triggered when file transfer is finished.
-
Parameters:
|
Code Examples
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