Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Проблема с MODI / 15 сообщений из 15, страница 1 из 1
29.01.2010, 10:34
    #36437888
Usver
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема с MODI
Здравствуйте!
С некоторых пор перестал работать этот код (усеченный вариант):
Код: plaintext
Private Sub Form_Load()\n  Dim miDoc As MODI.Document\n\n      On Error Resume Next\n\n      Set miDoc = New MODI.Document\n      miDoc.Create "C:\\1.tif" \n      Me!miVwr.Document = miDoc\n      miDoc.Close\n      Set miDoc = Nothing\n    On Error GoTo  0 \n   Exit Sub\n\nForm_Error:\n\nEnd Sub\n
Взят из сканированный документ
на строчке:
Код: plaintext
Me!miVwr.Document = miDoc
пишет "ошибка 468 Объект не поддерживает свойство или метод".
Ссылка на библиотеку Microsoft Office Document Imaging 11.0 на месте.
Компиляция проходит без осложнений

Access 2003
...
Рейтинг: 0 / 0
29.01.2010, 12:40
    #36438369
Serge Gavrilov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема с MODI
Попробуйте удалить и добавить снова элемент Microsoft Office Document Imaging Viewer Control (с тем же именем)
...
Рейтинг: 0 / 0
29.01.2010, 12:59
    #36438428
Usver
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема с MODI
Serge GavrilovПопробуйте удалить и добавить снова элемент Microsoft Office Document Imaging Viewer Control (с тем же именем)
Пробовал.
Не помогает ни в моей БД, ни в примере, выложенном по ссылке в первом посте.

ps Дома работает нормально.
...
Рейтинг: 0 / 0
29.01.2010, 14:29
    #36438790
Serge Gavrilov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема с MODI
увы, я не использовал этот контрол.
Версии контрола одинаковые (дома и на работе)?
Если попробовать так
Код: plaintext
Me!miVwr.Object.Document = miDoc
...
Рейтинг: 0 / 0
29.01.2010, 14:51
    #36438864
Usver
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема с MODI
Serge Gavrilovувы, я не использовал этот контрол.
Версии контрола одинаковые (дома и на работе)?
А как проверить? В диалоге референсов путь длинный, до конца не видно, я даже не знаю имя файла библиотеки
Если попробовать так
Код: plaintext
Me!miVwr.Object.Document = miDoc

Не работает.
...
Рейтинг: 0 / 0
29.01.2010, 14:54
    #36438873
Serge Gavrilov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема с MODI
C:\Program Files\Common Files\Microsoft Shared\MODI\11.0\MDIVWCTL.DLL
...
Рейтинг: 0 / 0
29.01.2010, 16:22
    #36439163
VladimirKr
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема с MODI
UsverSerge Gavrilovувы, я не использовал этот контрол.
Версии контрола одинаковые (дома и на работе)?
А как проверить? В диалоге референсов путь длинный, до конца не видно, я даже не знаю имя файла библиотеки
Если попробовать так
Код: plaintext
Me!miVwr.Object.Document = miDoc

Не работает.

Не знаком со свойствами данного объекта. Но если вы присваиваете ссылку на объект, нужно писать так:
Код: plaintext
Set Me!miVwr.Object.Document = miDoc

Или вы присваиваете свойство miDoc.Value?
...
Рейтинг: 0 / 0
29.01.2010, 17:43
    #36439412
Usver
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема с MODI
VladimirKr

Не знаком со свойствами данного объекта. Но если вы присваиваете ссылку на объект, нужно писать так:
Код: plaintext
Set Me!miVwr.Object.Document = miDoc

Или вы присваиваете свойство miDoc.Value?

Не вникая, попробовал предложенное. Не фунциклирует.
Однако! Код в первом посте работал!!! Взят он был, как я писал ранее здесь: сканированный документ

Кстати, проектом давно не занимался, запамятовал: дома попробовал, тоже перестал работать.
Свойства объекта: это вот это?:
...
Рейтинг: 0 / 0
29.01.2010, 22:57
    #36439728
Serge Gavrilov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема с MODI
VladimirKr
Не знаком со свойствами данного объекта. Но если вы присваиваете ссылку на объект, нужно писать так:
Код: plaintext
Set Me!miVwr.Object.Document = miDoc

В моем случае с Set выдает ошибку, а без Set работает
...
Рейтинг: 0 / 0
30.01.2010, 12:01
    #36439964
Usver
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема с MODI
Ладно, буду пытаться обойтись без MODI.
Может, кто подбросит идеи: в базе реализовано что-то типа ACDSee для просмотра факсов.
Хотелось бы иметь из функционала вращение, масштабирование картинок, "таскание" картинки по окну просмотра с помощью мышки (без полосок прокрутки).
...
Рейтинг: 0 / 0
30.01.2010, 13:08
    #36440004
Guest33
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема с MODI
У меня Ваш код из 1-го поста работает. Попробуйте удалить miVwr контрол и добавить новый (лучше на копии базы).
...
Рейтинг: 0 / 0
30.01.2010, 20:36
    #36440413
Usver
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема с MODI
Продолжил эксперимент:
на виртуальной машине (XP) установил Acss 2003, запускаю- все работает.
Вывод: копать надо в системе. В какую сторону- не представляю
...
Рейтинг: 0 / 0
30.01.2010, 23:30
    #36440557
regsvr32
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема с MODI
Может перерегистрировать библиотеку?
Может антивирус?
...
Рейтинг: 0 / 0
30.01.2010, 23:53
    #36440567
Usver
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема с MODI
regsvr32Может перерегистрировать библиотеку?
Может антивирус?
Антивира нет, а как библиотеку перерегистрировать?
...
Рейтинг: 0 / 0
Период между сообщениями больше года.
11.12.2015, 09:05
    #39125523
DMITRY_PEREDISTY
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема с MODI
Usver,
лучше поздно чем никогда :)
http://www.pcmag.ru/solutions/detail.php?ID=5835
...
Рейтинг: 0 / 0
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Проблема с MODI / 15 сообщений из 15, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]