رفتن به مطلب
  • 0

دانلود و پخش اهنگ به وسیله ی دیتابیس


davood1382

سوال

سلام دوستان من یک مولتی پنل دارم که دو تا دکمه توی اون هست که میخوام با کلیک روی یکی از اونا لینکی که توی دیتابیس هست رو بخونه و لود کنه (دانلود) و با کلیک روی دکمه ی دیگه اون فایل دانلود شده رو پخش کنه من با کتابخانه ی audio و قسمت media stream استفاده می کنم و با تگ و سندر هم پیش رفتم اما نشد.

لطفا راهنمایی کنید*lotafa*

لینک ارسال
به اشتراک گذاری در سایت های دیگر

8 پاسخ به این سوال تاکنون داده شده است

ارسال‌های توصیه شده

خوب اینی که تو میگی کلی کد میشه  تو تیکه تیکه مباحث را سرچ کن داخل انجمن همه ی این موضوعات بحث شده و اموزشش هست

سورس کاملی هم داخل فروشگاه هست که فقط بجای اهنگ فیلم دانلود میکنه

 

تو تا یه جای را برو بعد سوال بپرس

 

1.از سورس لایرج فایل دانلودر استفاده کن

2.سورس های پخش اهنگ را بیین

3.فیلم اموزشی مولتی پنل و تگ و سندر را ببین

4. اموزش استفاده از دیتابیس را هم ببین

 

با اینا مشکلت حله

لینک ارسال
به اشتراک گذاری در سایت های دیگر

تو تا یه جای را برو بعد سوال بپرس   1.از سورس لایرج فایل دانلودر استفاده کن 2.سورس های پخش اهنگ را بیین 3.فیلم اموزشی مولتی پنل و تگ و سندر را ببین 4. اموزش استفاده از دیتابیس را هم ببین

 

 

1.من همه جاشو رو رفتم فقط رو این موندم

2.اگه نکته ی 3 و 4 رو نمی خودنم که اصلا نمی تونستم اینو بسازم(با مولتی پنل و media stream کار کردم نشد)

 3.در مورد لایرج فایل دانلودر تو سرچ انجمن هیچی نبود.

لینک ارسال
به اشتراک گذاری در سایت های دیگر

1.من همه جاشو رو رفتم فقط رو این موندم

2.اگه نکته ی 3 و 4 رو نمی خودنم که اصلا نمی تونستم اینو بسازم(با مولتی پنل و media stream کار کردم نشد)

 3.در مورد لایرج فایل دانلودر تو سرچ انجمن هیچی نبود.

http://answercenter.ir/topic/6392-%D8%B3%D9%88%D8%B1%D8%B3-%D9%86%D9%85%D8%A7%DB%8C%D8%B4-%D8%B1%D9%88%D9%86%D8%AF-%D8%AF%D8%A7%D9%86%D9%84%D9%88%D8%AF-%D9%81%D8%A7%DB%8C%D9%84-%D9%86%D9%85%D8%A7%DB%8C%D8%B4-%D8%B1%D9%88%D9%86%D8%AF-%D8%AF%D8%B1-%D9%86%D9%88%D8%AA%DB%8C%D9%81/

 

 

این جا با این اسم هست تو سایت اصلی با لارج فایل نمیدونم چطور ترجمه کردن از لارج فایل تبدیل شده به این خخخخ

 

با استریم هم بدون دانلود میتونی این کارو بکنی ولی دیگه نمیتونی جلو عقبش کنی.مشکلت چی بود توش ؟ دو خط کد بیشتر که نیست ؟

لینک ارسال
به اشتراک گذاری در سایت های دیگر

من مشکلم گرفتن لینک از دیتابیس و دانلود از توی مولتی پنله

لینک ارسال
به اشتراک گذاری در سایت های دیگر

من مشکلم گرفتن لینک از دیتابیس و دانلود از توی مولتی پنله

	If File.Exists(File.DirInternal,"db.db")=False Then
		File.Copy(File.DirAssets,"db.db",File.DirInternal,"db.db")
	End If
	Dim h As Int=1%y
	
	sql1.Initialize(File.DirInternal,"db.db",False)
	Cur1=sql1.ExecQuery("SELECT * From mytable")
	For i=0 To Cur1.RowCount-1
		Cur1.Position=i

		Dim p As Panel
		p.Initialize("p")
		ScrollView1.Panel.AddView(p,0,h,100%x,100%Y)
		h=h+20%x
		p.LoadLayout("laypanel")


		btn1.Text=" اهنگ شماره : " & Cur1.GetString("id")


		btn1.Tag = Cur1.GetString("address")

	Next
	ScrollView1.Panel.Height = h

Sub btn1_Click
    
    Dim address As Button
    address = Sender
    
    ' حالا لينک داخل اينه address.tag
    
End Sub

معمولا واسه کسی کد نمینویسم برای جواب ولی دیگه :)

تو هم سعی کن یکم خودت تست و خطا کنی بهتر یاد میگیری

لینک ارسال
به اشتراک گذاری در سایت های دیگر

Sub Globals
	'These global variables will be redeclared each time the activity is created.
	'These variables can only be accessed from this module.
Dim sql As SQL
Dim cur As Cursor
Dim boz As MediaPlayerStream
	Private Panel1 As Panel
	Private btndan As Button
	Private btnstop As Button
	Private btnplay As Button
	Private Label1 As Label
	Dim stop As Int = 3%y
	Private ScrollView1 As ScrollView
End Sub

Sub Activity_Create(FirstTime As Boolean)
	'Do not forget to load the layout file created with the visual designer. For example:
	Activity.LoadLayout("spanel")
If File.Exists(File.DirInternal,"test.db") = False Then
File.Copy(File.DirAssets,"test.db",File.DirInternal,"test.db")
End If
sql.Initialize(File.DirInternal,"test.db",False)
cur = sql.ExecQuery("SELECT * FROM tbl")

For i = 0 To cur.RowCount-1
cur.Position = i
Dim p As Panel
p.Initialize("p")
ScrollView1.Panel.AddView(p,0,stop,100%x,100%y)
stop = stop + 35%y
p.LoadLayout("panel")
btndan.tag= cur.GetString("link")
Label1.Text = cur.GetString("matn")
ScrollView1.Panel.Height= stop
Next
End Sub
Sub btndan_Click
	Dim iz As Button
	iz=Sender
	media.Load(iz.Tag)
End Sub

این کدای منه اما ارور جاوا*chert & pert* میده 

لینک ارسال
به اشتراک گذاری در سایت های دیگر

بایگانی شده

این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.

  • کاربران آنلاین در این صفحه   0 کاربر

    • هیچ کاربر عضوی،در حال مشاهده این صفحه نیست.
×
×
  • اضافه کردن...