Forum Discussion
g_kucharski
11 years agoOccasional Contributor
Solved:
1. To see TCPView I need launch TC as administrator. Thanks support!
2. To get data from TCView I created function in VBS:
1. To see TCPView I need launch TC as administrator. Thanks support!
2. To get data from TCView I created function in VBS:
Function GetTCPViewData
SET APP = NameMapping.Sys.Process("Tcpview").Window("TCPViewClass", "TCPView - Sysinternals: www.sysinternals.com", 1)
SET LV = APP.Window("SysListView32", "", 1)
SET TB = APP.Window("ToolbarWindow32", "", 1)
'TCPViewer is launched minimized. Maximize it
Call APP.Maximize
'TCPViewer is launched in Pause mode. Refresh it to get data
Call TB.ClickItem(4)
redim ArrTCP(LV.wColumnCount,LV.wItemCount)
For i=0 To LV.wItemCount-1
For k=0 to LV.wColumnCount-1
' Obtains item caption
ArrTCP(k,i) = LV.wItem(i,k)
Next
Next
GetTCPViewData = ArrTCP
'Minimizes TCPViewer to allow Tested application to be proccessed
Call APP.Minimize
END Function
Related Content
- 3 years ago
Recent Discussions
- 10 hours ago