这个网站也不错。

http://bbs.isbase.net/thread-29853-1-1.html

echo off
Title QQ好友IP查看器       by:ghost98
color 02
mode con cols=90 lines=30
:begin
cls
echo.
echo.
tasklist | findstr "QQ.exe">QPID.log
for /f "tokens=2 delims= " %%a in (QPID.log) do (echo %%a>QPID.log&set /p QPID=<QPID.log&del /f /q QPID.log)
echo.
echo.
echo   协议   本地IP:端口            对方IP:端口            连接状态       进程号
echo.
netstat /ano | findstr "%QPID%"
echo.
echo.
pause
goto begin