ممنون میشم اگر یه نگاه بندازین...
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
Dim job1 As HttpJob
job1.Initialize("DL",Me)
job1.Download("http://su-civil.mihanblog.com/post/rss")
End Sub
Sub JobDone(job As HttpJob) Dim out As TextWriter out.Initialize(File.OpenOutput(File.DirInternal, "new.txt",False)) out.Write(job.GetString()) out.Close Dim In As InputStream In = File.OpenInput(File.DirInternal, "new.txt") parser.Parse(In, "Parser") In.Close End Sub
جالب تر اینجاس که حتی بد از این مشکل یه پوشه ی جدید ساختم تا از اول شرو کنم و مشکلو پیدا کنم...ولی چشتون روز بد نبینه!!! مطالبی که قبلا در حالت بدون پوشه ذخیره شده بود رو در این حالت فراخوانی کرد!!! این دیگه نوبرش بود!!!
f1
f1
f1