خاموش / روشن کردن اینترنتولی کلیک شد اینترنت روشن شه و اگه رو دومی کلیک شد اینترنت قطع شه

[cloner01001 38]

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

عیدتون مبارک

من دو تا باتن دارم ، میخوام اگه رو اولی 

 کلیک شد اینترنت روشن شه و اگه رو دومی کلیک شد اینترنت قطع شه

 

باید از چه کدی استفاده کنم؟

 

**بابت عنوان هم ببخشید ، دستم خورد ارسال شد ، ویرایش نتونستم بکنم **

[محمدرضا معتمدی 612]

سلام و عید شما هم مبارک موفق باشید

 

با استفاده از کتابخانه ی

 

Toggle Library

Dim a As Toggle
	a.TurnDataConnectionOff
	a.TurnDataConnectionOn

[محمدرضا معتمدی 612]

یا اگر اون نشد این راه هم هست

 

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

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

بعد دیگه true و False بدید

 

برای روشن شدن 

SetMobileData(True)

خاموش شدن

SetMobileData(False)