Sub Button1_Click
'xui.MsgboxAsync("Hello world!", "B4X") 'even with this uncommented, it worked
rp.CheckAndRequest(rp.PERMISSION_WRITE_EXTERNAL_STORAGE)
Wait For Activity_PermissionResult (Permission As String, PermResult As Boolean)
If Not(PermResult) Then
Log(Permission & " " & PermResult)
Return
End If
File.WriteString(File.DirRootExternal,"Test.txt","Test") ' Made no difference.
End Sub