Главная страница
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.049 c
4-1125923631
n0name
2005-09-05 16:33
2005.11.06
Формат ICO


2-1129451040
_WWW
2005-10-16 12:24
2005.11.06
WebNavigator


6-1122300940
dddim
2005-07-25 18:15
2005.11.06
проверка соединеиня с интернетом.


4-1125491487
Black Krok
2005-08-31 16:31
2005.11.06
Исчерпание ресурсов Windows


14-1129203524
BaxTMaH
2005-10-13 15:38
2005.11.06
треба помощь