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

دانلود از لینک داخل دیتابیس


علی علایی

سوال

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

ببنید من با دیتابیس لیست موارد رو میارم و تو صفحه بعدش میخام عمل دانلود انجام بشه 

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

نمونه ای که ازش دارم فقط یه دانلود داره که از یک رشته است 

اما اینجا من 

%D8%A8.png

طبق تصویر یه  لیست ویو  توصفحه  بعدی میخام دانلود کنم 

 

کدهای من مربوط به دانلود 

Sub btndownload_Click


If File.Exists(File.DirRootExternal & "/Ahang", cur2.GetString("name")&".mp3") = True Then 

	
	Else
	 

Dim dd As DownloadData
	dd.url = cur2.GetString("link")
	
dd.EventName = "dd"
	
dd.Target = Me
	CallSubDelayed2(DownloadService, "StartDownload", dd)

End Sub



Sub dd_Complete(Job As HttpJob)
	Log("Job completed: " & Job.Success)


Dim o As OutputStream
   
 o = File.OpenOutput(File.DirRootExternal & "/Ahang", cur2.GetString("name")&".mp3" , False)
  
 File.Copy2(Job.GetInputStream, o)
  
 o.Close
 
	

Job.Release


End Sub

ممنون میشم راهنمایی بفرمایید 

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

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

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

دوستان سوال تا این حد سخت بود؟؟!!

جزییات تو پست اول هست 

اگر لازمه بگید سورس بزارم 

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

من اصلا متوجه مشکلت نشدم

توضیح بده

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

دوستان با آریادانلود تا حدی درست شد 

یعنی عمل دانلود انجام میشه ولی انگاری آخری رو دانلود میکنه 

اینم کدهای دانلود 

If File.Exists(File.DirRootExternal & "/zaker", cur2.GetString("name")&".mp4") = True Then 
	 ToastMessageShow("فایل دانلود شده و در مسیر zaker قرار دارد",True)
	 Else
	 araia.StartDownload(Main.cur1.GetString("link"),File.DirRootExternal & "/zaker", cur2.GetString("name")&".mp4")
	

Capture.PNG

 

ببیند طبق تصویر به هر دانلود نام خودش داده ولی  پخش که میکنی انگاری فقط آخریو دانلود کرده 

اگر لازمه بگید سورس بزارم 

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

این کارو با تصویر کردم ولی فایل نه

سورستو بذار ببینم چیه داستانت

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

این کارو با تصویر کردم ولی فایل نه

سورستو بذار ببینم چیه داستانت

 

نمونه سورسمو پ خ شد(بنا به دلایلی)

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

دوستان کسی نظری نداره 

خدایش اگر کارم گیر نبود زود تاپیک بالا نمی آوردم 

چه کنم که گیر کردم 

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

up

سلام

 

بنده تنها کمکی که میتونم به شما بکنم ارسال کتابخانه های دانلود به همراه مثال است.

http://s6.picofile.com/file/8236197784/help.rar.html

 

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

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

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

با کد بالا فورس کلوز میده 

یه حرکتی باید تو File.Exists و File.OpenOutput 

باید بزنم که کار کنه فقط نمیدونم چه حرکتی 

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

بایگانی شده

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

مهمان
این موضوع برای عدم ارسال قفل گردیده است.
  • کاربران آنلاین در این صفحه   0 کاربر

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