ذخیره عکس انلاین

[Javad25564 10]

سلام.خسته نباشید .

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

مشکلم اینکه میخوام توی حلقهforعکسها را نشون بدم.

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

مشکلم ماله وقتیه که میخوان انلاین دانلود کنم و توی حلقهfor نمایش بدم.

از کتابخانهhttpاستفاده کردم.

ممنون میشم راهنمای کنید

[Javad25564 10]

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

با اریا گلاید انجام دادم.

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

کمکم کنید

[M-CAP7AIN 537]

در 9 ساعت قبل، Javad25564 گفته است :

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

با اریا گلاید انجام دادم.

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

کمکم کنید

عکس دانلود شده با Glide کش میشه ، باید این کش اول پاک سازی بشه یا کش کردن رو غیرفعال کنید یا میتونید از MC7Glide استفاده کنید.

[Javad25564 10]

در 3 دقیقه قبل، M-CAP7AIN گفته است :

عکس دانلود شده با Glide کش میشه ، باید این کش اول پاک سازی بشه یا کش کردن رو غیرفعال کنید یا میتونید از MC7Glide استفاده کنید.

چطوری کش را پاک کنم

[M-CAP7AIN 537]

در 2 دقیقه قبل، Javad25564 گفته است :

چطوری کش را پاک کنم

این کتابخونه به صورت پیشفرض قابلیت پاک کردن کش رو نداره ، بجاش کش کردن رو غیرفعال میشه میکرد.

Aria.Load("").AsBitmap.SkipMemoryCache(True).DiskCacheStrategy(2).....

 

[Javad25564 10]

در 3 ساعت قبل، M-CAP7AIN گفته است :

این کتابخونه به صورت پیشفرض قابلیت پاک کردن کش رو نداره ، بجاش کش کردن رو غیرفعال میشه میکرد.

Aria.Load("").AsBitmap.SkipMemoryCache(True).DiskCacheStrategy(2).....

 

نمیدونم چرا از هر روشی میرم بازم فایل کش ذخییره میشه.ببینید کد من درسته؟

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

Sub Process_Globals
	'These global variables will be declared once when the application starts.
	'These variables can be accessed from all modules.

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 h1 As HttpJob
	Dim h2 As HttpJob
	
	Private Ig As ImageView
	Private L1 As Label
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("L1")
	h1.Initialize("img",Me)
	h1.Download("http://appesfahan.ir/aks/1.png")
	h2.Initialize("txt",Me)
	h2.Download("http://appesfahan.ir/aks/1.php")
End Sub

Sub jobdone (job As HttpJob)
	If job.JobName="img" And job.Success Then
		Ig.Bitmap=job.GetBitmap
		Else
			ToastMessageShow("no",True)
	End If
	If job.JobName="txt" And job.Success Then
		L1.Text=job.GetString
	Else
		ToastMessageShow("no0000",True)
	End If
End Sub

 

[m007moh 181]

در ۱ ساعت قبل، Javad25564 گفته است :

سلام.خسته نباشید .

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

مشکلم اینکه میخوام توی حلقهforعکسها را نشون بدم.

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

مشکلم ماله وقتیه که میخوان انلاین دانلود کنم و توی حلقهfor نمایش بدم.

از کتابخانهhttpاستفاده کردم.

ممنون میشم راهنمای کنید

درخواست های http رو نمیشه با حلقه فرستاد و دریافت کرد 

بهترین راهکار اینه که زمانی که یکی succes شد از همون httputiels که داری لینک جدید را بفرستی (اینجوری درواقع یه حلقه داری که دونه دونه و پشت سرهم اجرا میشه )

[Javad25564 10]

در 13 دقیقه قبل، m007moh گفته است :

درخواست های http رو نمیشه با حلقه فرستاد و دریافت کرد 

بهترین راهکار اینه که زمانی که یکی succes شد از همون httputiels که داری لینک جدید را بفرستی (اینجوری درواقع یه حلقه داری که دونه دونه و پشت سرهم اجرا میشه )

راهکاری دیگه نیست؟؟؟

از کتابخونه دیگه؟؟؟

روش دیگه؟؟؟

 

[m007moh 181]

در 48 دقیقه قبل، Javad25564 گفته است :

راهکاری دیگه نیست؟؟؟

از کتابخونه دیگه؟؟؟

روش دیگه؟؟؟

 

من تاحالا امتحانشون نکردم ولی ariaglide و picasso هم بیتمپ رو دانلود میکنن و میتونی ذخیرشون کنی ولی باید توی ترد جدا اینکار را انجام بدی

[Javad25564 10]

در 59 دقیقه قبل، Javad25564 گفته است :

راهکاری دیگه نیست؟؟؟

از کتابخونه دیگه؟؟؟

روش دیگه؟؟؟

 

 

در ۱ ساعت قبل، m007moh گفته است :

درخواست های http رو نمیشه با حلقه فرستاد و دریافت کرد 

بهترین راهکار اینه که زمانی که یکی succes شد از همون httputiels که داری لینک جدید را بفرستی (اینجوری درواقع یه حلقه داری که دونه دونه و پشت سرهم اجرا میشه )

چجوری عکسهای که دانلود کردیم را توی پوشه fileبرنامه ذخیره کنیم؟؟؟

[m007moh 181]

در 7 دقیقه قبل، Javad25564 گفته است :

 

چجوری عکسهای که دانلود کردیم را توی پوشه fileبرنامه ذخیره کنیم؟؟؟

شما با این نمونه کدی ک براتون میذارم راحت میتونید کاری که میخواید را انجام بدید

Sub Globals
	'These global variables will be redeclared each time the activity is created.
	'These variables can only be accessed from this module.
Dim piclinks As List
Dim httpic As HttpJob
Dim cut As Int=0
Dim aria As AriaPhotoshp

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("Layout1")
	piclinks.Initialize
	piclinks.Add("http://mydiba.xyz/wp-content/uploads/29iluGHcoADaZNFwrioQ3dThvrD-181x268.jpg")
	piclinks.Add("http://mydiba.xyz/wp-content/uploads/5vvsW9s2UW794XgB3sCkpmA2BI6-181x268.jpg")
	piclinks.Add("http://mydiba.xyz/wp-content/uploads/zllvN7ujM5CYOaA55FTQ45fmta9-181x268.jpg")
	piclinks.Add("http://mydiba.xyz/wp-content/uploads/7eWAM1LWvyN8PmwdOSiL1klBY7t-181x268.jpg")
	httpic.Initialize("httpic",Me)
	httpic.Download(piclinks.Get(cut))
End Sub

Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub
Sub jobdone(job As HttpJob)
	If job.Success And cut<4 Then
		aria.writeBitmapToFile(job.GetBitmap,File.DirRootExternal,Rnd(111,999)&".jpg",100)
		httpic.Download(piclinks.Get(cut))
		cut=cut+1
		ToastMessageShow("Done"&cut,False)
		Else
		ToastMessageShow("Finish",False)
	End If
End Sub

 

با این کد 4 تا عکس پشت سر هم ذخیره میشن تو DirRootExternal

[Javad25564 10]

در 4 دقیقه قبل، m007moh گفته است :

شما با این نمونه کدی ک براتون میذارم راحت میتونید کاری که میخواید را انجام بدید

Sub Globals
	'These global variables will be redeclared each time the activity is created.
	'These variables can only be accessed from this module.
Dim piclinks As List
Dim httpic As HttpJob
Dim cut As Int=0
Dim aria As AriaPhotoshp

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("Layout1")
	piclinks.Initialize
	piclinks.Add("http://mydiba.xyz/wp-content/uploads/29iluGHcoADaZNFwrioQ3dThvrD-181x268.jpg")
	piclinks.Add("http://mydiba.xyz/wp-content/uploads/5vvsW9s2UW794XgB3sCkpmA2BI6-181x268.jpg")
	piclinks.Add("http://mydiba.xyz/wp-content/uploads/zllvN7ujM5CYOaA55FTQ45fmta9-181x268.jpg")
	piclinks.Add("http://mydiba.xyz/wp-content/uploads/7eWAM1LWvyN8PmwdOSiL1klBY7t-181x268.jpg")
	httpic.Initialize("httpic",Me)
	httpic.Download(piclinks.Get(cut))
End Sub

Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub
Sub jobdone(job As HttpJob)
	If job.Success And cut<4 Then
		aria.writeBitmapToFile(job.GetBitmap,File.DirRootExternal,Rnd(111,999)&".jpg",100)
		httpic.Download(piclinks.Get(cut))
		cut=cut+1
		ToastMessageShow("Done"&cut,False)
		Else
		ToastMessageShow("Finish",False)
	End If
End Sub

 

با این کد 4 تا عکس پشت سر هم ذخیره میشن تو DirRootExternal

دستت ددد نکنه.فقط یه نکته.به جای اسم که به صورت رندوم الان هست اگه بخوام از ۱ تا ۴ ذخیره کنه .چیکار کنم.

[m007moh 181]

در 1 دقیقه قبل، Javad25564 گفته است :

دستت ددد نکنه.فقط یه نکته.به جای اسم که به صورت رندوم الان هست اگه بخوام از ۱ تا ۴ ذخیره کنه .چیکار کنم.

این خط رو اینجوری تغییر بده

aria.writeBitmapToFile(job.GetBitmap,File.DirRootExternal,cut&".jpg",100)

 

[Javad25564 10]

در 11 ساعت قبل، Javad25564 گفته است :

دستت ددد نکنه.فقط یه نکته.به جای اسم که به صورت رندوم الان هست اگه بخوام از ۱ تا ۴ ذخیره کنه .چیکار کنم.

 

در 11 ساعت قبل، m007moh گفته است :

شما با این نمونه کدی ک براتون میذارم راحت میتونید کاری که میخواید را انجام بدید

Sub Globals
	'These global variables will be redeclared each time the activity is created.
	'These variables can only be accessed from this module.
Dim piclinks As List
Dim httpic As HttpJob
Dim cut As Int=0
Dim aria As AriaPhotoshp

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("Layout1")
	piclinks.Initialize
	piclinks.Add("http://mydiba.xyz/wp-content/uploads/29iluGHcoADaZNFwrioQ3dThvrD-181x268.jpg")
	piclinks.Add("http://mydiba.xyz/wp-content/uploads/5vvsW9s2UW794XgB3sCkpmA2BI6-181x268.jpg")
	piclinks.Add("http://mydiba.xyz/wp-content/uploads/zllvN7ujM5CYOaA55FTQ45fmta9-181x268.jpg")
	piclinks.Add("http://mydiba.xyz/wp-content/uploads/7eWAM1LWvyN8PmwdOSiL1klBY7t-181x268.jpg")
	httpic.Initialize("httpic",Me)
	httpic.Download(piclinks.Get(cut))
End Sub

Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub
Sub jobdone(job As HttpJob)
	If job.Success And cut<4 Then
		aria.writeBitmapToFile(job.GetBitmap,File.DirRootExternal,Rnd(111,999)&".jpg",100)
		httpic.Download(piclinks.Get(cut))
		cut=cut+1
		ToastMessageShow("Done"&cut,False)
		Else
		ToastMessageShow("Finish",False)
	End If
End Sub

 

با این کد 4 تا عکس پشت سر هم ذخیره میشن تو DirRootExternal

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