powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / интересный вопрос
6 сообщений из 6, страница 1 из 1
интересный вопрос
    #32626584
Nikolay Gerasimov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
имеется приложение которое пытаюсь описать как ActivXObject в WScript
<job>
<script language="VBScript">
Option Explicit
Dim tm
tm = new ActiveXObject("temul") //запуск приложения
tm.Application.Visible = true// Управляем видимостью
............................................
tm.Application.Quit; // и выходим из Excel
</script>
</job>
И вот, ругается комп. Пишет невозможно создание объекта сервером программирования объектов....
Можно конечно сделать и так:
<job>
<script language="VBScript">
Option Explicit
Dim Wsh
Set Wsh = WScript.CreateObject("WScript.Shell")
Wsh.Run "temul"
........................................
WScript.Quit()
</script>
</job>
Но есть ряд причин которые против такого метода. Кто что может сказать по первому варианту? Не совсем трагично? или можно что либо сделать??????
...
Рейтинг: 0 / 0
интересный вопрос
    #32626936
Фотография Magnus23
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Это приложение самописный ActiveX? Дллка? В системе зарегена? Лежит ли по однму из дефолтных путей?

Какое отношение имеет первый метод ко второму? Это ж вроде разные обьекты?

Magnus
...
Рейтинг: 0 / 0
интересный вопрос
    #32627396
Nikolay Gerasimov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Magnus23Это приложение самописный ActiveX? Дллка? В системе зарегена? Лежит ли по однму из дефолтных путей?

Какое отношение имеет первый метод ко второму? Это ж вроде разные обьекты?

Magnus
Скорее всего этот объект не является ActivX, потому что WScript ругается - не может создать и запустить (tm = new ActiveXObject("temul") ). Это не dll - это клиентская прога для подключения к серваку, нечто вроде notepada, в котором набираются запросы и отравляются на сервер, который в свою очередь обрабатывает и возвращает ответ. По второму варианту все работает, но с определенными минусами. Вопрос был следующим, можно ли как-то попробовать преобразовать данное приложение, чтобы оно стало объектом ActivX????
...
Рейтинг: 0 / 0
интересный вопрос
    #32627635
Фотография Magnus23
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А почему не сделать CreateObject?


Код: plaintext
tm = CreateObject("temul") 

Если екзешмик то будет выполнятся в своем процессе. ПОлучишь ссылку на него и работай.

Имя обьекта правильное? Он сам где лежит?

Magnus
...
Рейтинг: 0 / 0
интересный вопрос
    #32629008
Nikolay Gerasimov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Magnus23А почему не сделать CreateObject?


Код: plaintext
tm = CreateObject("temul") 

Если екзешмик то будет выполнятся в своем процессе. ПОлучишь ссылку на него и работай.

Имя обьекта правильное? Он сам где лежит?

Magnus
В реестре он прописан, поэтому безпроблем откликается на просто temul.
CreateObject я уже использовал. Видишь ли это строится скрипт для Windows Script Host. Нужно не только запустить данное приложение, но и управлять им.
Через CreateObject все это я уже сделал, есть минус. Когда приложение запускается , то его нельзя трогать сек. 15-20, нельзя сворачивать, можно делать только неактивным, но опять же спустя 15-20 сек. от запуска. Это неудобно...
через ActivXObject можно все процедуры сделать скрытыми.....
Или я чего-то недопонимаю??????
...
Рейтинг: 0 / 0
интересный вопрос
    #32629321
Фотография Magnus23
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
авторЧерез CreateObject все это я уже сделал, есть минус. Когда приложение запускается , то его нельзя трогать сек. 15-20,

Странно. Возможно это грабли самого WSH. В Васике таких проблем нет.

Как ты это определяешь? Вызов не возвращается?
Или обьект не отвечает?

Можно конечно сделать попробовать сделать жерез Ж..
Т.е. создать свой Х, в котором создавать обьект. И продублировать необходимые метода целевого приложения. Или попробовать использовать CallByName для вызова других функций, хотя не уверен будет ли это работать.

Magnus
...
Рейтинг: 0 / 0
6 сообщений из 6, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / интересный вопрос
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]