B4A Code Snippet Get Free USB mass storage space - Blueforcer    Apr 19, 2024   (6 reactions) This prints all informations about the attached USB storage. AddPermission(android.permission.READ_EXTERNAL_STORAGE) AddReceiverText(USBService, <intent-filter> <action android:name="android.intent.action.MEDIA_MOUNTED" /> <data android:scheme="file"/> </intent-filter>) Sub Service_Start (StartingIntent As Intent) If(StartingIntent.Action =... B4A Code Snippet Download file via HTTP with resume - peacemaker    Sep 20, 2020   (7 reactions) .DownloadFile(f.FTPpath, False, others.GetPath(f.LocalPath), f.Name) Return End If....OpenOutput(others.GetPath(f.LocalPath), f.Name, True) 'True !!! File.Copy2(j.GetInputStream... End If f.status = "OK" Dim out As OutputStream = File.OpenOutput(others.GetPath... If End If End Sub Most FTP code is related to this project. AddtoLog, GetPath, GetFileName... B4A Code Snippet FileUtil SUBs - DonManfred (first post)    Mar 27, 2014   (3 reactions) Subname: GetPath Author: @thedesolatesoul Description: Get the path of a file specified Sub GetPath(Path As String) As String Dim Path1 As String If Path = "/" Then Return "/" End If L = Path.LastIndexOf("/") If L = Path.Length - 1 Then...(0,L) End Sub ' 'Example 'Log(GetPath("/path/to/file/SomePage.html")) ' -> /path/to/file Tags: GetPath Files... B4A Code Snippet Application Lock Impenetrable by crackers - Hamied Abou Hulaikah    Sep 19, 2022   (2 reactions) For paid app only. Two brains are better than one, three are better than two and so on. I implement this code to protect my apps from illegal uses, crackers and hackers who try to unlock my apps functionality without paying me or my agreement. My apps are time based, so time is very important flag in my calculation. I decide to share it with you, to explore its weakness and increase its complexity... B4A Code Snippet Super-others: my 42 common usage subs - peacemaker    Oct 22, 2018   (16 reactions)   tags: B4A , targetFolder As String) Sub GetFileName(fullpath As String) As String Sub GetPath(Path As String) As String... Page: 1   |