|
Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Скриптовые языки администрирования Windows » CMD/BAT - [решено] нахождение txt. |
|
CMD/BAT - [решено] нахождение txt.
|
Новый участник Сообщения: 22 |
Привет всем! Нужна помощь
задание такое: найти любой txt файл в диске С. После нахождения программа должна вывести на экран имя файла, время создания файла, и вес. Спасибо |
|
Отправлено: 23:42, 19-01-2011 |
Googler Сообщения: 3665
|
Профиль | Отправить PM | Цитировать @for /f "delims=" %%a in ('dir /b/s/a-d c:\*.txt') do @( @for /f "tokens=1,2" %%b in ('dir/tc "%%a"^|findstr/iec:".txt"') do @set "$tc=%%b %%c" echo. echo Long File Name : %%~fa echo Short File Name : %%~sa echo. echo File size ^(Bytes^): %%~za echo. call echo Creation Time : %%$tc%% echo Modification Time: %%~ta pause>nul& goto:continue) :continue |
Отправлено: 06:01, 20-01-2011 | #2 |
Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети. Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля. |
Новый участник Сообщения: 22
|
Профиль | Отправить PM | Цитировать выводит ошибку "непредвиденное появление %%a"
|
Отправлено: 12:56, 20-01-2011 | #3 |
Ветеран Сообщения: 1001
|
Профиль | Отправить PM | Цитировать Вот вам vbs скрипт, который будучи запущен найдет вам все txt файлы и требуемый результат запишет в лог c:\temp\txt-files.txt
Const ForAppending = 8 strComputer = "." Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}\\" & strComputer & "\root\cimv2") Set colFiles = objWMIService.ExecQuery("Select * from CIM_DataFile where FileName Like '*.txt'") Set objFSO = CreateObject("Scripting.FileSystemObject") Set objTextFile = objFSO.OpenTextFile("c:\temp\txt-files.txt", ForAppending, True) For Each objFile In colFiles objTextFile.WriteLine(objFile.Name & " " & objFile.DateCreated & " " & objFile.Size) Next objTextFile.Close |
Отправлено: 16:26, 20-01-2011 | #4 |
Новый участник Сообщения: 22
|
Профиль | Отправить PM | Цитировать мне нужен bat... но все равно спасибо
![]() |
|
Отправлено: 16:34, 20-01-2011 | #5 |
Ветеран Сообщения: 1001
|
Профиль | Отправить PM | Цитировать Цитата Чин Хон:
Но я подумал, что вам нужно решить задачу, при этом неважно bat или vbs. Тем более листинг vbs круче выглядит : ) имхо Да и "погибче" будет |
|
Последний раз редактировалось Ivan Bardeen, 20-01-2011 в 18:49. Отправлено: 16:36, 20-01-2011 | #6 |
Новый участник Сообщения: 22
|
Профиль | Отправить PM | Цитировать дело в том, что задание именно по bat дали
![]() |
Отправлено: 22:11, 20-01-2011 | #7 |
Googler Сообщения: 3665
|
Профиль | Отправить PM | Цитировать Цитата Чин Хон:
|
|
Отправлено: 05:17, 21-01-2011 | #8 |
Новый участник Сообщения: 22
|
Профиль | Отправить PM | Цитировать Спасибо большое!
![]() |
Отправлено: 12:05, 21-01-2011 | #9 |
![]() |
Участник сейчас на форуме |
![]() |
Участник вне форума |
![]() |
Автор темы |
![]() |
Сообщение прикреплено |
| |||||
Название темы | Автор | Информация о форуме | Ответов | Последнее сообщение | |
CMD/BAT - Нахождение и выбор папки и её копирование | ikif | Скриптовые языки администрирования Windows | 1 | 30-12-2010 12:01 | |
[решено] Вставить строчку из одного txt в оределённое место другого txt | ZeroCrash | AutoIt | 7 | 13-07-2009 07:35 | |
C/C++ - Нахождение чётных элементов в столбцах матрицы | ShadowMas | Программирование и базы данных | 9 | 04-04-2009 10:21 | |
Теория - Нахождение внутренних углов в многоугольнике | mrcnn | Программирование и базы данных | 8 | 01-06-2008 14:51 | |
Нахождение сервера лицензий w2k3 | SergOst | Microsoft Windows NT/2000/2003 | 3 | 09-11-2006 14:59 |
|