Форум программистов, компьютерный форум, киберфорум
VBScript/JScript/WSH/WMI
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.56/18: Рейтинг темы: голосов - 18, средняя оценка - 4.56
2 / 2 / 3
Регистрация: 31.05.2014
Сообщений: 23
VBS

Создание папки с уникальным именем

31.05.2014, 15:17. Показов 3526. Ответов 3
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Разработать сценарий, получающий в качестве аргумента имя целевой папки. Сценарий должен создать в ней новую папку с уникальным именем (например, «Новая папка»).
Если папка с именем «Новая папка» уже существует, выбрать другое имя (например, «Новая папка (2)»).
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
31.05.2014, 15:17
Ответы с готовыми решениями:

Создание папки с именем, являющимся текущей датой, и копирование в неё определённого файла
Собственно весь вопрос в данной теме. пробу вот так: Dim s Set WshShell = CreateObject("WScript.Shell") On...

Скрипт создания папки с именем взятым из буфера обмена
Здравствуйте уважаемые специалисты. Очень нужен скрипт который бы создавал папку с присвоением имени взятого из буфера обмена. ...

Проверка наличия папки с именем с русскими буквами, взятым из таблицы Excel
Добрый день! Задача следующая: при помощи VBS открыть файл EXCEL, в котором в виде таблицы представлены папки на файловом сервере и...

3
Почетный модератор
Эксперт по компьютерным сетямЭксперт Windows
 Аватар для magirus
28049 / 15785 / 983
Регистрация: 15.09.2009
Сообщений: 67,752
Записей в блоге: 78
31.05.2014, 15:18
начинай, че...
0
2 / 2 / 3
Регистрация: 31.05.2014
Сообщений: 23
31.05.2014, 15:20  [ТС]
Я плохо в этом разбираюсь..с чего начать?
0
Эксперт WindowsАвтор FAQ
 Аватар для Dragokas
18033 / 7736 / 892
Регистрация: 25.12.2011
Сообщений: 11,502
Записей в блоге: 16
31.05.2014, 18:25
Здравствуйте, Katerina101010 !

Вы можете начать с этого: https://www.cyberforum.ru/post3270650.html

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
if WScript.Arguments.Count = 0 then WScript.Echo("Не заданы аргументы !"): WScript.Quit
sFolder = WScript.Arguments(0)
 
Set oFSO = CreateObject("Scripting.FileSystemObject")
if not oFSO.FolderExists(sFolder) then WScript.Echo("Папка, заданная аргументом, не существует !"): WScript.Quit
oFSO.CreateFolder(GetFreeFolderName(sFolder))
 
function GetFreeFolderName(sFolder)
  Dim oFSO, tmp
  Set oFSO = CreateObject("Scripting.FileSystemObject")
  tmp = oFSO.BuildPath(sFolder, oFSO.GetTempName())
  if oFSO.FolderExists(tmp) then GetFreeFolderName = GetFreeFolderName(sFolder) else GetFreeFolderName = tmp
  Set oFSO = Nothing
end function
Batch-файл может принимать аргументы запуска

Для вызова скрипта из командной строки с аргументом необходимо ввести такую команду:

1) Переход в папку, где Ві создали скрипт:
Bash
1
cd /d "Полній путь к папке со скриптом"
2) Запуск скрипта с аргументом
Bash
1
cscript.exe "Имя скрипта.vbs" "Путь к папке, как указано в задании"
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
31.05.2014, 18:25
Помогаю со студенческими работами здесь

Создание синхронизируемой папки
Коллеги, вот такое у меня задание 1 Необходимо у каждого пользователя на рабочем столе создать папку синхронизируемую с папкой на...

Создание папки
Добрый вечер, всем приятного времяпрепровождения в просторах интернета. Вопрос в следующем - так как я не являюсь специалистом, а только...

создание общей папки с определнными правами
Добрый день начну с предыстории. Организовал резервное копирование на тестовом стенде (один комп, один контроллер доменов) таким образом -...

Создание копии папки со случайным именем и копирование ее (папки) в заданный раздел
Подскажите как сделать в .bat создание копии папки со случайным именем и копирование ее (папки) в заданный раздел (например папку D:/trash...

Создание папки с именем, указанным в TextBox
Private Sub cmdCr_fol_Click() Dim fr As String fr = txtCr_fol.Text MkDir "C:\Users\User\Downloads\fr " &...


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

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
Оттенки серого
Argus19 18.03.2026
Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .
SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++
8Observer8 17.03.2026
Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip
Символические и жёсткие ссылки в Linux.
algri14 15.03.2026
Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .
[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора
ФедосеевПавел 14.03.2026
Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .
делаю науч статью по влиянию грибов на сукцессию
anaschu 13.03.2026
прикрепляю статью
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++
8Observer8 10.03.2026
Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE
8Observer8 10.03.2026
Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .
Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки
Neotwalker 08.03.2026
Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru