[Iska]

Что-то наподобие такого:

Код:

@echo off
setlocal enableextensions enabledelayedexpansion

for /f "tokens=2 delims==" %%i in ('assoc .doc') do set strDocType=%%i
for /f "tokens=2 delims==/" %%i in ('ftype %strDocType%') do set strApp=%%i
for /f "tokens=1,2 delims=	" %%i in ('filever.exe /v %strApp% ^| findstr /i "CompanyName ProductName ProductVersion"') do set %%i=%%j

echo Company Name:    %CompanyName%
echo Product Name:    %ProductName%
echo Product Version: %ProductVersion%

endlocal
exit /b 0

читать дальше »

Замечания:

• в «for /f "tokens=1,2 delims= " %%i in ('filever.exe /v…» после «delims=» и перед «" %%i» должен быть символ табуляции;
• «filever.exe» берётся из комплекта «Support Tools». Я брал из комплекта «Windows Server 2003 Service Pack 2 32-bit Support Tools», но работает и с родным пакетом из инсталляционного диска («\SUPPORT\TOOLS\SUPTOOLS.MSI»). В принципе, можно использовать и другие утилиты, например ту же «sigcheck.exe» от бывшего Sysinternals.