Zloy_Gelud
Silver Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
magistrfet
Если правильно понял, что надо, то можно так:
Код: -- Валидные диски
tblValidLetters = {'c','d','e'};
-- *** Функция запуска программы
-- strFileName - название программы (имя+расширение)
-- tblLetters (необязательный параметр) - таблица валидных дисков
function File.RunEx(strFileName, tblLetters)
local strLetter = Dialog.Input("Enter Data", "Your answer:", "", MB_ICONQUESTION);
if (strLetter ~= "") and (strLetter ~= "CANCEL") then
if (tblLetters ~= nil) then
for _, strVLetter in tblLetters do
if (strLetter == strVLetter) then
bOk = true;
break;
else
bOk = false;
end
end
if (not bOk) then
Dialog.Message("Error", "Неправильная буква диска.", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
else
File.Run(strLetter..":\\Program Files\\"..strFileName, "1", strLetter..":\\Program Files\\", SW_SHOWNORMAL, false);
end
else
File.Run(strLetter..":\\Program Files\\"..strFileName, "1", strLetter..":\\Program Files\\", SW_SHOWNORMAL, false);
end
end
end
--File.RunEx("test.exe");
File.RunEx("test.exe", tblValidLetters); |
bedrik
Цитата:| Пишет что винде не удалось найти "111/1.ехе" (показывает путь к файлу который запускает батник). Проверьте правильно ли задано имя. |
Возможно в батнике что-то неправильно прописано!?
Цитата:| И как отключить правую клавишу мыши над веб объектом. |
Методами АМС получается это неважно, лучше внедряй в html-страничку java-скрипт, блокирующий появление контекстного меню. В инете таких скриптов полно, даже несколько страниц назад я приводил пример такого скрипта.
RW4PIR
Код: data1 = 20;
data2 = 32;
data3 = data1*data1/data2;
data4 = (data1*data2)^0.5;
Dialog.Message("Notice", "Result 1: "..data3 .. "\r\n\r\nResult 2: "..data4, MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1); |
|
Всего записей: 3273 | Зарегистр. 30-05-2007 | Отправлено: 01:35 17-03-2009 | Исправлено: Zloy_Gelud, 01:39 17-03-2009 |
|
-умер, сорри... 
Ответы на наиболее часто задаваемые вопросы: 
