Форум программистов, компьютерный форум, киберфорум
VBScript/JScript/WSH/WMI
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск  
 
 
Рейтинг 4.81/16: Рейтинг темы: голосов - 16, средняя оценка - 4.81
0 / 0 / 0
Регистрация: 29.03.2022
Сообщений: 18
VBS

Операции в зависимости от имен файлов

29.03.2022, 12:26. Показов 3566. Ответов 21
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Здравствуйте!
В каталоге C:\ABC постоянно появляется множество файлов.
В имени файла всегда присутствует один символ "_"

abcde12_34.000
ghj11_22aa.123
kl 11_33.456
a _56ss.789

Нужно в зависимости от значения двух символов после "_" реализовать
вызов определенной функции. При этом из обработки исключить все файлы
с расширением 999. Ну и делать все это в цикле, т.к. в каталоге появляются новые файлы.

Например,
если значение 2 символов после "_" в имени равно 00 или 01 или 02 и расширение не 999, то Sub1(File);
если значение 2 символов после "_" в имени равно 11 или 12 или 22 и расширение не 999, то Sub2(File);
и .т.д.

Подскажите люди добрые, как это реализовать на VBS ?
Заранее благодарю откликнувшихся.
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
29.03.2022, 12:26
Ответы с готовыми решениями:

Копирование файлов в нужные папки в зависимости от их имён
Подскажите, пожалуйста. Можно ли реализовать такую функцию? Есть файлы вида XXX123456789 (цифры разные само собой) YYY123456789 и т.д....

Ошибка операции CREATE DATABASE. Некоторые из перечисленных имен файлов не были созданы
CREATE DATABASE ShopDB ON Primary ( NAME='ShopDB', FILENAME='C:\Users\User\Documents\SQL Server Management...

Список имен файлов без имен папок и скрытых файлов
Здравствуйте Я пытаюсь вывести список имен файлов в текущей папке без отображения имен папок и скрытых файлов Использую следующий...

21
7690 / 2887 / 1110
Регистрация: 06.06.2017
Сообщений: 9,816
01.04.2022, 12:39
Студворк — интернет-сервис помощи студентам
Цитата Сообщение от Punkt5 Посмотреть сообщение
Пока вроде только про zip.
Ослеп. Даже внимания не обратил на расширения. Тогда всё верно.
Цитата Сообщение от Punkt5 Посмотреть сообщение
Возможно и с RAR так можно. Не пробовал.
Возможно, повторюсь, не только с RAR, но не по умолчанию.

Dumo, в общем, делайте как и подсказано:
Visual Basic
20
oItems.Filter 8288, "*_*.*"
Visual Basic
33
   If oFSO.FileExists(File) And Right(File, 4) <> ".999" Then
1
0 / 0 / 0
Регистрация: 29.03.2022
Сообщений: 18
01.04.2022, 12:50  [ТС]
Цитата Сообщение от FlasherX Посмотреть сообщение
в общем, делайте как и подсказано:
Уже сделал
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
01.04.2022, 12:50

Поиск файлов по списку имён и по заданным расширениям с выводом полных имён найденных в текстовый файл
Доброго времени суток! Стоит задача сделать батник. Для поиска файлов по списку имён (кириллица) с заданными расширениями, и выводом...

Распределение файлов по папкам, создаваемым в соответствии с частями имён этих файлов
Всем привет, я работаю в сфере 3d визуализации и так получилось что огромные секвенции файлов сохраняются в одну папку. Это очень неудобно...

Цикл по чтению имен файлов, созданию папок и переносу файлов
Добрый день, Задача: читать папку с файлами, затем вычленять из имени файла часть (дату), создавать папку, если её еще не существует...

Убрать из имен файлов один и тот же символ, не задев названия файлов и их расширения
В папке имеется больше 500 файлов .mp3, у каждого трека есть свое название и исполнитель. А также в названии указан адрес сайта, с которого...

Распределение файлов в папках по подпапкам с именами, соответствующими части имен этих файлов
Есть много пдф файлов с адресами в названии ул. Комсомольская, д. 10 (1 ввод) ул. Комсомольская, д. 10 (2 ввод) ул. Мира, д. 11 ...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
22
Ответ Создать тему
Новые блоги и статьи
Hyper-V: Компьютер должен поддерживать доверенный платформенный модуль 2.0.
Maks 31.08.2026
При установке Windows 11 на виртуальную машину Hyper-V 2-го поколения вылезла такая ошибка: Решение: в параметрах виртуальной машины, в разделе "Безопасность" (Security) активировать флаг. . .
Архитектура биовида Стива в Майнкрафте: Зачем бонобо кубический каннибализм
anaschu 30.08.2026
Кубический Вагинокапитализм в Minecraft: Математический инвариант ОДУ и рок Стивов-бонобо Главная задача разработанной «Модели Всего» — наглядно продемонстрировать наличие системной «судьбы». . .
Оттачиваю умение писать js программы.
russiannick 30.08.2026
Проектом выходного дня стало написание Книги шифров Виженера. Итогом стала версия 200, синий туман. Синий туман назван так, потому что замораживает текст под собой. Нажатие синих кнопок управляют. . .
мат медиц модель 30. презентация проекта
anaschu 27.08.2026
хоп хоп хоп хидахоп, а я кладую))
Как у меня протекала болезнь
zorxor 27.08.2026
Здравствуйте, друзья! Эта запись блога предназначена именно для вас - для моих дорогих друзей, которые знали меня лично. Чтобы ответить на вопрос - а что же со мной произошло на самом деле? Я учился. . .
Нашел вот забавное видео о измерениях. Лучшее что я видел на эту тему
kumehtar 26.08.2026
ILETXiw9bMQ Основная суть и тезисы по измерениям: 0D (Нулевое измерение): точка, не имеющая длины, ширины, высоты или объема. Объект не может перемещаться в 0D. 1D (Первое измерение):. . .
[EasyBuilder Pro] Памятка по разработке для панелей Weintek
ФедосеевПавел 26.08.2026
Памятка по разработке для панелей Weintek ВВЕДЕНИЕ Ранее, при реализации проектов основное внимание уделял разработке управляющей программы для контроллера, а панели оператора доставалось время. . .
Модель по догадкам
anaschu 25.08.2026
Прошло две недели. Я уже рассказывал, как разговаривал с сотрудниками у сортировки и как понял, что главная ветка — не про приёмку, а про отбор. Но тогда я думал, что понял механику. На этой неделе я. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru