Запис на имената на директории в някакъв текстов файл.

[Pat]

Здравейте,
Идеята е следната, имам дискове (CD и DVD) с мп3-ки. Искам да си направя нещо като каталог или по-точно списък на това което имам (примерно екселски файл), за да мога по-лесно да намирам нещо като го търся или проверявам дали въобще го имам. Понеже дисковете са доста, вариянта "на ръка" да преписвам всичко не ме устройва. Държа да отбележа, че искам само имената на диртекториите и поддиректориите, без имената на файловете! Вариянта с имената и на файловете го има като plug-in в любимия ми Total Commander, обаче представете си какво се получава като се смъкне едно DVD с мп3-ки.....а като станат десетки......иди ги подреждай после....
Затова търся вариянт смъкване информацията за съдържанието на даден диск, но без имената на файловете.
Няма проблем и под DOS да е, стига да се поддържат дълги имена.....

Прегледах предни теми по подобни въпроси, но посочените решения и програми не решават моя проблем (или поне аз не съм забелязал )

Благодаря предварително на решилите да помогнат!

[mikk]

dir /a:d /s > file.txt ,така става

[Slero]

След твоята команда добавяш

> file.txt

Само че едва ли точно това ще е, което иска @Pat

[Avis]

@Pat
Дай някакъв пример как искаш да ти изглежда файла, че не стана ясно.

[panevdd]

Виж дали dir /a:d /s /b > spisak.txt ще ти свърши работа.
Ако ти трябва нещо с графичен интерфейс, свали си Directory Lister - 98к, безплатна.

[Pat]

Благодаря за бързите отговори !

dir /a:d /s /b > spisak.txt се доближава до това което искам, но не става, защото първо изброява главните директории, след тях почва поддиректориите от първо ниво, след като изброи и тях тогава почва от второ ниво и т.н. При което се губи връзката на директория с поддиректория - особенно когато са много.
Освен това на всеки ред слага буквата на устройството и наклонена черта (което си е нормално за ДОС команта). Ето пример:

F:\Burning Point
F:\Charon
F:\Lost In Tears
F:\Power Symphony -1999 - Evillot
F:\Sonata Arctica - 2004 - Don't Say A Word (Single)
F:\Thunderstone
F:\Burning Point\2001 - Salvation By Fire
F:\Burning Point\2003 - Feeding The Flames
F:\Charon\1998 - Sorrowburn
F:\Charon\2000 - Tearstained
F:\Charon\2002 - Downhearted
F:\Charon\2003 - The Dying Daylights
F:\Charon\2002 - Downhearted\oblojka
F:\Lost In Tears\1998 - Forever Alone
F:\Lost In Tears\2002 - Dialogue With Mirror And God
F:\Thunderstone\2002 - Thunderstone
F:\Thunderstone\2004 - Thunderstone - The Burning

А на мен ми трябва да се записва по следния начин:
Това е направено с плъгина на Тотал командер и ръчно съм премахнал списъка с имената на файловете. Информацията за час и дата по принцип не ме интересува , така че не държа да я има, но не ми и пречи.

Burning Point\ 0 2004.9.12 16:12.34
Burning Point\2001 - Salvation By Fire\ 0 2004.9.12 16:12.34
Burning Point\2003 - Feeding The Flames\ 0 2004.9.12 16:12.34
Charon\ 0 2004.9.12 16:12.34
Charon\1998 - Sorrowburn\ 0 2004.9.12 16:12.34
Charon\2000 - Tearstained\ 0 2004.9.12 16:12.34
Charon\2002 - Downhearted\ 0 2004.9.12 16:12.34
Charon\2003 - The Dying Daylights\ 0 2004.9.12 16:12.34
Lost In Tears\ 0 2004.9.12 16:12.34
Lost In Tears\1998 - Forever Alone\ 0 2004.9.12 16:12.34
Lost In Tears\2002 - Dialogue With Mirror And God\ 0 2004.9.12 16:12.34
Power Symphony -1999 - Evillot\ 0 2004.9.12 16:12.34
Sonata Arctica - 2004 - Don't Say A Word (Single)\ 0 2004.9.12 16:12.34
Thunderstone\ 0 2004.9.12 16:12.34
Thunderstone\2002 - Thunderstone\ 0 2004.9.12 16:12.34
Thunderstone\2004 - Thunderstone - The Burning\ 0 2004.9.12 16:12.34

Програмката цитирана от @panevdd наистина е много функционална, с богат набор от опции и донякъде ще ми свърши работа. Единственото което не ми хареса е, че и тя в началото на всеки ред слага наклонена черта (буквата на устройството успях да я махна - има опция за нея).
Та сега следващ въпрос , как автоматично да премахна тази черта от всички редове, без да си играя ред по ред? Генерирания файл е текстов.

NAME
\
\Burning Point\
\Burning Point\2001 - Salvation By Fire\
\Burning Point\2003 - Feeding The Flames\
\Charon\
\Charon\1998 - Sorrowburn\
\Charon\2000 - Tearstained\
\Charon\2002 - Downhearted\
\Charon\2002 - Downhearted\oblojka\
\Charon\2003 - The Dying Daylights\
\Lost In Tears\
\Lost In Tears\1998 - Forever Alone\
\Lost In Tears\2002 - Dialogue With Mirror And God\
\Power Symphony -1999 - Evillot\
\Sonata Arctica - 2004 - Don't Say A Word (Single)\
\Thunderstone\
\Thunderstone\2002 - Thunderstone\
\Thunderstone\2004 - Thunderstone - The Burning\

Текста смятам да го вкарвам в EXEL, така че ако там има някакъв бърз и лесен начин за премахване на тия черти ще е най-добре. В тази посока ме наведе поста на @Avis от темата на @IvO™ "Търся програма за триене на празни редове в DOS-файл "
Сега ще потърся този текстов редактор "q.com" който се споменав пам в същата тема. НО не бих се отказал и от вариянт за EXEL.

[panevdd]

Та сега следващ въпрос , как автоматично да премахна тази черта от всички редове, без да си играя ред по ред?

Отвори файла с Notepad, Edit -> Replace, в горното поле поставяш \, в долното поставяш табулация (предварително си я въведи някъде в текстовия файл, за да можеш да я копираш, когато ти потрябва в диалога "Replace"), бутона Replace All и готово. Получаваш файл, който е много удобен за отваряне в Excel. В Excel става по същия начин.

NAME
	
	Burning Point	
	Burning Point	2001 - Salvation By Fire	
	Burning Point	2003 - Feeding The Flames	
	Charon	
	Charon	1998 - Sorrowburn	
	Charon	2000 - Tearstained	
	Charon	2002 - Downhearted	
	Charon	2002 - Downhearted	oblojka	
	Charon	2003 - The Dying Daylights	
	Lost In Tears	
	Lost In Tears	1998 - Forever Alone	
	Lost In Tears	2002 - Dialogue With Mirror And God	
	Power Symphony -1999 - Evillot	
	Sonata Arctica - 2004 - Don't Say A Word (Single)	
	Thunderstone	
	Thunderstone	2002 - Thunderstone	
	Thunderstone	2004 - Thunderstone - The Burning

[Pat]

Да.... ....елментарно Уотсън!

Благодарности на всички още веднъж !

[emos]

Щом ще вкарваш текста

NAME
\
\Burning Point\
\Burning Point\2001 - Salvation By Fire\
\Burning Point\2003 - Feeding The Flames\
\Charon\
\Charon\1998 - Sorrowburn\
\Charon\2000 - Tearstained\
\Charon\2002 - Downhearted\
\Charon\2002 - Downhearted\oblojka\
\Charon\2003 - The Dying Daylights\
\Lost In Tears\
\Lost In Tears\1998 - Forever Alone\
\Lost In Tears\2002 - Dialogue With Mirror And God\
\Power Symphony -1999 - Evillot\
\Sonata Arctica - 2004 - Don't Say A Word (Single)\
\Thunderstone\
\Thunderstone\2002 - Thunderstone\
\Thunderstone\2004 - Thunderstone - The Burning\

в Excel, просто го запиши като чист текстов файл и го отвори с Excel (като Text file, естествено!). Даваш му да е Delimited, за разделител даваш знака "\" и си готов! Е, изтриваш първата колона, защото тя се получава празна, но това вече са подробности!

[Avis]

@Pat
Някак си бях останал с впечатлението, че искаш да имаш пътя само в една колона в Excel, т.е. че трябва да махнеш само първата наклонена черта от примера, който си дал.
По твоя пример:

NAME

Burning Point\
Burning Point\2001 - Salvation By Fire\
Burning Point\2003 - Feeding The Flames\
Charon\
Charon\1998 - Sorrowburn\
Charon\2000 - Tearstained\
Charon\2002 - Downhearted\
Charon\2002 - Downhearted\oblojka\
Charon\2003 - The Dying Daylights\

За целта трябва да оставиш целия път, с нещо като:

echo NAME > spisak.txt
dir /a:d /s /b F:\ >> spisak.txt

След това да влезеш в Notepad и да замениш F:\ с празен низ.

Ако искаш съвсем да си го автоматизираш, може да опиташ с пакетен файл. Създай някъде на стартируемо място (т.е. включено в PATH променливата) файл с примерно име 'List.bat' и следното съдържание:

@echo off
if %2.==. (
  echo Usage: %0 'path' 'file'
  goto :EOF
  )
if not exist %2 echo NAME >%2
setlocal
for /r %1 %%i in (.) do call :Sub %2 "%%~fi" %%~ni
endlocal
goto :EOF

:Sub
set MyTemp=%2
if not %3.==. echo %MyTemp:~4,-1% >> %1

Стартира се например с команди от типа:

list F: spisak.txt
List F:\ C:\Work\spisak.txt
LIST f:\Music ..\spisak.txt
List "F:\My Music\" "C:\My Documents\Spisak.txt"

т.е. дава известна свобода на синтаксиса, но при всяко положение първият параметър е пътя до папката, която искаш да опишеш, а втория - файлът, където ще записва/дописва.

Разбира се, ще трябва да си го тестваш. При мен се пообърка с много дългите пътища (има ограничение за дължината на променливите), но за по-прости ситуации очаквам да си работи. Със сигурност няма да тръгне на Windows преди 2000, за твоя компютър само ти можеш да кажеш става ли.
Избягвах дългите описания, така че ако имаш въпроси, задай си ги. Също и ако не съм разбрал изискванията ти, всъщност затова помолих за примерни данни.
Успех!

[mikk]

и все пак мисля че е по добре да ползваш нещо като това програмата прави перфектни списъци

[Pat]

@Avis, евала за изчерпателния отговор и старането което си положил! Сега като гледам наистина не съм пояснил точно какво искам, но това се дължи единствено на недостатъчните ми познания в сферата на програмирането...Наистина си мислех само за наклонената черта в началото, на другите просто не им обръщах внимание - нито ми пречеха, нито държах на тях, затова говорех само за тези в началото на реда.

Вариянта с "Replace" в Exel ме устройва, защото въвеждах всичко както си е и след това наведнъж се премахват всички черти. Но и това вече е история, с последната програма посочена от @mikk списъците излизат такива каквито исках. Правя само "copy->paste".

[dedis]

Защо не ползваш Broken Cross CD Manager?