Открытие документа word

Shas · 05 июл 2009, 14:24

Господа, помогите, плиз, во вроде банальной ситуации.
Установлен Office 2003 SP3
В Access'e пытаюсь открыть вордовский документ, но получаю следующую ошибку:
"Automation error Библиотека не зарегистрирована"

Dim wrd_app As Word.Application
Dim wrd_doc As Word.Document
Dim fname As String
fname = "dod.rtf"
Set wrd_doc = GetObject(fname)
Set wrd_app = wrd_doc.Parent

Другие варианты кода с аналогичной сутью приводят к тому же.
Библиотеки вроде все подключены (см. атачмент)

mc-black · 06 июл 2009, 14:31

Буквально сегодня же и писал. В Вашей же теме. Не повторяйте, пожалуйста, один и тот же вопрос. Вы его правильно описали и уже получили ответ :-) Удачи!

Aent · 06 июл 2009, 15:43

mc-black, человек же скриншот приложил с подключенной библиотекой ...
Shas, а ошибка скорее всего, у вас возникает из-за того что вы не указали полного
пути к файлу, имя которого используется в GetObject. Насчёт повторов, mc-black
конечно же прав. Вам надо было отредактировать свой первый пост.

mc-black · 06 июл 2009, 18:36

человек же скриншот приложил с подключенной библиотекой ...

не заметил, т.к. на работе графика была отключена и не посмотрел =)

По коду: во-первых, мне не нравится GetObject, а во-вторых, я бы сначала приложение бы создал, а потом в нем файл открывал бы как-то так:

Код: Выделить всё

Set wrd_app = New Word.Application
Set wrd_doc = wrd_app.Open(strFullPathToDocument)

Shas · 06 июл 2009, 22:50

Спасибо за ответы, но проблема к сожалению осталась.
Код:
Dim wrd_app As Word.Application
Dim wrd_doc As Word.Document
Dim fname As String
fname = "dod.doc"
' ошибка выдается на следующую строку
Set wrd_app = New Word.Application
Set wrd_doc = wrd_app.Documents.Open(fname)

Ошибка "Библиотека не зарегистрирована" выдается до открытия документа ворд, так что наверное дело не в имени файла (проверял и с полным путем).
Когда в References отключаешь библиотеку "Microsoft Word 11.0 Object Library", то естественно сразу ругается на Word.Application: "User-defined type not defined" и нет подсказки методов/свойств при наборе (например, word.[список])
Подключаю - только что описанное пропадает, но появляется "Библиотека не зарегистрирована".
К слову, когда столкнулся с этой ошибкой и попробовал разные варианты кода, предположил, что у меня кривая инсталляция офиса (был Office 2003 без SP). Поставил Office 2003 SP3, а ошибка осталась.
Помогите, плиз, разобраться куда еще копать. Ведь просто на ровном месте стою!!!

mc-black · 06 июл 2009, 22:57

Переустановите Word с полным удалением, может и правда что-то перекосило с ее регистрацией - установщик вернее всего такие проблемы лечит. То что Вы описываете и правда ни в какие ворота не лезет, поверьте, у нас все совсем не так, как у Вас! Например, этим могут грешить некоторые "оптимизаторы реестра" самопального производства некоторых именитых и не очень производителей =)

Shas · 06 июл 2009, 23:24

mc-black писал(а):Переустановите Word с полным удалением, может и правда что-то перекосило с ее регистрацией - установщик вернее всего такие проблемы лечит. То что Вы описываете и правда ни в какие ворота не лезет, поверьте, у нас все совсем не так, как у Вас! Например, этим могут грешить некоторые "оптимизаторы реестра" самопального производства некоторых именитых и не очень производителей =)

Попробую переустановить офис.
Никакими левыми и правыми оптимизаторами не пользуюсь.
Операционка Vista Ultimate
--------------------------------------------------------------------------------
Добавлено сообщение
--------------------------------------------------------------------------------
Спасибо!
Проблема решилась переустановкой офиса

icecybe · 15 июл 2009, 02:08

Всем привет. Есть проблема.
Перед переустановкой винды переписали все документы на диск Д. После переустановки все документи ворд к ексели написанны зелённым цветом и доступа к ним нет. Ни переписать и ни удалить. Как я понял они зашифрованы потому что в свойствах документа стоит галочка [Шифровать содержимое для зашиты данных] и снять её никак.
Очень надо прошу помогите. Как получить к ним доступ. Документы очень важны.
Спасибо заранее.

mc-black · 15 июл 2009, 07:26

Помочь Вам вспомнить пароль?

Aent · 15 июл 2009, 11:21

mc-black, похоже у человека была EFS ...
icecybe, проблема может быть решена с помощью http://www.elcomsoft.com/aefsdr.html
Цена вопроса от 3995 р. Или на варезные порталы

Ещё рекомендую почитать для общего образования http://sa-sec.org/?p=24 раздел
"шпионские штучки".
Так же можно за приличную денежку нанять нормального сисадмина и порекомендовать ему почитать
1) http://www.xakep.ru/post/26280/default.asp
2) http://www.xakep.ru/post/26691/default.asp
В вашем случае собственно 2-ю статью (так же понадобится приватный ключ)