Sub Activity_Create(FirstTime As Boolean)
Log(GetExternalStoragePublicDirectory("DCIM"))
End Sub
Sub GetExternalStoragePublicDirectory (name As String) As String
Dim jo As JavaObject
jo.InitializeStatic("android.os.Environment")
Dim path As Object = jo.RunMethod("getExternalStoragePublicDirectory", Array(name))
If path = Null Or File.Exists(path, "") = False Then
Log("No such folder.")
Return ""
End If
Return path
End Sub