Rambler's Top100
Форум: MS ACCESSVBVBA MS OfficeMS SQL server
Новые сообщения: 0000

Форум: MS ACCESS

Вопросы связанные с MS ACCESS

Обновить визитку
Участники «Online»
Все участники

 
 

Доброго времени суток, Посетитель!

вид форума:
Линейный форум Структурный форум

тема: открыть объект ОЛЕ программно
 
 автор: miami   (15.07.2008 в 10:59)   личное сообщение
 
 

Добрый вечер, есть небольшая проблемка.
По запросу данные отображаются списком, из списка выбирается нужное и по DoubleClick выбиратся нужное.Дело в том что, у каждой записи прикреплен объек ОЛЕ - MsWord и нужно чтоб по двойному сщелчку этот самый документ открывался как вордовский файл (так же как, например, если открывать его просто из таблицы).
Помогите это реализовать.
Заранее спасибо :)

  Ответить  
 
 автор: osmor   (15.07.2008 в 11:06)   личное сообщение
 
 

сделайте в форме скрытую рамку присоединенного OLE
на событие когда нужно открыть пишите код

me!ПолеCOLE.Action = acOLEActivate

  Ответить  
 
 автор: Miami   (15.07.2008 в 11:50)   личное сообщение
43 Кб.
 
 

спасибо, что откликнулись!
делал по Вашему совету, но в этом случае объект открывается только в этой рамке и не как полноценный Ворд - документ.
Вот смотрите скриншот для наглядности.
Из такого списка выбирается нужняа строка и необходимо, чтоб при выборе открывался относящийся к нему ОЛЕ файл..

  Ответить  
 
 автор: Bellerofont   (15.07.2008 в 12:14)   личное сообщение
 
 

См Help к свойству Verb
me!ПолеCOLE.Verb = acOLEVerbOpen

  Ответить  
 
 автор: FORMAT   (15.07.2008 в 14:02)   личное сообщение
 
 

Private Sub Form_Open(Cancel As Integer)

Me.ole.Class = "Word.Document.8"
Me.ole.OLETypeAllowed = acOLELinked
Me.ole.SourceDoc = "C:\Что-то там.doc"
Me.ole.Action = acOLECreateLink

End Sub

ole – имя элемента управления

  Ответить  
 
 автор: Miami   (15.07.2008 в 16:20)   личное сообщение
 
 

Всем кто откликнулся спасибо. Правда сделал не точь-в-точь как Вы советовали, зато помогли разобраться. Щас все работает как надо :)))

  Ответить  
HiProg.com - Технологии программирования
Rambler's Top100 TopList