January 15, 2021, 05:58:26 PM

Author Topic: [bb] Port Scanner by Xzider [ 1+ years ago ]  (Read 611 times)

Offline BlitzBot

  • Jr. Member
  • **
  • Posts: 1
[bb] Port Scanner by Xzider [ 1+ years ago ]
« on: June 29, 2017, 12:28:38 AM »
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?


 

SimplePortal 2.3.6 © 2008-2014, SimplePortal