Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Для знатоков, не оставьте без внимания. / 7 сообщений из 7, страница 1 из 1
14.11.2002, 07:30
    #32067753
VC
VC
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Для знатоков, не оставьте без внимания.
Необходимо присоединять объект OLE в таблицу (снимок). ПРиходится каждый раз дествовать через меню-вставка-объект. Единственное что нужно менять так это сам файл, все остальные настройки одинаковые (из файла, связь, в виде значка и т.д.).
Можно ли делать это программно? Менять настройки диалога или вообще без вызова диалога вставки объекта.
Сам нашел только через
SendKeys
DoCmd.DoMenuItem acFormBar, 3, 1, , acMenuVer70
DoCmd.RunCommand acCmdInsertObject
Но это все не то, выводится сам диалог, к настройкам доступа нет.
Кто знает как это сделать помогите.
Достало каждый раз париться одни и теже кнопки жать.
Access2000
...
Рейтинг: 0 / 0
14.11.2002, 09:55
    #32067792
alk
alk
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Для знатоков, не оставьте без внимания.
с этими оле вообще беда -

1. хранятся в несжатом виде . даже jpg внедренная через оле вырастает до размеров bmp

2. в 97, 2000 - работает а в XP какие- то проблемы с регистрацией библиотек.

3. Я не нашел другого способа автоматизации вставки и обработки объектов оле программным способом кроме как создать форму в нее поле оле - объекта и все операции уже с ним.

в общем все убого .
на мой взгляд более привлекательно заливать в таблицу непосредственно содержимое файла, при необходимости восстанавливать файл на диске и все действия уже с ним,
но я пока не пробовал такой способ, если кто делал - пишите это интересно.
...
Рейтинг: 0 / 0
14.11.2002, 13:12
    #32067881
наутилус
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Для знатоков, не оставьте без внимания.
я тоже через форму вставлял 8((..
...
Рейтинг: 0 / 0
15.11.2002, 04:39
    #32068162
VC
VC
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Для знатоков, не оставьте без внимания.
В том-то все и дело, что только через форму и получается
А вот как программно это сделать, ребус....:(((
...
Рейтинг: 0 / 0
15.11.2002, 12:43
    #32068314
ALK
ALK
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Для знатоков, не оставьте без внимания.
программно открываешь форму
программно управляешь контролом
...
Рейтинг: 0 / 0
15.11.2002, 16:15
    #32068443
Ingvar68
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Для знатоков, не оставьте без внимания.
Function OF()
Dim rst As DAO.Recordset
Dim what As String * 1
Dim i As Long
Dim midi As String
Close #1
Open "c:\common\all.exp\main.mid" For Binary As #1
i = 1
Do While Not EOF(1)
Get #1, i, what
midi = midi & what
i = i + 1
Loop
Close #1
Set rst = CurrentDb.OpenRecordset("OBJECTS")
rst.AddNew
rst![OBJECTT].AppendChunk midi
rst.Update
End Function
...
Рейтинг: 0 / 0
15.11.2002, 16:34
    #32068452
alk
alk
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Для знатоков, не оставьте без внимания.
2 Ingvar68

заливка бинарного файла в поле это клево.

а как его потом обратно положить? у меня в начале файла вписывает какую - то муть...
...
Рейтинг: 0 / 0
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Для знатоков, не оставьте без внимания. / 7 сообщений из 7, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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