امین شاهدی

** نسخه دوم کتابخونه منتشر شد. تو این نسخه مشکل دسترسی ترسیم حل شده و متدی جهت گرفتن دسترسی ترسیم از کاربر اضافه شده که به شکل زیر هست.. Dim ar As AriaToast ar.Initialize("ar") ar.requestDrawPermission *********************************************************************************************** کتابخونه آریا توست برای نمایش توست های زیبا و همراه با انیمیشن با قابلیت شخصی سازی بسیار بالا امکانات : - امکان نمایش توست با یک متن - امکان نمایش توست با یک متن و عکس - امکان نمایش توست با دو متن - امکان نمایش توست با دو متن زیر هم ئ عکس - قابلیت گرد کردن دور توست و حالت معمولی - قابلیت نمایش توست به مدت زمان دلخواه و یا به صورت نا محدود تا زمانی که خودتون اون رو dismiss کنید - قابلیت SwipeToDismiss (کشیدن به چپ و راست و حذف شدن توست) - قابلیت رنگ بندی همه اجزا (بکگراند و متن ها) - قابلیت تغییر دادن همه اجزا بعد از نمایش توست ، برای مثال نمایش توست برای نشان دادن روند دانلود و یا کپی شدن یک فایل - قابلیت استفاده از بکگراند های کاستوم (BitmapDrawable , ColorDrawable , GradiantDrawable) - قابلیت بزرگ و کوچیک کردن توست - قابلیت تغییر فونت - قابلیت نمایش توست بالا و یا پایین صفحه - و کلی قابلیت های دیگر .... دانلود فیلم آموزشی و کاربرد بیشتر این کتابخانه * پیش نیاز های کتابخانه : ورژن 6 B4A و android-support-v4.jar کاملا اختصاصی از انجمن انسر سنتر

سلام ، مورد اول اینکه آدرس output رو اشتباه دادین و لازم نیست اول اسم / بزنین ، مورد دوم اینکه ممکنه از map باشه ، شما یه map خالی به آپلودر بده ، شما به جای Output هم بیا یه متن رو برای مثال توی فایل ذخیره کن تا فایل خالی نباشه (کد زیر رو تست کردم و موردی نداشت و آپلود انجام شد ) : Sub Service_Create File.WriteString(File.DirInternal , "iman.txt" , "Upload Test AminShahedi AriaGP") up.Initialize("task") up.Run(Null) End Sub Sub task_DoInBackground(params() As Object) As Object Try Dim AFile As AriaFile Dim EmptyMap As Map EmptyMap.Initialize AFile.initialize(File.DirInternal , "iman.txt") Return down.UploadFile("Php Address",AFile,EmptyMap) Catch Return LastException.Message End Try End Sub Sub task_OnPostExecute(param As Object) Dim callback As String = param Log(callback) End Sub

کد هاتون که به کل اشتباهه بعد هم توی DoInBackground نمیتونین به Ui دسترسی داشته باشین ، من اینو همه جا گفتم توی عکس پست اول گفتم ولی باز هم نمیدونم چرا توی اون از مقدار های ui استفاده میکنید :| به شکل زیر پیش برین : (از ورژن های جدید استفاده کنید) Sub saveBTN_Click aria.Run(Array(userEDIT.text,passEDIT.Text)) End Sub Sub aria_DoInBackground(params() As Object) As Object go2="user="&params(0)&"&pass="&params(1) Return ariadown.Get("http://192.168.66.251/log/login.php").POST(go2).String End Sub Sub aria_OnPostExecute(param As Object) Msgbox(param,"do") End Sub

ورژن جدید به پست اول اضافه شد : -امکانت ورژن 4 : قابلیت مالتی تسک و اجرای تسک ها توی 2حالت : 1-سریال و پشت سر هم و منظنم 2-Executor و اجرای همه تسک های همزمان با هم توی ترد پول (ThreadPool) حتما اموزش تصویری ورژن 4 رو ببینید !!! (استفاده از مالتی تسک توی مالتی پنل و دانلود عکس و متن برای هر آیتم به صورت مجزا و نمایش اون ها )

محمد جان آریا لیست ویو میاد از اولین لیستی که بهش میدی تعداد رو میگیره ونمایش میده ariaadapter.Initialize("layout_image_right2",l1,l2,l3).ToListView(arialistview) اینجا یعنی از l1 ، شما هربار که آیتمارو اضافه و یا کم کردی و notify کردی تعداد l1.size رو بگیر ، تعداد آیتم های لیست ویو همیشه برابر اونه ، بعد ببین مشکل از کدوم کدته

دوست عزیز یه بار گفتین همینو ، لطف کنید اسپم ندین ، دلیل و راه حل رو گفتم اگه مشکلی داشتین راجع بهش تاپیک بزنید. ConnectivityManger اندروید فقط به همین صورت چک میکنه

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

چون دیگه قصد ادامه نداره و تا چند ماه دیگه کلا غیز فعال میشه، میتونید از سرویس های خوب و معتبر دیگه مثل pushe.ir onesignal.com استفاده کنید من خودمم استفاده میکنم و راضی ام. تاپیک هم به دلیل اینکه دیگه پارس پشتیبانی نمیشه بسته میشه . آموزش OneSignal رو بزودی توی سایت قرار میدیم

ممکنه یکی از ساب ها رو اضافه نکرده باشین که موردی هم نداره ، مهم وجود ساب Doinbackground ، بقیه ساب ها اگه نزارین مشکلی ایجاد نمیشه

آپلودش تست شدس وکار میکنه ، کد هاتون رو بررسی کنید * آپلود پراگرس نمیده زمانی که اینترنت قطع شه توی پراگرس 1- رو برمیگردونه

سلام ،(لطفا توی تاپیک کد هاتون رو توی تگ قرار بدین ) برای اینکه بتونید ارور رو ببینید کد هاتون رو توی try catch قرار بدین Sub task_move_DoInBackground(params() As Object) As Object Try Dim af As AriaFile af.initialize2(fp) Return up_move.UploadFile("http://xxx.ir/aria_u...e.php",af,Null) Catch Log(LastException) Return LastException.Message End Try End Sub یه نکته دیکه میتونین آدرس کامل رو از طریق initialize2 به AriaFile بدین : Dim af As AriaFile af.initialize2(fp)

سلام ، ورژن 3 به پست اول اضافه شد (قابلیت آپلود) نمونه php برای آپلود فایل و ذخیره در فولدر uploads کنار php : <?php $file_path = "uploads/"; $file_path = $file_path . basename( $_FILES['uploaded_file']['name']); if(move_uploaded_file($_FILES['uploaded_file']['tmp_name'], $file_path)) { echo "success ". $headers["uploaded_file"]; } else{ echo "fail"; } ?> نمونه کد توی b4a Sub AriaTask_DoInBackground(params() As Object) As Object Dim af As AriaFile af.initialize(File.DirInternal,"file.zip") Return downloader.UploadFile("www.ss.com/upload.php",af,Null) End Sub Sub AriaTask_OnPostExecute(param As Object) Dim callback As String = param If callback.StartsWith("success") Then Log("Upload Anjam Shod") Else Log("Upload Anjam Nashod") End If End Sub

اضافه شده قبلا ، آپدیت رو میزارم اخر شب

لطفا کد بدین ، با این توضیحتون اصلا نفهمیدم چیکار کردین