WD Mobile v28 IOS upload files - Solved December 22, 2023 02:45AM |
Registered: 5 years ago Posts: 151 |
Argus
Re: WD Mobile v28 IOS upload files December 22, 2023 12:54PM |
Re: WD Mobile v28 IOS upload files December 22, 2023 09:04PM |
Registered: 5 years ago Posts: 151 |
Re: WD Mobile v28 IOS upload files - Solved January 08, 2024 04:04PM |
Registered: 5 years ago Posts: 151 |
INTERNAL PROCEDURE MyProcURISelect(Success is boolean, PathResult is URI) IF Success = True THEN sReturnURI = PathResult // Displays the name of the selected resource ToastDisplay(URIGetInfo(PathResult, uriInfoName)) gsURL = PathResult //Get the File name sFileName = URIGetInfo(PathResult, uriInfoName) //Gets the file extension sExt = URIGetInfo(PathResult, uriInfoOriginType) sExt = ExtractString(sExt,2,'Tab') sConVertExt = URIGetInfo(PathResult, uriInfoConversionType) sConVertExt = ExtractString(sConVertExt,2,'TAB') //Gets the file size nSize = URIGetInfo(PathResult, uriInfoSize) //Save it in the app folder so I can change the name and send it to the server IF NOT ErrorOccurred THEN // Save the resource in the application directory URIToFile(sReturnURI, sFileName+sConVertExt, ProcSave) END END END