بررسی اتصال به اینترنت در بیسیک فور اندروید(ba4)
برای بررسی اتصال به اینترنت در بیسیک فور اندروید:
ابتدا کتابخانه رفلکشن را وارد کنید و کد زیر را در اکتویتی مورد نظر قرار دهید..
Sub vipfamcon As Boolean Dim vf As Reflector vf.Target = vf.GetContext vf.Target = vf.RunMethod2(“getSystemService”, “connectivity”, “java.lang.String”) vf.Target = vf.RunMethod(“getActiveNetworkInfo”) If vf.Target <> Null Then Return vf.RunMethod(“isConnectedOrConnecting”) End If Return False End Sub
حال تابع فوق را صدا بزنید:
if vipfamcon then
'con
else
'discon
end if
برای جستجو توابع بیشتر از تگ ها کمک بگیرید..
موفق باشید.
VIP
