How to check open ports on a computer, and their connection state

[dglienna]

Like this:

Option Explicit
 
Private Sub Form_Load()
  Shell ("C:\Windows\System32\cmd.exe /c  C:\Windows\System32\netstat -n >> C:\myfile.txt"), vbNormalFocus
End Sub

then you could read it in and display it, or use shellexecute to open the file in notepad.