Script Examples for Windows NT/XP
From Free Knowledge Base- The DUCK Project: information for everyone
Script Example A
BEGIN ::Do a netstat without included name resolution; ::find connection on port 5631 (pcAnywhere). netstat -a -n|findstr "5631" >A.txt 2>nul ::Parse the IP address out of the returned string. for /f "tokens=4 delims=: " %%a in (A.txt) do call :GETNAMES %%a goto :cleanup :GETNAMES ::Do nbtstat to the remote IP address, and parse out the ::<20> name, which is the NetBIOS name of the PCA Client. if %1==0.0.0.0 goto :EOF nbtstat -A %1|findstr "<20>" >>B.txt ::Errorlevel 1 is returned if the above findstr was unsuccessful; ::tell user and quit. IF errorlevel 1 (echo No PCA connection exists) & goto :CLEANUP ::NetBIOS creates <03> entries for username and machinename; ::get them with nbtstat to the remote machine and print out. for /f "tokens=1" %%a in (B.txt) do nbtstat -a %%a|findstr "<03>" :CLEANUP if exist A.txt del A.txt if exist B.txt del B.txt
