|
Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Скриптовые языки администрирования Windows » VBS/WSH/JS - Помогите написать аналог моего батника на VBS |
|
VBS/WSH/JS - Помогите написать аналог моего батника на VBS
|
Старожил Сообщения: 440 |
Профиль | Отправить PM | Цитировать Написал себе батник для открытия в тотал командере папок с базами для 1с7
@echo off CHCP 1251 >nul set home=%~dp0 set totexe=%home%\..\TOTALCMD.EXE SetLocal EnableDelayedExpansion Set $RKEY="HKCU\Software\1C\1Cv7\7.7\Titles" Set $iMAX=0 For /F "Tokens=1,3 Delims= " %%i In ('Reg Query %$RKEY% /s^|Find "REG_SZ"') Do ( Set /A $iMAX +=1 Set $PATH=%%i Set $NAME!$iMAX!=%%j Set $PATH!$iMAX!=!$PATH:~4! ) CALL :DISPLAY %$iMAX% Echo Выберите базу: Set /P $iBase= %totexe% /o /L="!$PATH%$iBase%!" exit :DISPLAY set $b=%1 CLS Echo #------------------------------ Echo # Всего баз : %1 Echo #------------------------------ Echo. Echo # Список баз: Set $iNUM=1 echo ------------------------------- :LOOP Echo %$iNUM%: !$NAME%$iNUM%! Echo path: !$PATH%$iNUM%! echo ------------------------------- Set /A $iNUM+=1 If %$iNUM% LEQ %$iMAX% GOTO :LOOP GOTO :EOF Я не спец в vbs, но на сколько я понимаю там можно создавать визуальный интерфейс. Собственно мне бы нужно чтоб появился какой-то с список с кнопками или чем то в чем выбор можно сделать с помощью мыши. |
|
Отправлено: 16:32, 21-08-2009 |
Ветеран Сообщения: 3806
|
Профиль | Отправить PM | Цитировать логичнее сразу в hta писать
|
Отправлено: 22:16, 21-08-2009 | #2 |
Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети. Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля. |
Старожил Сообщения: 440
|
Профиль | Отправить PM | Цитировать hta дак hta , я не того ни другого не знаю
|
Отправлено: 00:24, 22-08-2009 | #3 |
Ветеран Сообщения: 2708
|
Профиль | Отправить PM | Цитировать Попробуйте сформулировать задачу с самого начала, чтобы не вчитываться в Ваш батник. Вам в папке надо открыть (чем?) файлы. Все файлы (допустим по маске)? или, как вариант решения, выдать запрос, открывать файл или нет из списка, полученного по маске?
|
------- Отправлено: 20:57, 25-08-2009 | #4 |
Старожил Сообщения: 440
|
Профиль | Отправить PM | Цитировать megaloman,
Задача собственно вот в чем : Вывести список баз 1с7, так чтоб можно было выбрать . После выбора скрипт передает этот путь тоталкомандеру с помошь его ключей TOTALCMD.EXE /o /L="%path%" В моем скрипте выбор осуществляется нажатием цифры на клавиатуре , а мне бы хотелось нажимать на кнопки мышкой. Сами пути к базам берутся из реестра. |
|
Отправлено: 16:21, 29-08-2009 | #5 |
Участник сейчас на форуме | Участник вне форума | Автор темы | Сообщение прикреплено |
| |||||
Название темы | Автор | Информация о форуме | Ответов | Последнее сообщение | |
VBS/WSH/JS - [решено] Помогите подправить скрипт VBS | Pozia | Скриптовые языки администрирования Windows | 37 | 09-04-2010 13:33 | |
VBS/WSH/JS - Помогите русифицироват *.vbs скрипт | nod201 | Скриптовые языки администрирования Windows | 3 | 07-12-2009 10:53 | |
VBS/WSH/JS - Помогите редактировать Autorun_Disable.vbs на Autorun_Enable.vbs | nod201 | Скриптовые языки администрирования Windows | 0 | 05-12-2009 05:44 | |
FreeBSD - аналог батника на FreeBSD???? | went | Общий по FreeBSD | 8 | 13-05-2008 15:48 | |
Помогите Batник написать. | kda12 | Microsoft Windows NT/2000/2003 | 10 | 10-05-2006 23:34 |
|