[bb] Port Scanner by Xzider [ 1+ years ago ]

[BlitzBot]

Title : Port Scanner
Author : Xzider
Posted : 1+ years ago

Description : Very simple...Maybe add a log file to make it easier to read.

Code :

Code: BlitzBasic

1. Port% = Input("Port to start checking with - ")
2.  
3. Print "Port starting at - " + Port% + " - "
4. Print "Press any key to start"
5.  
6. WaitKey
7.  
8. While Not KeyHit(1)
9.  
10. stream% = CreateTCPServer(Port%)
11.  
12.  If stream%
13.  
14.                 Print "Port - " + Port% + " - open"
15.                
16.   Else
17.  
18.                 Print "Port - " + Port% + " - was closed"
19.                 Print "Press any key to continue"
20.                 WaitKey
21.                
22.   End If
23.  
24.                 Port% = Port% + 1
25. Wend

Comments :


slenkar(Posted 1+ years ago)

 thanks, do you know how to open a port?