Android Question how to get access to DirDefaultExternal

Erel said:

I will answer again for the 3rd time. The options available are listed here: SaveAs - Let the user select a target folder + list of other related methods

The only relevant method is rp.GetSafeDirDefaultExternal. There are very few cases where it is actually useful.

Click to expand...

Private Sub Button1_Click
'assume sa is a byte array populated globally

    File.WriteBytes(File.DirInternal, "test.jpg", sa) 'just for the example.
    Wait For (SaveAs(File.OpenInput(File.DirInternal, "test.jpg"), "application/octet-stream", "test.txt")) Complete (Success As Boolean)
    Log("File saved successfully? " & Success)
End Sub

zed said:

What's the point of answering you since you don't take the answers into account?

[B4X] Features that Erel recommends to avoid

Many things have changed in B4X and also in the underlying platforms. I will try to list here all kinds of (old) features that have better alternatives. B4X is backward compatible so these features still work. The recommendations are more relevant for new projects or when implementing new...

www.b4x.com

Points 8-9-10


this is the solution

SaveAs - Let the user select a target folder + list of other related methods

B4A + B4i example: https://www.b4x.com/android/forum/threads/b4x-texteditor-save-and-load-external-files.132731/#post-838166 List of classes or libraries that can be used to access secondary storages: ContentChooser (Phone libray) - allows the user to select a resource or file using external...

www.b4x.com

Click to expand...

Erel said:

I will answer again for the 3rd time. The options available are listed here: SaveAs - Let the user select a target folder + list of other related methods

The only relevant method is rp.GetSafeDirDefaultExternal. There are very few cases where it is actually useful.

Click to expand...

Sub StartActivityForResult(i As Intent)
    Dim jo As JavaObject = GetBA
    ion = jo.CreateEvent("anywheresoftware.b4a.IOnActivityResult", "ion", Null)
    jo.RunMethod("startActivityForResult", Array(ion, i))
End Sub

Sub StartActivityForResult(i As Intent)
    Dim jo As JavaObject = GetBA
    Dim ion As Object
    
    ion = jo.CreateEvent("anywheresoftware.b4a.IOnActivityResult", "ion", Null)
    jo.RunMethod("startActivityForResult", Array(ion, i))
End Sub

zed said:

Here is the procedure I use to save a TXT file

B4A:

Private Sub exportTxt(text As String)
    'write
    File.WriteString(xui.DefaultFolder, "exp1.txt", text)
    'Save as
    Dim in As InputStream = File.OpenInput(xui.DefaultFolder, "exp1.txt")
    Wait For (FileHandler1.SaveAs(in, "text/plain", "YourFile.txt")) Complete (Success As Boolean)
    If Success Then
        toast.Show("File saved successfully")
    Else
        toast.Show("File not saved")
    End If
End Sub

In your code, you save a JPEG as TXT with OCTET/STREAM. MIME must match file type
Ex.
"text/plain", "YourFile.txt"
"application/pdf", "YourFile.pdf"
"image/png", "YourFile.png"
"image/jpeg", "YourFile.jpg"

Click to expand...

Markos said:

Ok the dialogue to select path is coming up when I declare ion as Object. It now saves the file with no content anywhere I choose but app crashes after. I will explore further before asking for advice unless of course an immediate thought on what I need to do to avoid the crash and file with 0bytes being written.

Click to expand...