Модераторы: korob2001, ginnie
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> win32::ole error 0x80004002 
:(
    Опции темы
fallenstorm
Дата 10.11.2009, 18:46 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

Репутация: нет
Всего: нет
есть такой код:

Код

use WIN32::OLE;

Win32::OLE->Option(Warn => 2);
Win32::OLE->Initialize(Win32::OLE::COINIT_OLEINITIALIZE);

$sec_tbl=Win32::OLE->new('TEClient.SlotTable') or die "oops: $!\n";
$sec_tbl->Open($obj->ID,"SECURITIES") or warn "unable to open table SECURITES!\n";
Win32::OLE->WithEvents($sec_tbl, \&table_events);

sub table_events
{
    my ($obj,$event,@args) = @_;
    print "Event triggered for: '$event'\n";
}



Однако выдает такую ошибку:

Код

Win32::OLE(0.1709) error 0x80004002: "No such interface supported"
 


Кто сталкивался?

Если вызывать так:

Код

Win32::OLE->WithEvents($all_tbl, \&table_events,'_ISlotTableEvents');

то
Код

error 0x80070057: 'The parameter is incorrect'



Однако, когда я работаю с объектом Slot, ошибок нету. Вызываю его так:
Код


Win32::OLE->WithEvents($sl, \&slot_events);



Не могу понять в чем проблема?
PM MAIL   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Perl"
korob2001
sharq
  • В этом разделе обсуждаются общие вопросы по языку Perl
  • Если ваш вопрос относится к системному программированию, задавайте его здесь
  • Если ваш вопрос относится к CGI программированию, задавайте его здесь
  • Интерпретатор Perl можно скачать здесь ActiveState, O'REILLY, The source for Perl
  • Справочное руководство "Установка perl-модулей", можно скачать здесь

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, korob2001, sharq.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Perl: Общие вопросы | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.3418 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.