Sub Process_Globals
Dim parser As SaxParser
End Sub
Sub Globals
End Sub
Sub Activity_Create(FirstTime As Boolean)
parser.Initialize
parser.Parse(File.OpenInput(File.DirAssets, "test.txt"), "parser")
End Sub
Sub parser_StartElement (Uri As String, Name As String, Attributes As Attributes)
Log(uri)
Log(name)
End Sub
Sub parser_EndElement (Uri As String, Name As String, Text As StringBuilder)
Log(uri)
Log(name)
Log(text)
End Sub
Dim ret As String
Dim i As InputStream
ret=Response.GetString("UTF-8")
i.InitializeFromBytesArray(ret.GetBytes("UTF-8"),0,ret.Length)
parser.Initialize
parser.Parse(i, "Parser")
new code now has no problems
B4X:
Dim ret As String
Dim i As InputStream
ret=Response.GetString("UTF-8")
i.InitializeFromBytesArray(ret.GetBytes("UTF-8"),0,ret.GetBytes("UTF-8").Length)
parser.Initialize
parser.Parse(i, "Parser")