Jump to content
Sign in to follow this  
XTensionX

TCP checking open ports

Recommended Posts

XTensionX

Hi how can I check if a port is open, im still pretty new to the TCP stuff.

I've tried TCPListen but that would interupt the connection if the port is in use.

I don't want the program to connect to it, I just want to check if the port is open.

Here is what I've tried:

TCPStartup()
Local $MainSocket = TCPListen("127.0.0.1", 65432)
TCPShutdown()
If $MainSocket = -1 Then
   MsgBox(0,"", "No")
Else
   MsgBox(0,"", "Open")
EndIf

and

TCPStartup()
$socket = TCPConnect($g_IP, 65432)
If $socket = -1 Then
   MsgBox(0,"", "No")
Else
   MsgBox(0,"", "Open")
EndIf

thanks

Share this post


Link to post
Share on other sites
water

You could have a look at trancexx's So you can get a list of all ports in use and then check the rest.


My UDFs and Tutorials:

Spoiler

UDFs:
Active Directory (NEW 2017-04-18 - Version 1.4.8.0) - Download - General Help & Support - Example Scripts - Wiki
OutlookEX (NEW 2017-02-27 - Version 1.3.1.0) - Download - General Help & Support - Example Scripts - Wiki
ExcelChart (2015-04-01 - Version 0.4.0.0) - Download - General Help & Support - Example Scripts
Excel - Example Scripts - Wiki
Word - Wiki
PowerPoint (2015-06-06 - Version 0.0.5.0) - Download - General Help & Support

Tutorials:
ADO - Wiki

 

Share this post


Link to post
Share on other sites
XTensionX

Thanks, It seems like what I'm looking for.

But it may take some time for me to shorten the script since im pretty new to TCP and DLL stuff

ty ^^

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
Sign in to follow this  

×

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.