Аватар для UniLamer
0 / 0 / 0
Регистрация: 28.03.2019
Сообщений: 19
VBS

Как создать vbs скрипт в которого надо было ввести путь, по которому будет перемещаться bat файл?

30.03.2019, 15:40. Показов 1646. Ответов 6
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Всем привет подскажите как создать vbs скрипт в которого надо было ввести путь, по которому будет перемещаться bat файл?

МОЯ ЦЕЛЬ:
Хочу чтобы появлялось окно vbs, inputbox в которое ты вводил бы путь и он использовался для перемещения/копированя bat файла по указаному пути, например вводиш путь c:/ , нажимаешь enter и он копировался/перемещался в диск с.
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
30.03.2019, 15:40
Ответы с готовыми решениями:

Как создать vbs скрипт в которого надо было ввести путь, по которому будет перемещаться bat файл
Всем привет подскажите как создать vbs скрипт в которого надо было ввести путь, по которому будет перемещаться bat файл? МОЯ ЦЕЛЬ: ...

Как сделать bat-ник с фильтром который будет проверять абсолютно все на пк, но файлы с окончанием .bat и .vbs
Как сделать bat-ник с фильтром который будет проверять абсолютно все на пк, но файлы с окончанием .bat и .vbs будет переносить в папку...

Создать BAT-файл с помощью VBS-файла
Привет всем. Интересует вопрос, возможно ли создать bat файл напрямую через VBS файл и вписать туда определенный код? Я научился...

6
6998 / 2883 / 1109
Регистрация: 06.06.2017
Сообщений: 9,780
30.03.2019, 16:11
Не лучше выбрать в диалоге?:
Visual Basic
1
2
3
4
5
6
Set oFolder = CreateObject("Shell.Application").BrowseForFolder(0,_
vbCr & vbCr & "Выберите целевой каталог:", 1, 17)
If oFolder Is Nothing Then WSH.Quit
oFolder.CopyHere "C:\My.bat", 5652
' либо
oFolder.MoveHere "C:\My.bat", 5652
1
0 / 0 / 0
Регистрация: 12.08.2020
Сообщений: 14
21.09.2020, 22:10
FlasherX, Если не известна буква диска, предположим я его запускаю на флешке с разных ПК, и буква флешки меняется?
0
6998 / 2883 / 1109
Регистрация: 06.06.2017
Сообщений: 9,780
22.09.2020, 00:22
Dr_Perry_Coke, если не известна, можно найти. Т. е.:
Visual Basic
1
2
3
4
5
6
7
8
For Each D In CreateObject("Scripting.FileSystemObject").Drives
  If D.DriveType = 1 Then Exit For
Next
If IsEmpty(D) Then WSH.Quit
Set oFolder = CreateObject("Shell.Application").BrowseForFolder(0,_
vbCr & vbCr & "Выберите целевой каталог:", 0, D & "\")
If oFolder Is Nothing Then WSH.Quit
oFolder.CopyHere "C:\M.bat", 5652
1
0 / 0 / 0
Регистрация: 12.08.2020
Сообщений: 14
22.09.2020, 07:54
Цитата Сообщение от FlasherX Посмотреть сообщение
"C:\M.bat"
я имел ввиду, путь от куда копировать, то есть "С:" можно переменной какой-то заменить? например в одной из программ можно сделать так "{root}\M.bat"
0
6998 / 2883 / 1109
Регистрация: 06.06.2017
Сообщений: 9,780
22.09.2020, 08:45
Dr_Perry_Coke, тогда при чём тут эта тема? Здесь выбирается получатель, а не источник. А когда выбирается источник, с ним обычно выбирается и файл. Это про другое.
0
0 / 0 / 0
Регистрация: 12.08.2020
Сообщений: 14
22.09.2020, 10:32
Цитата Сообщение от FlasherX Посмотреть сообщение
тогда при чём тут эта тема?
Извините, не подумал
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
22.09.2020, 10:32
Помогаю со студенческими работами здесь

Как задать ключ по которому надо будет сортировать в priority_queue
Доброго времени суток форумчане. Хочу сделать так чтобы priority_queue понимал по какому ключу сортировать но не понял как задавать его, о...

Как создать bat файл который будет читать определенную папку и
Как создать bat файл который будет читать определенную папку и удалять все что в ней есть, при том так чтобы те файлы которые были в ней...

Создание бинарного файла из vbs / Как создать exe файл из vbs
Имеется файл с расширением exe. Нужно как-нибудь занести массив байт в скрипт, и чтоб потом этот файл создавался при запуске vbs

Работа с файлами (создать файл путь к которому уже задан, а вот имя хранится в переменной)
Проблема: Необходимо создать файл путь к которому уже задан, а вот имя хранится в переменной. string name; ...

Как мне сделать так чтобы не надо было указывать полный путь
Добрый день , форумчане. Как мне сделать так чтобы не надо было указывать полный путь ? Как прописать в path чтобы вместо ...


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

Или воспользуйтесь поиском по форуму:
7
Ответ Создать тему
Опции темы

Новые блоги и статьи
Валидация и контроль данных табличной части документа перед записью
Maks 22.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в КА2. Задача: контроль и валидация данных табличной части документа перед записью с учетом регламента компании. . .
Отчёт о затраченных материалах за определенный период с макетом печатной формы
Maks 21.04.2026
Отчёт из решения ниже размещён в конфигурации КА2. Задача: разработка отчёта по затраченным материалам за определённый период, с возможностью вывода печатной формы отчёта с шапкой и подвалом. В. . .
Отчёт о спецтехнике находящейся в ремонте
Maks 20.04.2026
Отчёт из решения ниже размещен в конфигурации КА2. Задача: отобразить спецтехнику, которая на данный момент находится в ремонте. Есть нетиповой документ "Заявка на ремонт спецтехники" который. . .
Памятка для бота и "визитка" для читателей "Semantic Universe Layer (Слой семантической вселенной)"
Hrethgir 19.04.2026
Сгенерировано для краткого описания по случаю сборки и компиляции скелета серверного приложения. И пусть после этого скажут, что статьи сгенерированные AI - туфта и не интересно. И это не реклама -. . .
Запрет удаления строк ТЧ документа при определённом условии
Maks 19.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "Аккумуляторы", разработанного в конфигурации КА2. У данного документа есть ТЧ, в которой в зависимости от прав доступа. . .
Модель заражения группы наркоманов
alhaos 17.04.2026
Условия задачи сформулированы тут Суть: - Группа наркоманов из 10 человек. - Только один инфицирован ВИЧ. - Колются одной иглой. - Колются раз в день. - Колются последовательно через. . .
Мысли в слух. Про "навсегда".
kumehtar 16.04.2026
Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .
My Business CRM
MaGz GoLd 16.04.2026
Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru