B4J Code Snippet Find user documents folder

Sub Process_Globals
    Private shl As Shell
End Sub

Sub shl.Initialize("Shell","cmd",Array As String("/c", "start", "E:/Basic4android/Projekte/libs.DonManfred/"))
    shl.Run(5000)
End Sub
Sub Shell_ProcessCompleted (Success As Boolean, ExitCode As Int, StdOut As String, StdErr As String)
    Log($"Shell_ProcessCompleted(${Success}, ${ExitCode}, ${StdOut}, ${StdErr})"$)
End Sub

fx.ShowExternalDocument(File.GetUri("E:\Basic4android\Projekte\libs.DonManfred", "CalendarView"))

fx.ShowExternalDocument(File.GetUri("E:\Basic4android\Projekte\libs.DonManfred", ""))

Sub Process_Globals
    Private fx As JFX
    Private MainForm As Form
    'Private shl As Shell
    Private NativeMe As JavaObject

End Sub

Sub AppStart (Form1 As Form, Args() As String)
    NativeMe = Me
    MainForm = Form1
    MainForm.Show
    NativeMe.RunMethod("OpenExplorer", Array As String(File.Combine("E:\Basic4android\Projekte\libs.DonManfred","CalendarView")))
End Sub
#If java
import java.lang.Runtime;
public static void OpenExplorer(String path){
   try {
       Runtime.getRuntime().exec("explorer.exe /select," + path);
   } catch (Exception e) {
   
}
}
#End If