Код:
md d:\temp\poisk\IP
%SystemRoot%\system32\ipconfig > d:\temp\poisk\IP\IP.txt
find /v "Основной шлюз" d:\temp\poisk\IP\IP.txt > d:\temp\poisk\IP\IPvrem.txt
find /v "Ћб*®ў*®© и«о§" d:\temp\poisk\IP\IPvrem.txt > d:\temp\poisk\IP\IPvrem1.txt
find /v "Default Gateway" d:\temp\poisk\IP\IPvrem1.txt > d:\temp\poisk\IP\IPvrem2.txt
find /v "г**Ґ«м*л©" d:\temp\poisk\IP\IPvrem2.txt > d:\temp\poisk\IP\ipnew.txt
SetLocal EnableDelayedExpansion
CHCP 1251> nul
For /F "usebackq delims=" %%L In ("d:\temp\poisk\IP\ip.txt") Do set first=%%L
:next
DEL | ERASE /Q d:\temp\poisk\IP\*.*
RD /Q d:\temp\poisk\IP
@echo ver 1.6 > %first%.txt
@echo ++++++++++++++++>> %first%.txt
@echo + ПОЛЬЗОВАТЕЛЬ +>> %first%.txt
@echo ++++++++++++++++>> %first%.txt
findstr /s /i %first% ftp.txt >> %first%.txt
findstr /s /i %first% ftp.txt || echo В БАЗЕ НЕТ ДАННЫХ О ПОЛЬЗОВАТЕЛЕ. ДОБАВЬТЕ ЕГО В РУЧНУЮ >> %first%.txt
@echo ------------------------------------------------------------------------------->> %first%.txt
@echo ПОИСК НА ДИСКАХ: С, D, E. >> %first%.txt
@echo +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++>> %first%.txt
@echo + ВИДЕО ФАЙЛЫ ФОРМАТА: avi, mpg, 3gp, mp4, mov, wmv, vob, mkv, flv, mpeg, wmv +>> %first%.txt
@echo +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++>> %first%.txt
chcp 1251
dir /s /b c:\*.avi>> %first%.txt
dir /s /b d:\*.avi>> %first%.txt
dir /s /b e:\*.avi>> %first%.txt
dir /s /b c:\*.mpg>> %first%.txt
dir /s /b d:\*.mpg>> %first%.txt
dir /s /b e:\*.mpg>> %first%.txt
dir /s /b c:\*.3gp>> %first%.txt
dir /s /b d:\*.3gp>> %first%.txt
dir /s /b e:\*.3gp>> %first%.txt
dir /s /b c:\*.mp4>> %first%.txt
dir /s /b d:\*.mp4>> %first%.txt
dir /s /b e:\*.mp4>> %first%.txt
dir /s /b c:\*.mov>> %first%.txt
dir /s /b d:\*.mov>> %first%.txt
dir /s /b e:\*.mov>> %first%.txt
dir /s /b c:\*.wmv>> %first%.txt
dir /s /b d:\*.wmv>> %first%.txt
dir /s /b e:\*.wmv>> %first%.txt
dir /s /b c:\*.vob>> %first%.txt
dir /s /b d:\*.vob>> %first%.txt
dir /s /b e:\*.vob>> %first%.txt
dir /s /b c:\*.mkv>> %first%.txt
dir /s /b d:\*.mkv>> %first%.txt
dir /s /b e:\*.mkv>> %first%.txt
dir /s /b c:\*.flv>> %first%.txt
dir /s /b d:\*.flv>> %first%.txt
dir /s /b e:\*.flv>> %first%.txt
dir /s /b c:\*.mpeg>> %first%.txt
dir /s /b d:\*.mpeg>> %first%.txt
dir /s /b e:\*.mpeg>> %first%.txt
@echo +++++++++++>> %first%.txt
@echo + ИГРУШКИ +>> %first%.txt
@echo +++++++++++>> %first%.txt
dir /s /b c:\игр*>> %first%.txt
dir /s /b d:\игр*>> %first%.txt
dir /s /b e:\игр*>> %first%.txt
dir /s /b c:\*game*>> %first%.txt
dir /s /b d:\*game*>> %first%.txt
dir /s /b e:\*game*>> %first%.txt
dir /s /b c:\Alawar*>> %first%.txt
dir /s /b d:\Alawar*>> %first%.txt
dir /s /b e:\Alawar*>> %first%.txt
type %first%.txt | findstr /i /v "Microsoft Visual FoxPro" > test.txt
del %first%.txt
type test.txt | findstr /i /v "Nero" > %first%.txt
del test.txt
type %first%.txt | findstr /i /v "WindowsMediaPlayer" > test.txt
del %first%.txt
type test.txt | findstr /i /v "intro.wmv" > %first%.txt
del test.txt
type %first%.txt | findstr /i /v "clock.avi" > test.txt
del %first%.txt
type test.txt | findstr /i /v "SAP" > %first%.txt
del test.txt
type %first%.txt | findstr /i /v "ACDSee" > test.txt
del %first%.txt
type test.txt | findstr /i /v "Win2K&XP" > %first%.txt
del test.txt
type %first%.txt | findstr /i /v "macromedia" > test.txt
del %first%.txt
type test.txt | findstr /i /v "Opera" > %first%.txt
del test.txt
type %first%.txt | findstr /i /v "ServicePack" > test.txt
del %first%.txt
type test.txt | findstr /i /v "Temporary Internet Files" > %first%.txt
del test.txt
type %first%.txt | findstr /i /v "inf" > test.txt
del %first%.txt
type test.txt | findstr /i /v "Milkdrop2" > %first%.txt
del test.txt
type %first%.txt | findstr /i /v "dllcache" > test.txt
del %first%.txt
type test.txt | findstr /i /v "$NtServicePackUninstall$" > %first%.txt
del test.txt
type %first%.txt | findstr /i /v "dllcache" > test.txt
del %first%.txt
type test.txt | findstr /i /v "AutoCAD" > %first%.txt
del test.txt
type %first%.txt | findstr /i /v "Winamp" > test.txt
del %first%.txt
type test.txt | findstr /i /v "$NtServicePackUninstall$" > %first%.txt
del test.txt
type %first%.txt | findstr /i /v "Documents and Settings\All Users\Start Menu\Programs\Games" > test.txt
del %first%.txt
type test.txt | findstr /i /v "Documents and Settings\All Users\Главное меню\Программы\Игры" > %first%.txt
del test.txt
@echo +++++++++++++++++++++++>> %first%.txt
@echo + НАЛИЧИЕ 3G INTERNET +>> %first%.txt
@echo +++++++++++++++++++++++>> %first%.txt
dir /s /b c:\3G*internet>> %first%.txt
dir /s /b d:\3G*internet>> %first%.txt
dir /s /b e:\3G*internet>> %first%.txt
dir /s /b c:\3G*life>> %first%.txt
dir /s /b d:\3G*life>> %first%.txt
dir /s /b e:\3G*life>> %first%.txt
dir /s /b c:\MTS*Connect>> %first%.txt
dir /s /b d:\MTS*Connect>> %first%.txt
dir /s /b e:\MTS*Connect>> %first%.txt
dir /s /b c:\МТС*Коннект>> %first%.txt
dir /s /b d:\МТС*Коннект>> %first%.txt
dir /s /b e:\МТС*Коннект>> %first%.txt
