If you use URL = "
http://192.168.1.102/xmloc?F=Sxml&S=L&M=PES&Z=1" the job error is "not found"
If you use URL = "192.168.1.102/xmloc?F=Sxml&S=L&M=PES&Z=1" the job error iis
"java.lang.IllegalStateException: Target host must not be null, or set in parameters. scheme=null, host=null, path=192.168.1.102/xmloc"
Sub Globals
Dim ListView1 As ListView
Dim Title, Link, pubDate As String
Dim URL As String
URL = "192.168.1.102/xmloc?F=Sxml&S=L&M=PES&Z=1"
'URL = "
http://200.68.94.242/xmloc?F=Sxml&S=L&M=PES&Z=1&ES=APBR,ERAR" '<<<<<<<<this is an external server and it works ok
End Sub
Sub Activity_Create(FirstTime As Boolean)
If FirstTime Then
parser.Initialize
End If
ListView1.Initialize("ListView1")
Activity.AddView(ListView1, 0, 0, 100%x, 100%y)
ListView1.SingleLineLayout.ItemHeight = 60dip
HttpJob1.Initialize("InsertNew1", Me)
HttpJob1.download(URL)
End Sub
Sub JobDone(Job As HttpJob)
Log("***JObDone")
If Job.Success = True Then
Log("lectura web OK")
Log(Job.GetString)
parser.Parse(Job.GetInputStream, "Parser")
Else
Log("error")
Log(Job.ErrorMessage) '<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<from here comes the error message
End If
End Sub