[SourceCode] ConsoleApp Pinger

The-One · 2009-09-21T18:36:30+00:00

Hello HF! Version Used : Visual Basic 2008 My i whas doing some things with some codes and this is what came out ;P Imports System.Console Imports System.Net Module Module1 Sub Main() Start: Dim h As System.Net.IPHostEntry = System.Net.Dns.GetHostEntry(System.Net.Dns.GetHostName) WriteLine(" ") Console.Title = " The-One's Host Pinger" Console.ForegroundColor = ConsoleColor.Green WriteLine("[" & TimeOfDay & "]" & " Created by The-One, For the better host pinging") WriteLine(" ") Console.ForegroundColor = ConsoleColor.White Write("[" & TimeOfDay & "]" & " " & h.AddressList.GetValue(0).ToString & " ") Console.ForegroundColor = ConsoleColor.Green WriteLine(" ") Write("[" & TimeOfDay & "]" & " Write the website name : " & vbCrLf & "[" & TimeOfDay & "]" & " Example: www.website.com" & vbCrLf) Console.ForegroundColor = ConsoleColor.Cyan Dim Host As String Host = ReadLine() Dim hostname As IPHostEntry = Dns.GetHostEntry(Host) Dim ip As IPAddress() = hostname.AddressList Console.ForegroundColor

TheBlackMarket
Guest

Sep 21, 2009 11:38 AM

Nice code bro, thanks for share it!

Next Oldest | Next Newest

New Reply

Possibly Related Threads...
Thread / Author	Replies	Views	Last Post
[.NET] RWX RAT Sourcecode by imi-tat0rJun 10, 2017 04:28 PM	75	11,242	Jun 10, 2017 04:28 PM Last Post: Goldmouth
[.NET] [TUTORIAL] making a simple pinger in VB [TUTORIAL] by umami smokes shishaJan 16, 2017 08:40 AM	176	4,699	Jan 16, 2017 08:40 AM Last Post: Xogg
[Shell] [readweb.bat] - rate & reply - view website sourcecode from command prompt by ImDeepWithWindowsApr 18, 2016 10:04 AM	11	363	Apr 18, 2016 10:04 AM Last Post: einstein1969

View a Printable Version
Export as PDF
Subscribe to this thread

Login
Username/Email:
Password:	Lost Password?
	Remember me