تشریح کد
ساب در خط 58 تست اتصال نت هست
د رخط 83 شروع رویداد کلیک روی لیست ویو هست اینم کدش
Sub lv_itemclick(postion As Int,value As Object) 'رویداد کلیک روی لیست ویو
If checkinternet=False Then 'اگر نت وصل نبود این توست مسیج رو نمایش بده
ToastMessageShow ("لطفا اتصال اینترنت خود را بررسی کنید",True) 'اینم توست مسیج
Else ' اگر وصل بود که اینو اجرا کن
ToastMessageShow ("درحال دریافت اطلاعات....",True)
If File.Exists(File.DirInternal,value) Then 'اینجا گقت اگر تو فلان ادرس مقدار ولیو بود دیگه نمیخواد دانلود کنه همونو پخش کنه
mp.Play
Else ' اگر هم نبود
mp.Load(value) ' این مقدار ولیو رو از نت لود کن
End If
End If
End Sub
در دیزاینر یه پنل شامل دو باتن ایجاد کردم به نام پنل3 ( شامل دو باتن که یکی دانلود میکنه(باتن 3) و یکی دیگه اشتراک میذاره(باتن 4) )که در خط 100 گفتم هر وقت لانگ کلیک شد روی ایتم های لیست ویو اون پنل نمایش بده
حالا موضوع اینجاس که توی رویداد باتن3 چطور دانلود بدم با مقدار ولیو؟
در خط 93 گقتم که
mp.Load(value)
درست پخش میکنه در صورتی که باید اینطوری میبود ولی با ولیو درست پخش کرد
mp.Load("http://mysite.ir/music.mp3")
الان چطور یه دانلودر بذارم که ولیو رو بتونه دانلود کنه؟