Log("Mac Address: " & Get_Mac)
Sub Get_Mac As String
Dim R As Reflector
R.Target = R.GetContext
R.Target = R.RunMethod2("getSystemService", "wifi", "java.lang.String")
R.Target = R.RunMethod("getConnectionInfo")
Log(R.RunMethod("getMacAddress"))
Return R.RunMethod("getMacAddress")
End Sub