@echo off
REM **************************************************************************
REM * Name : loggedon.bat *
REM * Path : Y:\MIS\Procedures\Helpdesk\HDTools *
REM * Description : scan desktop computers and the user logged on on it *
REM * Type loggedon agfr01 to search for agfr01... computers
REM * Type loggedon agde06 to search for agde06... computers
REM * Files needed : dsget.exe, dsquery.exe, psloggedon.exe
REM * Date : 2008/05/08 *
REM * Modified : 2008/07/03 *
REM * Author : Xavier GANGAND (AG France) *
REM * Version : 1.01 *
REM * *
REM **************************************************************************
if "%1"=="edit" goto :edit_file
if "%1"=="agfr01" goto suite_1
if "%1"=="agde02" goto suite_1
if "%1"=="agde03" goto suite_1
if "%1"=="agde04" goto suite_1
goto _syntax_error_
:_syntax_error_
echo ********************
echo You must provide something like agfr01, agde04, agit02
echo as first parameter (in small letters)
echo ********************
The parameter you entered (%1) is not accepted.
pause
goto fin
:suite_1
set _radical_=%1
set _WORKING_PATH_=Z:\temp\loggedon
md %_WORKING_PATH_% > nul
start notepad %_WORKING_PATH_%\%_radical_%.log
pause
REM @ping 127.0.0.1 -n 2 >nul
del %_WORKING_PATH_%\%_radical_%.log
echo =========================== > %_WORKING_PATH_%\%_radical_%.log
echo Nous sommes le %date%, heure : %time% >> %_WORKING_PATH_%\%_radical_%.log
echo Vous etes dans le dossier %cd% >> %_WORKING_PATH_%\%_radical_%.log
echo =========================== >> %_WORKING_PATH_%\%_radical_%.log
REM call r1 %_radical_% > liste_%_radical_%.txt
dsquery.exe computer -name %_radical_%pc* -limit 0| dsget.exe computer -samid | findstr /i %_radical_%pc > %_WORKING_PATH_%\liste_%_radical_%.txt
for /f "tokens=1 delims=$" %%i in (%_WORKING_PATH_%\liste_%_radical_%.txt) do call :suite %%i
'del liste_%_radical_%.txt
start notepad %_WORKING_PATH_%\%_radical_%.log
goto fin
:suite
ping -n 1 %1 -w 100
goto answer%ERRORLEVEL%
:answer0
REM ping OK
echo ----------------------->> %_WORKING_PATH_%\%_radical_%.log
echo %1 >> %_WORKING_PATH_%\%_radical_%.log
psloggedon.exe \\%1.ag.archon.net |findstr /v /i PsLoggedOn |findstr /v /i Russinovich |findstr /v /i SysInternals |findstr /v /i Connecting |findstr /v /i AUTHORITY|findstr /v /i shares |findstr /v /i %username% >> %_WORKING_PATH_%\%_radical_%.log
goto fin
:answer1
echo ----------------------->> %_WORKING_PATH_%\%_radical_%.log
echo %1;no ping >> %_WORKING_PATH_%\%_radical_%.log
goto fin
:answer2
echo ----------------------->> %_WORKING_PATH_%\%_radical_%.log
echo %1;errorlevel2 >> %_WORKING_PATH_%\%_radical_%.log
goto fin
:edit_file
notepad Y:\Mis\Procedures\Helpdesk\HDTools\loggedon.bat
goto fin
:fin