If no external card then
'map internal to an external DirRootExternal or DirDefaultExternal
else
'No mapping is required and SD card will hold files
end if
DBFilePath = File.DirRootExternal & "/" & MyFolder
Sub Process_Globals
Dim SettingsFolder As String
End Sub
Sub Activity_Create(FirstTime As Boolean)
If FirstTime Then
If File.ExternalWritable = True Then
SettingsFolder = File.DirDefaultExternal
Else
SettingsFolder = File.DirInternal
End If
End If
End Sub
Dim m as Manager (can't remember the exact class name)
m.setstring("setting1","Somevalue")
m.setBoolean("setting1","Somevalue")
m.getstring("setting1")
m.getBoolean("setting1")
Yes, it's a global string:
B4X:Dim pFilePath As String
If File.ExternalWritable = True Then
' SD Card Installed
pfilepath = File.DirDefaultExternal
Else
' No SD Card
pfilepath = File.DirInternal
End If
Info = (DateTime.Date(File.LastModified(File.pfilepath, "places.db")))
Error compiling program.
Error description: Unknown member: pfilepath
Occurred on line: 61
Info = (DateTime.Date(File.LastModified(File.pfilepath, "places.db")))
Word: pfilepath
Info = DateTime.Date(File.LastModified(pFilePath, "places.db"))
You cannot access it unless you are rooted.I looked for the file on the device, but could not find it.
We use cookies and similar technologies for the following purposes:
Do you accept cookies and these technologies?
We use cookies and similar technologies for the following purposes:
Do you accept cookies and these technologies?