مشکل در ذخیره فایل تصویری از اینترنت

[afraz aa 478]

سلام دوستان

 

من میخوام یه فیلم رو از اینترنت دانلود کنم و تو رم گوشی ذخیره کنم ولی یه جا گیر کردم نمیدونم مشکل از کجاست

 

من بدون هیچ مشکلی فلم رو از اینترنت دانلود میکنم ولی هر جور که خواستم ذخیرش کنم تو رم گوشی یا حافظه گوشی نشد که شد 

 

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

Dim hh As HttpJob
hh.Initialize("hh",Me)
hh.Download("http://hw3.asset.aparat.com/aparat-video/......................ad01c08a2c63904349-360p__82648.mp4")	
ProgressDialogShow("درحال دانلود فیلم")

Sub JobDone(Job As HttpJob)
ProgressDialogHide	
If Job.Success Then

Dim ou As OutputStream
ou=File.OpenOutput(File.DirInternal,"zedhack1.mp4",False)
File.Copy2(Job.GetInputStream,ou)
ToastMessageShow("فیلم با موفقعیت دانلود شد",False)	
File.Copy(File.DirDefaultExternal,"zedhack1",File.DirDefaultExternal &"/DastyarTelegerm/filmha/","zedhack22.mp4")
vv.LoadVideo(File.DirDefaultExternal&"/DastyarTelegerm/filmha/","zedhack1.mp4")
ou.Close
Else
Msgbox(Job.ErrorMessage,"True")
End If
	
End Sub

[afraz aa 478]

آقا یکی پیدا نشد که به ما کمک کنه

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

درود

این تاپیک مشکلتون رو حل میکنه :

http://answercenter.ir/topic/387-%D8%A2%D9%85%D9%88%D8%B2%D8%B4-%D8%AF%D8%A7%D9%86%D9%84%D9%88%D8%AF-%DA%A9%D8%B1%D8%AF%D9%86-%D8%B9%DA%A9%D8%B3-%D9%88-%D9%81%D8%A7%DB%8C%D9%84-%D9%88-%D8%B0%D8%AE%DB%8C%D8%B1%D9%87-%D8%A2%D9%86/

 

[afraz aa 478]

سلام استاد ایزدی گل

 

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

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