فروشگاه یاهو ۹۸

نمونه کد: چک کردن نسخه جدید با سرور (سیستم آپدیت) — مینیمال و کاربردی

این کد پایه سیستم آپدیت برنامه است: نسخه سرور از https://api٫example٫com/api/version خوانده می‌شود و با Application٫VersionCode (شماره داخلی نسخه خود برنامه) مقایسه می‌شود؛ اگر سرور عدد بزرگ‌تری داشت یعنی آپدیت موجود است. خط Wait For کار را غیرهمزمان می‌کند؛ یعنی تا جواب سرور برسد صفحه فریز نمی‌شود. همیشه Success را چک کنید (اینترنت کاربر ممکن است قطع باشد) و در پایان با j٫Release حافظه جاب را آزاد کنید.

رایگان
مشاهده صفحه محصول و راه‌های دریافت

توضیحات محصول

این کد پایه سیستم آپدیت برنامه است: نسخه سرور از https://api٫example٫com/api/version خوانده می‌شود و با Application٫VersionCode (شماره داخلی نسخه خود برنامه) مقایسه می‌شود؛ اگر سرور عدد بزرگ‌تری داشت یعنی آپدیت موجود است. خط Wait For کار را غیرهمزمان می‌کند؛ یعنی تا جواب سرور برسد صفحه فریز نمی‌شود. همیشه Success را چک کنید (اینترنت کاربر ممکن است قطع باشد) و در پایان با j٫Release حافظه جاب را آزاد کنید. کتابخانه‌های مورد نیاز این نمونه: OkHttpUtils2.

ویژگی‌های کلیدی

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

Sub CheckForUpdate
    Dim j As HttpJob
    j.Initialize("", Me)
    j.Download("https://api.example.com/api/version")
    Wait For (j) JobDone(j As HttpJob)
    If j.Success Then
        Dim serverVersion As Int = j.GetString
        ' اگر نسخه سرور بزرگ‌تر بود یعنی آپدیت موجود است
        If serverVersion > Application.VersionCode Then
            Msgbox("نسخه جدید برنامه موجود است!", "آپدیت")
        Else
            ToastMessageShow("شما آخرین نسخه را دارید", False)
        End If
    Else
        ToastMessageShow("مشکلی پیش آمد", True)
    End If
    j.Release
End Sub