[greg zakharov]

А чем PS не угодил? Например:

Код:

gci *.exe | select @{N='Name';E={([Regex]'(?i:kb\d+)').Match($_.BaseName).Value}}, @{N='Description';E={$_.VersionInfo.FileDescription[0]}} | % {"$($_.Name)-$($_.Description)"}

[sov44]

А чем PS не угодил? »

Пока не приходилось пользоваться PS, потому он мне не понятен. В частности создал файл 1.ps1, положил рядом с exe, повершел мелькнул, текстовый файл не создался.
Надеюсь, что найдётся вариант на vbs или на cmd+сторонняя утилита.

[Iska]

Пока не приходилось пользоваться PS, потому он мне не понятен. »

Запустите его «от имени администратора». Однократно выполните командлет, разрешающий исполнение локальных неподписанных скриптов (если ещё не делали этого ранее):

Код:

Set-ExecutionPolicy -ExecutionPolicy RemoteSigned

Затем можно будет использовать скрипты, указывая их по относительному или полному пути.

[greg zakharov]

Код:

/* 2>nul
@echo off
  setlocal enabledelayedexpansion
    set "i=0"
    for %%i in (%*) do set /a "i+=1"
    if !i! neq 2 echo:Out of range.&goto:eof
    if not exist "%~1" echo:Folder does not exist.&goto:eof
    set "key=HKLM\SOFTWARE\Microsoft\.NETFramework"
    for /f "tokens=3" %%i in (
      '2^>nul reg query %key% /v InstallRoot'
    ) do set "root=%%i"
    if /i "%root%" equ "" echo:.NET not found.&goto:eof
    for /f %%i in ('dir /ad /b "%root%v*"') do (
      set "path=%root%%%i;!path!"
    )
    for %%i in (csc.exe) do (
      if exist "%%~$PATH:i" set "csc=%%~$PATH:i"
    )
    set out="%tmp%\app.exe"
    set pdb="%tmp%\app.pdb"
    set "arg=/nologo /t:exe /out:%out% /optimize+"
    set "arg=%arg% /debug:pdbonly /define:CODE_ANALYSIS"
    %csc% %arg% "%~f0"
    %out% "%~1" "%~2"
    del /f /q %out% %pdb%
  endlocal
exit /b
*/

using System;
using System.IO;
using System.Text;
using System.Reflection;
using System.Diagnostics;
using System.Globalization;
using System.Text.RegularExpressions;

internal sealed class Program {
  static void Clear() {
    Console.CursorTop = Console.CursorTop - 1;
    Console.Write(new String(' ', Console.BufferWidth));
    Console.CursorTop = Console.CursorTop - 2;
  }

  static void PrintUsage() {
    Console.WriteLine("Usage: {0} <directory> <log>",
      typeof(Program).Assembly.GetName().Name
    );
  }

  static void Main(String[] args) {
    if (args.Length != 2) {
      PrintUsage();
      return;
    }

    Clear();
    String[] files;
    StringBuilder sb = new StringBuilder();

    try {
      files = Directory.GetFiles(args[0], "*.exe");
      foreach (String file in files) {
        Char c;
        FileVersionInfo fvi = FileVersionInfo.GetVersionInfo(file);
        switch (fvi.FileDescription.Split(new Char[] {' '})[0]) {
          case "Update": c = '1'; break;
          case "Definition": c = '2'; break;
          case "Security": c = '3'; break;
          default: c = 'x'; break;
        }
        sb.Append(
          String.Format(CultureInfo.InvariantCulture, "{0}-{1}\n",
            new Regex(@"(?i:kb\d+)").Match(file).Value, c
        ));
      }
      File.WriteAllText(args[1], sb.ToString());
    }
    catch (Exception e) {
      Console.WriteLine(e.Message);
    }
  }
}

Пример использования:

Код:

mybat.cmd E:\src E:\logs\log.txt

Запустите его «от имени администратора».

Права администратора не нужны при выполнения данной операции (в случае с PowerShell). Просто влом, если честно, в который раз повторять прописные истины: как запускать, куда что писать, - словом, за какой хвост дернуть, чтобы в ответ услышать "му".

[Iska]

Права администратора не нужны при выполнения данной операции (в случае с PowerShell). »

Вполне возможно. Я не проверял.

[greg zakharov]

Вполне возможно.

Если имелилось ввиду установка разрешений, то да - права адина нужны. Хотя это в общем-то условная операция, так как можно без установки разрешений обойтись.

Код:

powershell /noprofile /executionpolicy bypass /file script.ps1

[sov44]

greg zakharov, видимо не за тот хвост дёрнул, "му" не получилось...
Убрал проверки, напрямую прописал путь к обновлениям и файлу лога, батник в 866 кодировке (в пути есть кириллица и избавляться от неё не хотелось-бы).
Где взять файлы app.exe, app.pdb?
os - Win7x32

код

Код:

/* 2>nul
@echo off
  setlocal enabledelayedexpansion
    set "key=HKLM\SOFTWARE\Microsoft\.NETFramework"
    for /f "tokens=3" %%i in (
      '2^>nul reg query %key% /v InstallRoot'
    ) do set "root=%%i"
    for /f %%i in ('dir /ad /b "%root%v*"') do (
      set "path=%root%%%i;!path!"
    )
    for %%i in (csc.exe) do (
      if exist "%%~$PATH:i" set "csc=%%~$PATH:i"
    )
    set out="%tmp%\app.exe"
    set pbd="%tmp%\app.pdb"
    set "arg=/nologo /t:exe /out:%out% /optimize+"
    set "arg=%arg% /debug:pdbonly /define:CODE_ANALYSIS"
    %csc% %arg% "%~f0"
    %out% "d:\Декомпрессор\Updates" "d:\Декомпрессор\log.txt"
    del /f /q %out% %pdb%
  endlocal
pause
exit /b
*/

using System;
using System.IO;
using System.Reflection;
using System.Diagnostics;
using System.Globalization;
using System.Text.RegularExpressions;

internal sealed class Program {
  static void Clear() {
    Console.CursorTop = Console.CursorTop - 1;
    Console.Write(new String(' ', Console.BufferWidth));
    Console.CursorTop = Console.CursorTop - 2;
  }

  static void PrintUsage() {
    Console.WriteLine("Usage: {0} <directory> <log>",
      typeof(Program).Assembly.GetName().Name
    );
  }

  static void Main(String[] args) {
    if (args.Length != 2) {
      PrintUsage();
      return;
    }

    Clear();
    String[] files;
    StringBuilder sb = new StringBuilder();

    try {
      files = Directory.GetFiles(args[0], "*.exe");
      foreach (String file in files) {
        Char c;
        FileVersionInfo fvi = FileVersionInfo.GetVersionInfo(file);
        switch (fvi.FileDescription.Split(new Char[] {' '})[0]) {
          case "Update": c = '1'; break;
          case "Definition": c = '2'; break;
          case "Security": c = '3'; break;
          default: c = 'x'; break;
        }
        sb.Append(
          String.Format(CultureInfo.InvariantCulture, "{0}-{1}\n",
            new Regex(@"(?i:kb\d+)").Match(file).Value, c
        ));
      }
      File.WriteAllText(args[1], sb.ToString());
    }
    catch (Exception e) {
      Console.WriteLine(e.Message);
    }
  }
}

ошибка

Код:

d:\Декомпрессор>/*  2>nul
1.cmd(54,5): error CS0246: Не удалось найти имя типа или пространства имен "StringBuilder"
        (пропущена директива using или ссылка на сборку?)
1.cmd(54,28): error CS0246: Не удалось найти имя типа или пространства имен
        "StringBuilder" (пропущена директива using или ссылка на сборку?)
""c:\Windows\Temp\app.exe"" не является внутренней или внешней
командой, исполняемой программой или пакетным файлом.
Не удается найти c:\Windows\Temp\app.exe
Для продолжения нажмите любую клавишу . . .

[greg zakharov]

sov44, app.exe и app.pdb генерируются из C# кода в представлении бата как такового, то есть бат "скармливает" копилятору csc.exe себя как исходник программы на C#, а тот создает сборку во временной папке с именем app.exe (генериацию .PDB можно в принципе отключить, удалив определенные параметры компиляции кода); после того, как app.exe отрабатывает, бат его удаляет. В 32-битной Win7 все и писалось, так что должно работать при условии, что имеются права на запись во временную папку пользователя, а вот спойлеры у на этом форуме не открываются (косяк браузера), так что ошибку посмотреть не могу.
P.S., в коде допустил опечатку:

Код:

    set pbd="%tmp%\app.pdb"
    ...
    del /f /q %out% %pdb%

Должно быть:

Код:

    set pdb="%tmp%\app.pdb"
   ...
   del /f /q %out% %pdb%

[sov44]

greg zakharov, исправил опечатку, всё равно ошибка

d:\Декомпрессор>/* 2>nul 1.cmd(54,5): error CS0246: Не удалось найти имя типа или пространства имен "StringBuilder" (пропущена директива using или ссылка на сборку?) 1.cmd(54,28): error CS0246: Не удалось найти имя типа или пространства имен "StringBuilder" (пропущена директива using или ссылка на сборку?) ""c:\Windows\Temp\app.exe"" не является внутренней или внешней командой, исполняемой программой или пакетным файлом. Не удается найти c:\Windows\Temp\app.exe Для продолжения нажмите любую клавишу . . .