با سلام و سپاس خدمت دوستان یاهو 98
اول داخل پروژه کتابخانه زیر رو تیک میزنیم
بعد کد زیر رو به پروژه اضافه میکنیم
✨ نکات مهم:
• کار با کتابخانه‌های: Reflection
• کپی و استفاده مستقیم در پروژه B4A
📚 کتابخانه‌های مورد نیاز:
Reflection
(از مسیر Libraries در محیط B4A تیک بزنید.)
🚀 نحوه استفاده:
کد زیر را کپی کنید و در Sub یا ماژول مناسب پروژه خود قرار دهید؛ کتابخانه‌های اعلام‌شده را تیک بزنید.
| دسته‌بندی | تکه کدها |
| تعداد بازدید | ۳۶ |
| تعداد فروش | ۰ |
| فرمت تحویل | کد نمونهٔ رایگان در همین صفحه |
| پشتیبانی | تیکت پشتیبانی در پنل کاربری |
ویژگی‌های کلیدی
- تکه‌کد آماده B4A
- کاملاً رایگان
- کتابخانه: Reflection
هنوز نظری ثبت نشده است. اولین نفر باشید!
برای ثبت نظر وارد شوید. (ثبت نظر پس از خرید فعال می‌شود)
if IsConnected7 then
'نت وصل هست
else
'نت وصل نیست
end if
Sub IsConnected7 As Boolean
Dim r As Reflector
r.Target = r.GetContext
r.Target = r.RunMethod2("getSystemService", "connectivity", "java.lang.String")
r.Target = r.RunMethod("getActiveNetworkInfo")
If r.Target <> Null Then
Return r.RunMethod("isConnectedOrConnecting")
End If
Return False
End Subمحصولات مشابه