رفتن به مطلب
  • 0

قطع و وصل کردن اینترنت


Kazem Forghani

سوال

10 پاسخ به این سوال تاکنون داده شده است

ارسال‌های توصیه شده

اون چیزی که من فهمیدم:

 

ابتدا این کد رو در مانفیست ادیتور اضافه کن:

AddPermission(android.permission.CHANGE_NETWORK_STATE)

بعد از این کد استفاده کن:

Sub SetMobileData(Enabled As Boolean)
   Dim r As Reflector
   r.Target = r.GetContext
   r.Target = r.RunMethod2("getSystemService", "connectivity", "java.lang.String")
   r.Target = r.GetField("mService")
   r.RunMethod2("setMobileDataEnabled", Enabled, "java.lang.boolean")
End Sub

امیدوارم مفید بوده باشه.

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

سلام عزیزم.

این صفحه از سایت B4X رو ببین.احتمالا همینه که میخوای 

http://www.b4x.com/android/forum/threads/network-on-off.20989/

کتابخونه Toggle Library رو هم باید داشته باشی.

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

سلام عزیزم.

این صفحه از سایت B4X رو ببین.احتمالا همینه که میخوای 

http://www.b4x.com/android/forum/threads/network-on-off.20989/

کتابخونه Toggle Library رو هم باید داشته باشی.

خوب من چیزی تو این متاسفانه پیدا نکردم و نفهمیدم ....

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

خیلی ممنون.

این کد اینترنت رو قطع می کنه درسته ؟

Sub SetMobileData(Enabled As Boolean)
   Dim r As Reflector
   r.Target = r.GetContext
   r.Target = r.RunMethod2("getSystemService", "connectivity", "java.lang.String")
   r.Target = r.GetField("mService")
   r.RunMethod2("setMobileDataEnabled", Enabled, "java.lang.boolean")
End Sub
لینک ارسال
به اشتراک گذاری در سایت های دیگر

اره دیگه

به این شکل عمل کن :

SetMobileData(True)
SetMobileData(False)
لینک ارسال
به اشتراک گذاری در سایت های دیگر

دوستان ببخشید یه سوال .

این برای WIFI هم جواب می ده ؟

اگر نه لطفا اون کد اون رو هم بگذارید یا راهنمایی کنید.

ممنون

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

واسه وای فای :

کتابخونه ICOSPHONE  رو تیکشو بزنید ->

  Dim ph As ICOSPhone

این کد رو توی دکمه یا هر چیزی دوست داشتی بزار :

ph.WiFiOnOff(LoadBitmap(File.DirAssets,"wireless_on.png"),LoadBitmap(File.DirAssets,"wireless_off.png"))
لینک ارسال
به اشتراک گذاری در سایت های دیگر

 

واسه وای فای :

کتابخونه ICOSPHONE  رو تیکشو بزنید ->

  Dim ph As ICOSPhone

این کد رو توی دکمه یا هر چیزی دوست داشتی بزار :

ph.WiFiOnOff(LoadBitmap(File.DirAssets,"wireless_on.png"),LoadBitmap(File.DirAssets,"wireless_off.png"))

 

خیلی ببخشید این سوال رو می پرسم!

اگر نخوام عکسی لود کنه می تونم از کلمه ی Null استفاده کنم ؟

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

خیلی ببخشید این سوال رو می پرسم!

اگر نخوام عکسی لود کنه می تونم از کلمه ی Null استفاده کنم ؟

تست نکردم خودتون ببینید میشه یا نه.

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

بایگانی شده

این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.

  • کاربران آنلاین در این صفحه   0 کاربر

    • هیچ کاربر عضوی،در حال مشاهده این صفحه نیست.
×
×
  • اضافه کردن...