Переключение на Главную Страницу Страницы: 1 ОтправитьПечать
Обычная тема Поможите со скриптами (число прочтений - 2884 )
Arta
1c++ power user
Отсутствует



Сообщений: 2537
Местоположение: Нижний Новгород
Зарегистрирован: 19. Мая 2006
Пол: Мужской
Поможите со скриптами
22. Февраля 2007 :: 12:43
Печать  
Не волоку я в них... Печаль
Сейчас есть задача. Есть ком-объект по работе с модемом, хочу сделать автоинформатор (предыдущая версия работала на линуксе).
Реализовать хочу на vbs. Соответственно вопрос, как заставить скрипт постоянно ожидать вызова событий этого ком-объекта? Как сделать так, чтобы скрипт работал всегда, пока я его не грохнул?

Улыбка
  
Наверх
 
IP записан
 
berezdetsky
1c++ power user
Отсутствует


barba non facit sisadminum

Сообщений: 1986
Местоположение: Москва
Зарегистрирован: 19. Мая 2006
Пол: Мужской
Re: Поможите со скриптами
Ответ #1 - 22. Февраля 2007 :: 13:06
Печать  
Код
Выбрать все
Dim MyObject

Set MyObject = WScript.CreateObject("My.Object")
WScript.ConnectObject MyObject, "MyObject_"
MyObject.Execute

Do While True
    WScript.Sleep 1000
Loop

Sub MyObject_EventName
    WScript.Echo "EventName raised"
End Sub

Sub MyObject_ErrorEvent
    WScript.Quit -1
End Sub
 

  

пароль как коньяк, чем больше звездочек, тем лучше
Наверх
IP записан
 
trdm
1c++ power user
qt1l developer
1c++ moderator
Отсутствует



Сообщений: 2343
Местоположение: г. Ростов-на-Дону
Зарегистрирован: 19. Мая 2006
Пол: Мужской
Re: Поможите со скриптами
Ответ #2 - 22. Февраля 2007 :: 13:23
Печать  
raised [ ]
1) поставленный на дрожжах
2) лепной, рельефный
Печаль
  
Наверх
IP записан
 
Arta
1c++ power user
Отсутствует



Сообщений: 2537
Местоположение: Нижний Новгород
Зарегистрирован: 19. Мая 2006
Пол: Мужской
Re: Поможите со скриптами
Ответ #3 - 22. Февраля 2007 :: 14:23
Печать  
trdm писал(а) 22. Февраля 2007 :: 13:23:
raised [ ]


Это ты к чему? Улыбка
  
Наверх
 
IP записан
 
Arta
1c++ power user
Отсутствует



Сообщений: 2537
Местоположение: Нижний Новгород
Зарегистрирован: 19. Мая 2006
Пол: Мужской
Re: Поможите со скриптами
Ответ #4 - 22. Февраля 2007 :: 14:23
Печать  
berezdetsky сенкс, попробую поломать
  
Наверх
 
IP записан
 
trdm
1c++ power user
qt1l developer
1c++ moderator
Отсутствует



Сообщений: 2343
Местоположение: г. Ростов-на-Дону
Зарегистрирован: 19. Мая 2006
Пол: Мужской
Re: Поможите со скриптами
Ответ #5 - 22. Февраля 2007 :: 14:36
Печать  
Arta писал(а) 22. Февраля 2007 :: 14:23:
trdm писал(а) 22. Февраля 2007 :: 13:23:
raised [ ]

Это ты к чему? Улыбка

фиговый переводчик.... ((
  
Наверх
IP записан
 
Arta
1c++ power user
Отсутствует



Сообщений: 2537
Местоположение: Нижний Новгород
Зарегистрирован: 19. Мая 2006
Пол: Мужской
Re: Поможите со скриптами
Ответ #6 - 22. Февраля 2007 :: 15:23
Печать  
а Улыбка
ну дык типа ивент случился. вот и весь перевод Улыбка
  
Наверх
 
IP записан
 
Переключение на Главную Страницу Страницы: 1
ОтправитьПечать