[bb] IP scanner by schilcote [ 1+ years ago ]

Started by BlitzBot, June 29, 2017, 00:28:43

Previous topic - Next topic

BlitzBot

Title : IP scanner
Author : schilcote
Posted : 1+ years ago

Description : This program was written by me when I was messing around with Nmap. It tries to connect to whatever.you.enter.0-255 and sees if it can. If it gets a connection, it writes it to the screen.
It's incredibly slow.


Code :
Code (blitzbasic) Select
firstthree$=Input$("What is the IP? (-the last section): ")
port=Input("What port to scan on?: ")

For t=0 To 255

ip$=firstthree$+t

stream=OpenTCPStream(ip$,port)

If stream Then
DebugLog "Found a computer: "+ip$
Print ip$
Else
DebugLog "Nothing found on "+ip$
EndIf

Next

WaitKey
End


Comments :


schilcote(Posted 1+ years ago)

 Oh yeah,DISCLAMER:I, Schilcote am NOT RESPONSIBLE for whatever anybody does with this code. If you break into somebody's computer using this code, and you get caught, it's your own problem. I cannot be held responcible for your actions!