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

Форум: MS ACCESS

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

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

 
 

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

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

тема: Диспетчер связанных таблиц
 
 автор: kot_k_k   (22.06.2010 в 21:57)   личное сообщение
 
 

собствено вопрос можно ли заменить Диспетчер связанных таблиц - задавать при загрузке файла путь к файлу в котором лежат связанные таблы?

о чем это я?
когда разрабатыеваешь работаешь с файлом который лежит на компе чтобы не портить общую базу, а когда раздаешь юзерам приходится по новой в диспетчере переустанавливать.
возможно ли прописать один раз в коде путь к таблам (фалу) к которому нужно присоеденяться и кнопкой вызывать процедуру перелинковки чтобы не лезть в диспетчер?

а также кодом устанавливать параметры запуска?????

  Ответить  
 
 автор: Lukas   (22.06.2010 в 22:16)   личное сообщение
 
 

1. Да. Примеры есть здесь, например
http://hiprog.com/index.php?option=com_content&task=view&id=416&Itemid=35
и на сайте Андрея Митина вроде есть.
2. Да. Кое-что есть здесь:
http://hiprog.com/index.php?option=com_content&task=view&id=251661647&Itemid=35
типа:

        With CurrentDb
            bolValue = ...
            .Properties("StartUpShowDBWindow") = bolValue
            .Properties("StartUpShowStatusBar") = bolValue
            .Properties("AllowFullMenus") = bolValue
            .Properties("AllowBuiltInToolbars") = bolValue
            .Properties("AllowToolbarChanges") = bolValue
            .Properties("AllowSpecialKeys") = bolValue
        End With

  Ответить  
 
 автор: kot_k_k   (22.06.2010 в 22:35)   личное сообщение
 
 

спасибо доктор - пациент будет разбираться

  Ответить  
 
 автор: kot_k_k   (24.06.2010 в 10:49)   личное сообщение
 
 

иногда чувствую себя законченным идиотом.

сколько уже льет пользуясь диспетчером ожидал перелинковки, вся база давольно долговастенько перелинковывалвсь, вот создал прграмно но она также долго обновляется, поутру решил - а вдруг?
дописал перед линковкой

Set wsp = DBEngine.Workspaces(0)
Set dbs = wsp.OpenDatabase("\\Ad-dns-01\sklad\Baza.mdb") ' открыл базу источник

запустил

подумал, еще раз подумал

после чего сказал себе - мудак ты Котя, время уменьшилось в разы!!!

  Ответить  
 
 автор: час   (26.06.2010 в 22:29)   личное сообщение
 
 

подумал, еще раз подумал

после чего сказал себе -
Юморист ты Костя!!!!!!!!!!!!

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