Home Upgrade Search Memberlist Extras Hacker Tools Award Goals Help Wiki Contact

.NET 

How would i do this ?

I want to make this but i got no idea how i would do this ?


http :// i.imgur.com/uQsnQMk.jpg

🤝
(Jan 14, 2015 07:35 AM)Ninja.exe Wrote:  I want to make this but i got no idea how i would do this ?

[Image: uQsnQMk.jpg]

🤝

quoted for ops image.....
drag abunch of labels onto the form?
(Jan 14, 2015 07:37 AM)nathan72389 Wrote:  quoted for ops image.....
drag abunch of labels onto the form?
Nah, When you actually put the IP adress and click locate, It'll display your isp, ect >_>
You can use an Online API like this one. Just use a WebRequest download string on the below and it will give you all the info you need in JSON format.
Code
http://ip-api.com/json/IP GOES HERE

🎉

[Image: DreddSig.gif]
Ah, Just what i wanted thank you. 🤝
(Jan 14, 2015 07:45 AM)Ninja.exe Wrote:  Ah, Just what i wanted thank you. 🤝

No problem bro hit me up if you need help with anything else.

🎉

[Image: DreddSig.gif]
Here's an example I whipped up for you.

[Image: wMEDRKS.png]

Code
Imports Newtonsoft.Json
Module Module1

    Sub Main()

      Dim response As String = String.Empty

      Console.Write("IP :")
      Dim ip As String = Console.ReadLine

      Using wc As New System.Net.WebClient
      response = wc.DownloadString("http://ip-api.com/json/" & ip)
      End Using

      Dim Info As IPInformation = JsonConvert.DeserializeObject(Of IPInformation)(response)

      Console.WriteLine()

      Console.WriteLine("Ip: " & Info.Query)
      Console.WriteLine("AS: " & Info.As)
      Console.WriteLine("City: " & Info.City)
      Console.WriteLine("Country: " & Info.Country)
      Console.WriteLine("Country Code: " & Info.CountryCode)
      Console.WriteLine("ISP: " & Info.ISP)
      Console.WriteLine("Latidude: " & Info.Lat)
      Console.WriteLine("Longitude: " & Info.Lon)
      Console.WriteLine("Organization: " & Info.Org)
      Console.WriteLine("Region: " & Info.Region)
      Console.WriteLine("Region Name: " & Info.RegionName)
      Console.WriteLine("Status: " & Info.Status)
      Console.WriteLine("Time Zone: " & Info.Timezone)
      Console.WriteLine("Zip Code: " & Info.Zip)

      Console.ReadLine()

    End Sub

    Public Class IPInformation
      Public Property [As] As String
      Public Property City As String
      Public Property Country As String
      Public Property CountryCode As String
      Public Property ISP As String
      Public Property Lat As Double
      Public Property Lon As Double
      Public Property Org As String
      Public Property Query As String
      Public Property Region As String
      Public Property RegionName As String
      Public Property Status As String
      Public Property Timezone As String
      Public Property Zip As String
    End Class

End Module

Just edit it to suit your needs.
(Jan 14, 2015 08:12 AM)+Haze Wrote:  Here's an example I whipped up for you.

Code
Imports Newtonsoft.Json
Module Module1

    Sub Main()

      Dim response As String = String.Empty

      Console.Write("IP :")
      Dim ip As String = Console.ReadLine

      Using wc As New System.Net.WebClient
      response = wc.DownloadString("http ://ip-api.com/json/" & ip)
      End Using

      Dim Info As IPInformation = JsonConvert.DeserializeObject(Of IPInformation)(response)

      Console.WriteLine()

      Console.WriteLine("Ip: " & Info.Query)
      Console.WriteLine("AS: " & Info.As)
      Console.WriteLine("City: " & Info.City)
      Console.WriteLine("Country: " & Info.Country)
      Console.WriteLine("Country Code: " & Info.CountryCode)
      Console.WriteLine("ISP: " & Info.ISP)
      Console.WriteLine("Latidude: " & Info.Lat)
      Console.WriteLine("Longitude: " & Info.Lon)
      Console.WriteLine("Organization: " & Info.Org)
      Console.WriteLine("Region: " & Info.Region)
      Console.WriteLine("Region Name: " & Info.RegionName)
      Console.WriteLine("Status: " & Info.Status)
      Console.WriteLine("Time Zone: " & Info.Timezone)
      Console.WriteLine("Zip Code: " & Info.Zip)

      Console.ReadLine()

    End Sub

    Public Class IPInformation
      Public Property [As] As String
      Public Property City As String
      Public Property Country As String
      Public Property CountryCode As String
      Public Property ISP As String
      Public Property Lat As Double
      Public Property Lon As Double
      Public Property Org As String
      Public Property Query As String
      Public Property Region As String
      Public Property RegionName As String
      Public Property Status As String
      Public Property Timezone As String
      Public Property Zip As String
    End Class

End Module

Just edit it to suit your needs.
Thank you for you're help... 🤝