اجرای چندین موزیک

[naser sahami 90]

Sub JobDone(Job As HttpJob)                             
If Job.Success = True Then
Select Case Job.JobName
  Case "job1"
  Dim o As OutputStream
  o = File.OpenOutput(dier, name, False)
    File.Copy2(Job.GetInputStream, o)
    o.Close
    Job.Release
    Case "job2"
    Dim o As OutputStream
  o = File.OpenOutput(dier, name, False)
    File.Copy2(Job.GetInputStream, o)
    o.Close
    Job.Release
    ToastMessageShow("فایل دانلود و ذخیره شد",True)
    sound.Initialize2("")
sound.Load(File.DirRootExternal & "/MusicB4A", "MigeDosamNadare128.ogg")
    sound.Looping=False
    sound.Play
    Case "job3"
    Dim o As OutputStream
  o = File.OpenOutput(dier, name, False)
    File.Copy2(Job.GetInputStream, o)
    o.Close
    Job.Release
    no.Cancel(1)
    ToastMessageShow("فایل دانلود و ذخیره شد",True)
    sound.Initialize2("")
sound.Load(File.DirRootExternal & "/MusicB4A", "MigeDosamNadare128.ogg")
    sound.Looping=False
        sound.Play
        Button1.Text="پخش شدن"

 End Select
 Else
ToastMessageShow(hj.ErrorMessage,True)
End If
ProgressDialogHide
End Sub
Sub Activity_Pause (UserClosed As Boolean)

End Sub
Sub Button1_Click
 If File.Exists(File.DirRootExternal & "/MusicB4A", "MigeDosamNadare128.ogg") = False Then
   Button1.Text="در حال دانلود شدن"
name="MigeDosamNadare128.ogg"
dier=File.DirRootExternal& "/MusicB4A"
link="http://dl.aviny.com/voice/madiheh/ghadir/madhe%20mola/MigeDosamNadare128.ogg.mp3"
hj.Initialize("job3",Me)
hj.Download(link)
no.Initialize
no.Icon="icon"
no.Light=False
no.Vibrate = False
no.sound = False
no.AutoCancel=True
no.OnGoingEvent=True
no.SetInfo("در حال دانلود",name,Null)
no.Notify(1)
ProgressDialogShow("در حال دانلود فایل...صبر کنید")
ToastMessageShow("لطفا منتظر بمانید,",  True)
    Else
    ToastMessageShow("فایل موجود است",  True)
    
    sound.Initialize2("")
sound.Load(File.DirRootExternal & "/MusicB4A", "MigeDosamNadare128.ogg")
    sound.Looping=False
        sound.Play
        Button1.Text="پخش شدن"

    End If

End Sub

 سوال داشتم   این سورس فقط یه اهنگ دانلود و پخش میکنه چطوری میتونم دستور بهش بدم چندین اهنگا دانلود و پخش کنه منظورم اینکه یه دکمه دیگه مانندnextرا بزیم  ویه اهنگ دیگه شروع به دانلود و پخش شه لطفا با کد توضیح دهید

[naser sahami 90]

کسی نیس جواب بده

[naser sahami 90]

داش نیکروان بلکه شما جواب بدی

[naser sahami 90]

اقایون اگه سوال بنده ناجور بگید اصلاح کنم اخه چرا کسی جواب نمیده

[مهدی ایزدی 9,203]

بنده متوجه سوالتون نشدم

واضح تر توضیح بدید لطفا

نکته : زیر 12 ساعت پست رو بالا نیارید ! اسپم محسوب میشه !

[naser sahami 90]

اقای ایزدی عزیز سلام  این سورسا یکی از دوستان به من داد  انجور که من امتحان کردم فقط یه اهنگ دانلود و پخش میکنه من میخوام طوری بشه که چندین اهنگ را دانلود و پخش کنه  مثل مدیا پلیر کامپیوتر باشه با این تفاوت که انلاینه که وقتی میزنیم nexاهنگ جدید را دانلود و پخش کنه