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

مشکل دیر اپدیت شدن httjob


agha sasan

سوال

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

لطفا درخاستن کد و سورس نکنید سوالم واضحه به نظرتون مشکلش چیه؟

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

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

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

اولیه رو قبلا خونده بودم دومیه رو هم خوندم ولی توش اموزش نبود :gerye:

 

شما اگه منظور بنده رو متوجه شده بودی الان دیگه اپ رو نوشته بودی

تمام متون رو در یک فایل بذار و با RegEX جدا کن و پردازش کن

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

من اینو متوجه شدم بلد هم هستم فقط شما گفتی با کتابخانه okhtt اینکار رو کنم منم گفتم اموزش استفاده از اونو رو میخوام وگرنه httjob رو که بلدم اگه با httjob بنویسم خیلی دیر اپدیت میشه همون مشکلی که عرض کردم!

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

دوست گلم OKHTTP دیگه از APACHE استفاده نمیکنه بخاطر همین سرعت بهتری داره عملکرد و کدهاش در سطح درخواست شما  یکی هست :give_rose:

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

سورس شرط و ارسال job رو با آدرس های الکی بذار ببینم چیه داستان

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

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

Sub Process_Globals
	'These global variables will be declared once when the application starts.
	'These variables can be accessed from all modules.
	Dim noti As Notification
	Dim txt As String
	Dim txt2 As String
	Dim txt3 As String
	Dim htt1 As HttpJob
Dim htt2 As HttpJob
Dim htt3 As HttpJob
Dim htt4 As HttpJob
Dim timer As Timer
End Sub

Sub Service_Create
	'This is the program entry point.
	'This is a good place to load resources that are not specific to a single activity.
noti.Initialize
timer.Initialize("timer",15000)
timer.Enabled=True
htt1.Initialize("htt1",Me)
htt2.Initialize("htt2",Me)
htt3.Initialize("htt3",Me)
htt4.Initialize("htt4",Me)
htt1.Download("http://www.example.ir/txt1.txt")
End Sub

Sub Service_Start (StartingIntent As Intent)
End Sub

'Return true to allow the OS default exceptions handler to handle the uncaught exception.
Sub Application_Error (Error As Exception, StackTrace As String) As Boolean
	Return True
End Sub

Sub Service_Destroy

End Sub

Sub jobDone(job As HttpJob)
	ProgressDialogHide
	If job.Success Then 
		
	If job.JobName="htt1" Then
	txt=job.GetString
	ToastMessageShow(txt,False)
	If txt="sasan" Then
		htt3.Download("http://www.example.ir/icon.png")
	End If
	
	Else If job.JobName="htt3" Then
		Dim out As OutputStream
		out=File.OpenOutput(File.DirRootExternal,"ic.png",True)
		File.Copy2(job.GetInputStream,out)
 		htt4.Download("http://www.example.ir/txt3.txt")
		
    Else If job.JobName="htt4" Then
        txt3=job.GetString
 		htt2.Download("http://www.example.ir/txt2.txt")	    
		
	else If job.JobName="htt2" Then
		txt2=job.Getstring
		noti.Icon="icon"
		noti.SetInfo(txt3,txt2,Me)
		noti.Notify(1)
	End If
	
	End If
End Sub

Sub timer_Tick
htt1.Download("http://www.example.ir/txt1.txt")
End Sub
لینک ارسال
به اشتراک گذاری در سایت های دیگر

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

 

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

 

ولی برای بهتر شدن

1.سرعت حتما از کتابخونه OKhttp استفاده کن

2.تمام متن هاتو توی به فایل دخیره کن تا فقز همون فایل رو دانلود کنی

بعد میتونی با RegEx از هم جدا کنی و پردازش کنیشون

 

و یک نکته مهم

حتما یاد آوری کن من APP شمارو نصب کنم

هر 15 ثانیه برنامه داره 20.0 KB دانلود میکنه این یعنی کاربر به اضای هر 5دقیقه باید 400 کیلو واس خودش بگیره

 

پیشنهاداتمو دادم

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

 

مشکلی بود بپرس موفق باشی

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

ببخشید مثل اینکه متوجه حرفم نمیشید شایدم من بد توضیح میدم خلاصه من اموزش دانلود یک فایل با کتابخانه okhttp رو میخام یادبگیرم تو سایت گشتم چیزی پیدا نکردم!

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

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

بایگانی شده

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

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

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