The program uses a very simple way to get ip of web site . If we are going to hacked sites we need a very fast tool for bringing IP
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
'make form . 2 labels , 2 button the copyright if you wont do !! | |
put this code to button1 (get ip) | |
If TextBox1.Text = " " Then | |
MessageBox.Show("please Enter WebSite") | |
End If | |
Dim Hostname As IPHostEntry = Dns.GetHostEntry(TextBox1.Text) | |
Dim ip As IPAddress() = Hostname.AddressList | |
TextBox2.Text = ip(0).ToString | |
' put this code to clearer the textboxs | |
TextBox1.Clear() | |
TextBox2.Clear() | |
' if you ave webSite you can yous lablslinks | |
Dim url As String = "your webSite" | |
Process.Start(url) | |
October 30, 2021
Tags :
programming
,
vb
Subscribe by Email
Follow Updates Articles from This Blog via Email
No Comments