Hi guys
It's my first library that I put it here by this library you can get bellow info :
Ver 1.1
It's my first library that I put it here by this library you can get bellow info :
- IP
- ContryName
- City
- TimeZone
- zip
- lat / lon
- ISP Name
- Country Code
- Region
- Region Name
Ver 1.1
- Rewrite by OkHttpUtils2 ( Ver 2.4 )
B4X:
Sub Globals
Private man As ManamIP
Private lv As ListView
Private toolbar As ACToolBarLight
End Sub
Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("a1")
man.Initialize("Manam" , Me)
man.GetIPInfo
ProgressDialogShow("Please wait...")
End Sub
Sub mnugetlocation_Click
man.GetIPInfo
ProgressDialogShow("Please wait...")
End Sub
Sub Manam_Ready ( result As Map , success As Boolean)
ProgressDialogHide
If success Then
lv.Clear
LogColor( result , Colors.RGB(103, 156, 203))
For i = 0 To result.Size -1
lv.AddSingleLine ( result.GetKeyAt(i) & " : " & result.GetValueAt(i))
Next
Else
Log(LastException)
End If
End Sub
Attachments
Last edited: