Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.11.06;
Скачать: CL | DM;

Вниз

Подключение GetObject om к уже запущенному Excel   Найти похожие ветки 

 
Fktrc ©   (2005-01-23 21:44) [0]

Хотя вопрос и не по delphi, но все же близко к теме конференции...

Люди умные, объясните, что происходит, ибо "нич-чего не понимаю"(С). Ситуация: WSH 5.6, Excel 2003. Имеется следующий JS-скрипт:[code]var Excel;
var WSH = new ActiveXObject("WScript.Shell");

while(!Excel){
  try {
     // пытаемся подключиться к запущенному экземпляру Excel
     Excel = GetObject("", "Excel.Application");
  } catch(a) {
     WScript.Sleep(1000);
  }
}
WScript.Echo("Excel closing...");
Excel.Application.Quit();[/code]Вроде все правильно - в бесконечном цикле ожидаем запуска Excel. Если к нему удалось подключиться, выходим из цикла, выдаем сообщение "Excel closing..." и после его закрытия закрываем Excel. Результаты же запуска скрипта озадачивают не на шутку!

Первый вариант запуска: Сначала запускаем Excel. Затем запускаем скрипт. Он отрабатывает, как и должен - подключается к Excel, выдает сообщение и закрывает Excel.

Второй вариант, ради которого, собсно, и затевался сыр-бор: сначала запускаем скрипт. Он, как и положено, крутится в цикле, периодически пробуя подключиться к Excel. Запускаем Excel. Ждем... (Excel запущен и активен!) еще ждем... и еще ждем... . Нифига. Но стоит переключиться из окна Excel на любое другое окно (да хоть мышкой по панели задач щелкнуть), как тут же выскакиваем окошко "Excel closing...".
То есть такое впечатление, как будто сразу после запуска Excel его OLE сервер неактивен или не создан. Но как только окно Excel теряет фокус, то OLE сервер тут же создается, либо активизируется, позволяя подключиться к себе...

Казалось бы, бред полный. Но факты - упрямая вещь. Кто поопытнее меня, разъясните, в чем замес. А то я уже просто не знаю что и думать...


 
Fktrc ©   (2005-01-24 09:13) [1]

Fktrc ©   (23.01.05 21:44)
По великой запарке неправильно тему написал, правильно будет не "к уже запущенному Excel", а просто к Excel, так как на момент запуска скрипта его еще нет...


 
Sancho ©   (2005-01-28 15:21) [2]

var Ex = new ActiveXObject("Excel.Application");



Страницы: 1 вся ветка

Текущий архив: 2005.11.06;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.026 c
1-1129286841
_3d[Power]
2005-10-14 14:47
2005.11.06
Как убрать всплывание контекстного меню у главного окна при


4-1125398035
MrBob
2005-08-30 14:33
2005.11.06
Печать на матричнике без промотки


4-1125644854
Руслан
2005-09-02 11:07
2005.11.06
Посылка сообщения


2-1128867307
quadronik
2005-10-09 18:15
2005.11.06
Сортировка записей через SQL-запрос


4-1125413034
Русланка
2005-08-30 18:43
2005.11.06
Как заставить Windows произвести обновление оборудования