Форум программистов, компьютерный форум, киберфорум
VBScript/JScript/WSH/WMI
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.86/7: Рейтинг темы: голосов - 7, средняя оценка - 4.86
 Аватар для UniLamer
0 / 0 / 0
Регистрация: 28.03.2019
Сообщений: 19
VBS

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

30.03.2019, 15:40. Показов 1596. Ответов 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
6966 / 2860 / 1100
Регистрация: 06.06.2017
Сообщений: 9,701
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
6966 / 2860 / 1100
Регистрация: 06.06.2017
Сообщений: 9,701
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
6966 / 2860 / 1100
Регистрация: 06.06.2017
Сообщений: 9,701
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
Ответ Создать тему
Новые блоги и статьи
Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост.
Programma_Boinc 28.12.2025
Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Налог на собак: https:/ / **********/ gallery/ V06K53e Финансовый отчет в Excel: https:/ / **********/ gallery/ bKBkQFf Пост отсюда. . .
Кто-нибудь знает, где можно бесплатно получить настольный компьютер или ноутбук? США.
Programma_Boinc 26.12.2025
Нашел на реддите интересную статью под названием Anyone know where to get a free Desktop or Laptop? Ниже её машинный перевод. После долгих разбирательств я наконец-то вернула себе. . .
Thinkpad X220 Tablet — это лучший бюджетный ноутбук для учёбы, точка.
Programma_Boinc 23.12.2025
Рецензия / Мнение/ Перевод Нашел на реддите интересную статью под названием The Thinkpad X220 Tablet is the best budget school laptop period . Ниже её машинный перевод. Thinkpad X220 Tablet —. . .
PhpStorm 2025.3: WSL Terminal всегда стартует в ~
and_y87 14.12.2025
PhpStorm 2025. 3: WSL Terminal всегда стартует в ~ (home), игнорируя директорию проекта Симптом: После обновления до PhpStorm 2025. 3 встроенный терминал WSL открывается в домашней директории. . .
Как объединить две одинаковые БД Access с разными данными
VikBal 11.12.2025
Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.
Новый ноутбук
volvo 07.12.2025
Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro
Музыка, написанная Искусственным Интеллектом
volvo 04.12.2025
Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .
От async/await к виртуальным потокам в Python
IndentationError 23.11.2025
Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .
Поиск "дружественных имён" СОМ портов
Argus19 22.11.2025
Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .
Сколько Государство потратило денег на меня, обеспечивая инсулином.
Programma_Boinc 20.11.2025
Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru