توجه : شما عزیزان می توانید اکثر آموزش های برنامه نویسی را به رایگان در کانال یوتیوب من به آدرس YouTube.com/AliKarbasi مشاهده کنید!
در صورتی که به سایت یوتیوب دسترسی ندارید، می توانید این آموزش ها را از بخش "دوره های آموزشی" سایت مشاهده و دانلود کنید.

بررسی وضعیت اینترنت در بیسیک۴اندروید

سلام دوستان، امیدوارم حالتون خوب باشه 🙂

اگه از وب ویو برای لود کردن یه URL توی پروژتون استفاده کنید و موقع اجرای برنامه، گوشی به اینترنت وصل نباشه، ارور لود نشدن صفحه توی خود وب ویو نمایش داده میشه و ظاهر زیبایی نداره…

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

کتابخانه های مورد نیاز :

  • Network

توی قسمت Process_Globals یک متغیر از نوع ServerSocket تعریف می کنیم.

Sub Process_Globals
  Dim server As ServerSocket
End Sub

حالا با استفاده از Sub زیر آی پی رو چک می کنیم :

Sub GetIp As Boolean

server.Initialize(0,"")
If server.GetMyIP = "127.0.0.1" Then
  Return False
Else
  Return True
End If

End Sub

همونطور که میدونید اگه به اینترنت وصل نباشیم آی پی پیشفرض دستگاه ۱۲۷.۰.۰.۱ هستش برای همین در شرط If داخل این Sub این آی پی رو چک می کنیم و این ساب اگه آی پی برابر ۱۲۷.۰.۰.۱ باشه False و اگه آی پی ۱۲۷.۰.۰.۱ نباشه (یعنی به اینترنت وصل باشیم)، True رو Return می کنه.

درضمن عدد ۰ در server.Initialize(0,””) همون شماره پورت خودمونه 😅

در نهایت (مثل کد زیر) می تونید از مقدار True یا False به دست اومده برای چک کردن وضعیت اتصال به اینترنت استفاده کنید:

If GetIp=True Then
  ToastMessageShow("ارتباط با اینترنت برقرار است.",False)
Else
  ToastMessageShow("ارتباط با اینترنت برقرار نیست!",True)
End If

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

www.AliKarbasi.ir/Discuss

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