|
|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail | |||||||
| Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
||||
 |
|
|
Опции темы | Поиск в этой теме |
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 |
