Difference between revisions of "Script Examples for Windows NT/XP"
From Free Knowledge Base- The DUCK Project: information for everyone
(New page: == 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 ...) |
m |
||
| Line 1: | Line 1: | ||
| − | == Script Example A | + | == Script Example A == |
BEGIN | BEGIN | ||
| − | + | ||
::Do a netstat without included name resolution; | ::Do a netstat without included name resolution; | ||
| − | + | ||
::find connection on port 5631 (pcAnywhere). | ::find connection on port 5631 (pcAnywhere). | ||
| − | + | ||
netstat -a -n|findstr "5631" >A.txt 2>nul | netstat -a -n|findstr "5631" >A.txt 2>nul | ||
| − | + | ||
::Parse the IP address out of the returned string. | ::Parse the IP address out of the returned string. | ||
| − | + | ||
for /f "tokens=4 delims=: " %%a in (A.txt) do call :GETNAMES %%a goto :cleanup | for /f "tokens=4 delims=: " %%a in (A.txt) do call :GETNAMES %%a goto :cleanup | ||
| − | + | ||
| − | + | ||
| − | + | ||
:GETNAMES | :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 | + | ::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>" |
| − | + | ||
| − | . IF errorlevel 1 (echo No PCA connection exists) & goto :CLEANUP ::NetBIOS creates <03> entries for username and machinename; ::get | + | |
| − | + | ||
| − | + | ||
| − | + | ||
| − | + | ||
:CLEANUP | :CLEANUP | ||
| − | + | ||
if exist A.txt del A.txt | if exist A.txt del A.txt | ||
| − | + | ||
if exist B.txt del B.txt | if exist B.txt del B.txt | ||
Revision as of 10:22, 19 June 2007
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
