如何判断一个端口是否打开？在线等待，急急急

Question

用bind（）试试
返回WSAEADDRINUSE  则说明已占用

Answer 1

看远程的机器是否开启某个端口  ClientSocket1.ClientType := ctBlocking;  //不能是ctNoBlock
  ClientSocket1.host := 'ip_address' ;  //local is 127.0.0.1
  ClientSocket1.Port := 1433; //   SQLServer Default port  try
    ClientSocket1.Open;
    showMESSAGE('port is open');
  except   showmessage(''+'port is close' )  end;