When using the B4A emulator, how can my app find and read a data file on the Windows PC? The following cannot find any file whereEVER it is. This is not a problem on a real device.
Sub ReadFile As Boolean
Dim Found As Boolean
Dim TxtFile As String
Found=False
If FilenameEdtTxt.Text.length>0 Then
TxtFile=FilenameEdtTxt.Text & ".txt"
If File.Exists(File.DirRootExternal,TxtFile) Then
Found=True
Txt=File.ReadString(File.DirRootExternal,TxtFile)
End If
End If
Return Found
End Sub
Sub ReadFile As Boolean
Dim Found As Boolean
Dim TxtFile As String
Found=False
If FilenameEdtTxt.Text.length>0 Then
TxtFile=FilenameEdtTxt.Text & ".txt"
If File.Exists(File.DirRootExternal,TxtFile) Then
Found=True
Txt=File.ReadString(File.DirRootExternal,TxtFile)
End If
End If
Return Found
End Sub
Last edited: