CMD/BAT - [решено] запись имён файлов в txt-ник

megaloman · Отправлено: **12:49, 19-07-2011** | #2

Код:

dir /b /A:-D ARC\*.dbf >dbf.txt

Код:

@Echo Off
FOR %%i IN (ARC\*.dbf) DO Echo %%~nxi >>dbf.txt

Airin · Отправлено: **12:59, 19-07-2011** | #3

Спасибо большое!

а как сделать, чтобы сначала очищался txt-ник, а потом всё записывалось? (просто базы добавляться будут)

megaloman · Отправлено: **13:09, 19-07-2011** | #4

Первый вариант (там и батник не нужен) перезапишет текстовый файл (я его скорректировал)

Airin · Отправлено: **13:10, 19-07-2011** | #5

всмысле, батник не нужен?

megaloman · Отправлено: **13:12, 19-07-2011** | #6

В смысле, что можно одну строчку набрать из командной строки. Но если хочется батник - почему бы нет? Поместите эту строку в батник

Airin · Отправлено: **13:14, 19-07-2011** | #7

простым пользователям лучше батник оставить, а то кто ж разберётся, что писать в комстроке?

это потом для выполнения программы понадобится.

Спасибо за помощь

sov44 · Конфигурация компьютера

Подскажите, почему два раза идёт запись в текстовый файл?
...
d:\Новая папка\MS_OFFICE_2010_SP1\Updates\KB2553092-targetdir-x-none.msp
d:\Новая папка\MS_OFFICE_2010_SP1\Updates\KB2553096-oartconv-x-none.msp
d:\Новая папка\MS_OFFICE_2010_SP1\Updates\KB2553181-msores-x-none.msp
....
d:\Новая папка\MS_OFFICE_2010_SP1\Updates\KB2553092-targetdir-x-none.msp
d:\Новая папка\MS_OFFICE_2010_SP1\Updates\KB2553096-oartconv-x-none.msp
d:\Новая папка\MS_OFFICE_2010_SP1\Updates\KB2553181-msores-x-none.msp
...

Код:

@echo off
set "sDir=d:\Новая папка\MS_OFFICE_2010_SP1"
set "ras=*.msp"
chcp 1251 >nul

for /r "%sDir%" %%a in (.) do (
    for /f "delims=" %%d in ('dir /b/s/a-d "%%~dpna\%ras%" 2^>nul') do (
>>filelist.txt Echo %%d
)
  chcp 866 >nul
)
pause

sov44 · Конфигурация компьютера

Скрипт пишет в текстовый файл установленные в системе обновления Microsoft office.
Подскажите, как поправить скрипт, чтобы исключить вывод дублей в текстовый файл.

Код:

@ECHO OFF
setlocal enabledelayedexpansion

if exist Inst_Update.txt del /q Inst_Update.txt
:: Формируем список установленных в системе обновлений Office 2010
SET UNISTALL=HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Installer\UserData\S-1-5-18\Products
FOR /f "tokens=10 delims=\" %%a IN ('reg query "%UNISTALL%" ^|FIND /I "00004109"') DO (
FOR /f "tokens=12 delims=\" %%b IN ('reg query "%UNISTALL%\%%a\Patches"') DO (
FOR /f "tokens=1-3" %%c IN ('reg query "%UNISTALL%\%%a\Patches\%%b" 2^>nul ^| FIND /I "MoreInfoURL"') DO (
FOR /f "tokens=4 delims=/" %%g IN ("%%e") DO (
>>Inst_Update.txt ECHO KB%%g
))))
exit

sov44 · Конфигурация компьютера

Сделал как-то так:

Код:

@ECHO OFF
setlocal enabledelayedexpansion

SET UNISTALL=HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Installer\UserData\S-1-5-18\Products
FOR /f "tokens=10 delims=\" %%a IN ('reg query "%UNISTALL%" ^|FIND /I "00004109"') DO (
FOR /f "tokens=12 delims=\" %%b IN ('reg query "%UNISTALL%\%%a\Patches"') DO (
FOR /f "tokens=1-3" %%c IN ('reg query "%UNISTALL%\%%a\Patches\%%b" 2^>nul ^| FIND /I "MoreInfoURL"') DO (
FOR /f "tokens=4 delims=/" %%g IN ("%%e") DO (
Set Update=!Update!:%%g:
Set %%g=UpdateSorting
))))
For /F "tokens=1 delims==" %%P In ('Set^|Sort^|Find "UpdateSorting"') Do Echo KB%%P>>Inst_Update.txt