جستجو در تالار

در حال نمایش نتایج برای برچسب های 'سورس بازار'.



تنظیمات بیشتر جستجو

  • جستجو بر اساس برچسب

    برچسب ها را با , از یکدیگر جدا نمایید.
  • جستجو بر اساس نویسنده

نوع محتوا


تالار ها

  • اخبار سایت
    • قوانین انجمن
    • اخبار و اطلاعیه ها
    • انتقادات و پیشنهادات
  • بیسیک فور اندروید
    • آموزش ها
    • کتابخانه ها
    • سورس کد ها
    • قطعه کد ها
    • سوالات عمومی
    • معرفی برنامه های شما
    • دانلود نسخه های مختلف
  • اندروید استدیو
    • کتابخانه ها
    • سورس کد ها
    • قطعه کد ها
    • سوالات عمومی
    • معرفی برنامه های شما
  • زبان های برنامه نویسی دیگر
    • PHP
  • بخش گرافیک
    • ابزار های طراحی
    • طرح های لایه باز
    • نمونه رابط کاربری (UI)
  • بخش VIP
    • سورس کد ها
    • کتابخانه ها
    • آموزش ها
    • بخش پشتیبانی
  • متفرقه
    • بحث آزاد

دسته ها

  • بیسیک فور اندروید
    • کتابخانه ها
    • سوس کدها
    • نسخه های مختلف b4a

دسته ها

  • Articles

1 نتیجه پیدا شد

  1. سلام اطلاعات برگشتی از جیسون بنده به شرح زیر است : [{"name":"\u0627\u06a9\u0648\u0631 \u0627\u0648\u0644","pic":"http:\/\/ozvbeg.ir\/app\/guitar\/pic\/0.jpg","gheymat":"1000"},{"name":"\u0627\u06a9\u0648\u0631\u062f \u062f\u0648\u0645","pic":"http:\/\/ozvbeg.ir\/app\/guitar\/pic\/1.jpg","gheymat":"2000"},{"name":"\u0627\u06a9\u0648\u0631 \u0627\u0648\u0644","pic":"http:\/\/ozvbeg.ir\/app\/guitar\/pic\/0.jpg","gheymat":"1000"},{"name":"\u0627\u06a9\u0648\u0631 \u0627\u0648\u0644","pic":"http:\/\/ozvbeg.ir\/app\/guitar\/pic\/0.jpg","gheymat":"1000"}] طبق تاپیک طبق کد بنده Sub LinkAndNam Dim read As HttpJob read.Initialize("read", Me) read.PostString("http://4rd.ir/app/guitar/akords.php","") Wait For (read) JobDone(read As HttpJob) If read.Success Then If read.JobName = "read" Then Dim parser As JSONParser parser.Initialize(read.GetString) Dim root As List = parser.NextArray For Each colroot As Map In root Dim name As String =colroot.Get("name") Dim pic As String =colroot.Get("pic") Dim gheymat As String =colroot.Get("gheymat") ImageLinks.Initialize AppsLinks1.Initialize AppsNames2.Initialize AppsLinks3.Initialize AppsNames1.Initialize ImageLinks.Addall(Array As String(pic)) AppsLinks1.AddAll(Array As String(pic)) AppsNames1.Addall(Array As String(gheymat&" - "&name )) AppsNames2.Addall(Array As String(gheymat)) AppsLinks3.Addall(Array As String(pic)) Next ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' ImageSlider.notifyDataSetChanged Recycler1.notifyDataSetChanged Recycler2.notifyDataSetChanged Recycler3.notifyDataSetChanged End If Else ToastMessageShow("اتصال با شکست مواجه شد", True) read.Release End If read.Release End Sub طبق این کد باید تمامی اطلاعات برگشت از سرور نمایش داده شود ولی فقط یک آیتم درست میشه