|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
10.03.2011, 00:03 | #1 |
Пользователь
Регистрация: 16.11.2009
Сообщений: 51
|
VBS-скрипты
вот кусок кода:
else if (s="2") Then WScript.StdOut.Write "Введите имя файла:" f = WScript.StdIn.ReadLine WScript.StdOut.Write "Введите адрес места:" g = WScript.StdIn.ReadLine Code=WshShell.Run("%COMSPEC% /c 02.cmd>" & d & f,0,true) нужно, чтобы вывело все папки которые лежат по адресу g в файл f вот 02.cmd: @ECHO OFF CLS FOR /D %%f IN (%%g\*.*) DO ECHO %%f |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Проблема с VBS | А. Долматов | JavaScript, Ajax | 1 | 13.04.2010 10:00 |
По поводу VBS скрипты пряма на компьютере. | STANDING | Помощь студентам | 8 | 26.03.2010 21:12 |
vbs склеить код | kaviga | Помощь студентам | 0 | 18.12.2009 21:23 |
Активация VBS Скрипта | Titan123 | JavaScript, Ajax | 1 | 22.10.2008 12:27 |
xls - txt. VBS | Xozer | Свободное общение | 2 | 03.03.2008 11:29 |