VPF::Вызвать VB'шный MsgBox из JavaScript - Форум программистов

dstorm81

Дата 27.1.2006, 16:30 (ссылка)

(нет голосов)

Загрузка ...

бездельник

Профиль
Группа: Завсегдатай
Сообщений: 1178
Регистрация: 18.1.2006
Где: (16RU)

Репутация: 20
Всего: 39

В общем суть вопроса такова, нужно из яваскрипта вызвать VB функцию MsgBox
Не подскажете ли как это сделать, если это возможно желательно рабочий скриптик, с отлавливание того что нажато, там ведь сразу по несколько кнопок можно вешать

Имитацию через модальные окна не предлагать

--------------------

на форуме с 8.12.2002 (http://forum.vingrad.ru/index.php?act=ST&f=10&t=4874&st=0#)

Innuendo

Дата 27.1.2006, 17:57 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 745
Регистрация: 24.12.2005
Где: Молдова

Репутация: 2
Всего: 6

можешь конечно сделать так:

Код


<script language="VBscript">
dim MyBox =  Msgbox(...) // не помню синтаксис ВБ уже
</script>

а вообще в яваскрипт это называется confirm
http://aptem.net.ru/programming/html/desig...ign/allerts.htm
http://vip.fud.ru/html/document/webmaster/...confirm_js.html

Это сообщение отредактировал(а) Innuendo - 27.1.2006, 18:00

--------------------

Ciber SLasH

Дата 27.1.2006, 21:03 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 1813
Регистрация: 9.11.2004
Где: С.-Петербург

Репутация: 24
Всего: 67

Тут попахивает ActiveX-ом...
Т.к. только при наличие оного можно вызывать системные диалоговые окна.
А для этого можно воспользоваться:

Код


<script type='text/javascript'>
//-- Константы кнопок ----------------------------------------------------------
MB_OK = 0x0;
MB_OKCANCEL = 0x1;
MB_ABORTRETRYIGNORE = 0x2;
MB_YESNOCANCEL = 0x3;
MB_YESNO = 0x4;
MB_RETRYCANCEL = 0x5;
//-- Константы иконок ----------------------------------------------------------
MB_ICONERROR = 0x10;
MB_ICONQUESTION = 0x20;
MB_ICONWARNING = 0x30;
MB_ICONINFORMATION = 0x40;
MB_USERICON = 0x80;
//-- Константы резултата -------------------------------------------------------
ID_OK = 1;
ID_CANCEL = 2;
ID_ABORT = 3;
ID_RETRY = 4;
ID_IGNORE = 5;
ID_YES = 6;
ID_NO = 7;
ID_CLOSE = 8;
ID_HELP = 9;
ID_TRYAGAIN = 10;
ID_CONTINUE = 11;
////////////////////////////////////////////////////////////////////////////////
var WshShell = new ActiveXObject("WScript.Shell");
if (WshShell.Popup('Зю', 0, 'Title', MB_OKCANCEL | MB_ICONINFORMATION) == ID_OK) {
    alert('Фаш HDD успешно отформатирован...');
} else {
    alert('Ну, погоди... !!');
}
WshShell.Quit();
</script>

Об объекте WshShell читать тут: http://msdn.microsoft.com/library/default....848f4c38f64.asp

Это сообщение отредактировал(а) Ciber SLasH - 27.1.2006, 21:04

Innuendo

Дата 27.1.2006, 22:49 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 745
Регистрация: 24.12.2005
Где: Молдова

Репутация: 2
Всего: 6

Ciber SLasH
а почему нельзя обойтись стандартными prompt и confirm?
у конфирма 2 кнопки- да, нет. И их нажатии можно так же отследить.
А у промпта: поле с текстом и так же кнопки. Значение поля по умолчанию так же можно задать smile

--------------------

Ciber SLasH

Дата 27.1.2006, 23:59 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 1813
Регистрация: 9.11.2004
Где: С.-Петербург

Репутация: 24
Всего: 67

Цитата(Innuendo @ 27.1.2006, 22:49

)

а почему нельзя обойтись стандартными prompt и confirm?

Обойтись можно. Но как я понял нужно было именно системный бокс. А в сис. боксе может быть и 3 кнопки (типа "Повторить", "Пропустить", "Отменить").

Sardar

Дата 28.1.2006, 00:05 (ссылка)

(нет голосов)

Загрузка ...

Бегун

Профиль
Группа: Модератор
Сообщений: 6986
Регистрация: 19.4.2002
Где: Нидерланды, Groni ngen

Репутация: 78
Всего: 317

Цитата(Innuendo @ 27.1.2006, 21:49

)

а почему нельзя обойтись стандартными prompt и confirm?

Потому что не существуют они в в WSH (виндовых скриптах) окружении. В браузере есессно лучше пользоваться только ими, иначе не кроссплатформено и постоянные вопросо к юзеру за разрешением.

--------------------

Опыт - сын ошибок трудных © А. С. Пушкин
Процесс написания своего велосипеда повышает профессиональный уровень программиста. © Opik
Оценить мои качества можно тут.

dstorm81

Дата 29.1.2006, 19:27 (ссылка)

(нет голосов)

Загрузка ...

бездельник

Профиль
Группа: Завсегдатай
Сообщений: 1178
Регистрация: 18.1.2006
Где: (16RU)

Репутация: 20
Всего: 39

да ребятки....
2Innuendo ну ты меня удивил, я в скриптах не лама и предлагать мне такую гадость...
2Ciber SLasH wsh не катит, черезчур много вопросов возникает.
упростим тему - вообще из javascript можно вызвать vbscrip функцию, или это на грани фантастики

что то типа этого

Код

<script language=javascript>
function prepare()
{
if(x==3){q1()} //вызов  из бейсика
}
</script>
<script language=VBScript>
sub q1()
end sub
</script>

--------------------

на форуме с 8.12.2002 (http://forum.vingrad.ru/index.php?act=ST&f=10&t=4874&st=0#)

Sardar

Дата 29.1.2006, 20:56 (ссылка)

(нет голосов)

Загрузка ...

Бегун

Профиль
Группа: Модератор
Сообщений: 6986
Регистрация: 19.4.2002
Где: Нидерланды, Groni ngen

Репутация: 78
Всего: 317

dstorm81 вообще используються два разных совершенно движка, не думаю что это возможно. Сам на VBS никогда не писал (QVB приходилось, до сих пор отплёвываюсь...), но что то не помню таких возможностей которые были бы в VBS и не были бы в JS.

Что выполняет функция на VBS, не проще ли пересмотреть логику?

--------------------

nworm

Дата 29.1.2006, 20:58 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 502
Регистрация: 22.10.2005

Репутация: 1
Всего: 8

В MSDN есть статья "Using VBScript and JScript on a Web Page"
Можно там почитать. Там есть такой пример:

Код


<script LANGUAGE="VBSCRIPT">
Function makeArrayVB()
    ' Creates a VBScript array
    dim anArray(1,1)
    anArray(0,0) = "0,0"
    anArray(0,1) = "0,1"
    anArray(1,0) = "1,0"
    anArray(1,1) = "1,1"
    makeArrayVB = anArray
End Function

<script LANGUAGE="JavaScript">
// Accesses a VBScript array within a JScript script
function getVBArray(){
    var arrayObj;
    var jsArray;
    arrayObj = makeArrayVB();
    jsArray = VBArray(arrayObj).toArray();
    alert("VBScript array length = " + jsArray.length);
    // Displays the contents of the array
    for(i=1;i<=jsArray.length;i++){
       alert(jsArray[i-1]);
    }
}
</SCRIPT>

Может это чем-то и поможет.

dstorm81

Дата 30.1.2006, 08:27 (ссылка)

(нет голосов)

Загрузка ...

бездельник

Профиль
Группа: Завсегдатай
Сообщений: 1178
Регистрация: 18.1.2006
Где: (16RU)

Репутация: 20
Всего: 39

ладушки ребятки....
видимо придется с модальными окнами работать
всем спасибо

--------------------

на форуме с 8.12.2002 (http://forum.vingrad.ru/index.php?act=ST&f=10&t=4874&st=0#)

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| JavaScript: Общие вопросы \| Следующая тема »