| Author |
 Topic  |
|
|
Gaff
Russia
14 Posts |
 Posted - 10/21/2004 : 10:17:36
|
Не подскажите, как мне перенести в ацессовскую базу данных информацию о том, что у меня соединены допустим 2 шейпа. В строке коннектора должны появиться 2 поля, которые содержат текст каждого их этих шейпов.
Заранее спасибо. |
|
|
Tumanov
Russia
1198 Posts |
Posted - 10/21/2004 : 16:49:41
|
Немного подскажем.
Задача распадается на две:
1. Передать в шейп коннектора тексты связанных с ним шейпов.
2. Передать эту информацию из коннектора дальше в базу.
Для хранения текста смежных шейпов в шейпе коненктора придется завести пару пользовательских свойств. Информацию туда записывать придется макросом. Доступ к смежным шейпам организуется через коллекцию Connects
Типа ШейпКоннектор.Connects(1).ToSheet.Text и ШейпКоннектор.Connects(2).ToSheet.Text
Когда запускать этот макрос - это уже зависит от конкретной задачи: в момент коннекта, по специальной клавише, из меню шейпа и т.д.
Для связи коненктора с базой проще всего пользоваться поставляемыми макросами Database Wizard, Link To Database, Database Update...
Они помогут связать шейп или мастер-шейп через ODBC с конкретной таблицей, назначить соответствие полей и ключевое поле. Заодно и добавят в шейп специальной меню. Дальше останется только в нужный момент щелкнуть по этому меню и информация связанных шейпов окажется в нужной строке (экземпляр шейпа ставится в соответствие строке базы).
Вместо этих макросов, естественно, можно написать свой макрос, который сможет сразу не только доставать тексты из шейпов, но и записывать их в базу. Здесь уже можно использовать любой способ, каким VBA может общаться с базой. |
 |
|
| |
Topic |
|
|
|
All Forums
Коннекторы