ကိုယ္​့ဖုန္​းမွာသံုးခဲ့တဲ့ wifi password ျပန္​ၾကည္​့တဲ့ code ​ေတြပါ

ကိုယ္​့ဖုန္​းမွာသံုးခဲ့တဲ့ wifi password ျပန္​ၾကည္​့တဲ့ code ​ေတြပါ ကြၽန္​​ေတာ္​က​ေတာ့ wifi ​ေပးသံုးၿပီး password မ​ေျပာျပတဲ့လူ​ေတြအတြက္​သံုးပါတယ္​(တခါတ​ေလ) :-) :-)

MAIN
=========
AddButton("a",10%x,40%y,80%x,10%y,"")
=========

=========
EVENT
=========

Sub Button_Click(Who)

Select Who

Case"a"

GetRoot

If HaveRoot Then

q=RootCmd("cat data/misc/wifi/wpa_supplicant.conf")

MsgBox(q)

Else

MsgBox("Root Require!!","Alert")
End If
End If

End Select

End Sub
Sub Button_LongClick(Who)
End Sub