Вообщем проблема такая.
Есть МДБ-шка которую постоянно таскают с места на место, в ней прописана куча связей с таблицами. Таблицы таскают вместе с ней.
Хотелось бы, чтобы связи также меняли свои пути, как это дело автоматизировать.
Т.е. там скажем 40 таблиц и 10 разных путей, надо их корректировать, чтобы отладочная версия не поганиля реальные таблицы.

А заменить абсоютные пути на относительные не пробовали?

Да там через Ж... все сделано. Если уж там три разных мдб-шки с одним именем....
У меня тут возник вариант сделать сетевой диск и к разным папкам его привязывать, но все равно в рабочей версии до кучи всяких разных путей.
А скриптик никакой нельзя наваять для переключалки, мне бы конено удобнее на дельфи но и не ВБ пойдет.
А так файлик переписал, кнопочку нажал и красота....

Ну тогда:
1) Поясни, что это за "Таблицы таскают вместе с ней"... куча отдельных MDB или там еще что-то понаворочано?
2) Почему бы не сделать программную настройку - одна большая форма с перечислением требуемых файлов и возможностью задания их имени-пути? с сохранением в системной таблице с привязкой к станции или даже в реестр загонять...
3) Почему не сделать программный Connection на нужные таблицы?
4) Почему не сделать промежуточную, индивидуальную для каждой станции или даже конфигурации, привязывающую БД?

В общем вопросов больше чем ответов...

Да, кстати...

Цитата(MS)

Просмотр, обновление или изменение имени файла и пути для связанных таблиц (MDB) Просмотр или обновление связей Следующая процедура используется для просмотра или обновления связей после изменения структуры или расположения связанной таблицы. Диспетчер связанных таблиц выводит список путей к текущим связанным таблицам. Откройте базу данных, содержащую связи с таблицами. Выберите в меню Сервис команду Служебные программы и подкоманду Диспетчер связанных таблиц. Установите флажки для таблиц, связи с которыми требуется обновить. Нажмите кнопку OK для обновления выбранных связей. Microsoft Access подтверждает успешное обновление или, если таблица не найдена, выводит на экран диалоговое окно Выбор нового расположения <имя таблицы>, в котором можно указать новое расположение таблицы. Если в новое указанное расположение были перемещены несколько выбранных таблиц, диспетчер связанных таблиц выполняет поиск всех выбранных таблиц и обновляет все связи сразу. Изменение пути к набору связанных таблиц Откройте базу данных, содержащую связи с таблицами. Выберите в меню Сервис команду Служебные программы и подкоманду Диспетчер связанных таблиц. Установите флажок Всегда выдавать запрос нового местонахождения. Установите флажки для таблиц, связи с которыми требуется изменить, а затем нажмите кнопку OK. В диалоговом окне Выбор нового расположения: <имя таблицы> укажите новое расположение, нажмите кнопку Открыть, а затем кнопку OK. Примечания Диспетчер связанных таблиц не перемещает файлы баз данных или таблиц. Для получения дополнительных сведений о перемещении файла базы данных или таблицы в новое расположение воспользуйтесь справочной системе Microsoft Windows. После перемещения базы данных или таблицы можно воспользоваться диспетчером связанных таблиц для обновления связей. Диспетчер связанных таблиц не может обновлять связи с таблицами Microsoft Access, имена которых были изменены после связывания. В таких случаях необходимо удалить текущую связь, а затем связать таблицы повторно. Сведения в данном разделе относятся только к базам данных Microsoft Access (.mdb). Связать таблицу можно только в базе данных Microsoft Access, но не в проекте Microsoft Access.

Цитата

Ну тогда: 1) Поясни, что это за "Таблицы таскают вместе с ней"... куча отдельных MDB или там еще что-то понаворочано?

Плохо понял, что значит, что-нибудь еще наворочено. Вроде просто куча отдельных мдбшек.

Цитата

2) Почему бы не сделать программную настройку - одна большая форма с перечислением требуемых файлов и возможностью задания их имени-пути? с сохранением в системной таблице с привязкой к станции или даже в реестр загонять... 3) Почему не сделать программный Connection на нужные таблицы? 4) Почему не сделать промежуточную, индивидуальную для каждой станции или даже конфигурации, привязывающую БД?

Потому что нельзя менять сам продукт, это должно выполняться только программой извне.

Цитата

В общем вопросов больше чем ответов... Да, кстати...

Цитата

Цитата (MS Access Help) Просмотр, обновление или изменение имени файла и пути для связанных таблиц (MDB) Просмотр или обновление связей Следующая процедура используется для просмотра или обновления связей после изменения структуры или расположения связанной таблицы. Диспетчер связанных таблиц выводит список путей к текущим связанным таблицам. Откройте базу данных, содержащую связи с таблицами. Выберите в меню Сервис команду Служебные программы и подкоманду Диспетчер связанных таблиц. Установите флажки для таблиц, связи с которыми требуется обновить. Нажмите кнопку OK для обновления выбранных связей. Microsoft Access подтверждает успешное обновление или, если таблица не найдена, выводит на экран диалоговое окно Выбор нового расположения <имя таблицы>, в котором можно указать новое расположение таблицы. Если в новое указанное расположение были перемещены несколько выбранных таблиц, диспетчер связанных таблиц выполняет поиск всех выбранных таблиц и обновляет все связи сразу. Изменение пути к набору связанных таблиц Откройте базу данных, содержащую связи с таблицами. Выберите в меню Сервис команду Служебные программы и подкоманду Диспетчер связанных таблиц. Установите флажок Всегда выдавать запрос нового местонахождения. Установите флажки для таблиц, связи с которыми требуется изменить, а затем нажмите кнопку OK. В диалоговом окне Выбор нового расположения: <имя таблицы> укажите новое расположение, нажмите кнопку Открыть, а затем кнопку OK. Примечания Диспетчер связанных таблиц не перемещает файлы баз данных или таблиц. Для получения дополнительных сведений о перемещении файла базы данных или таблицы в новое расположение воспользуйтесь справочной системе Microsoft Windows. После перемещения базы данных или таблицы можно воспользоваться диспетчером связанных таблиц для обновления связей. Диспетчер связанных таблиц не может обновлять связи с таблицами Microsoft Access, имена которых были изменены после связывания. В таких случаях необходимо удалить текущую связь, а затем связать таблицы повторно. Сведения в данном разделе относятся только к базам данных Microsoft Access (.mdb). Связать таблицу можно только в базе данных Microsoft Access, но не в проекте Microsoft Access.

Это я нашел, я так тоже могу, но только не знаю как можно это использовать из другого приложения (утилиты).

Цитата(Bes @ 5.4.2005, 07:55)

нельзя менять сам продукт, это должно выполняться только программой извне

тогда надо как минимум точно знать как именно сделана привязка в продукте, который "нельзя менять"...

Ну дак точно известно. Обычно таблицы-создать-связь с таблицами.
Не программно, ни через другие таблицы. Все просто.
Вообщем, вроде как я это знаю, если правильно понял вопрос. Чего дальше?

Посмотри TableDef.RefreshLink

Я написал функцию в VB которая при запуске устанавливает связь с таблицей

Код

' Создание связей с внешней базои с предварительной проверкой существования этой связи ' 1 Название таблицы для проверки ' 2,3 Название внешней базы и таблицы Public Function CreatLink(pNameTabl As String, pBase As String, pOrigTabl) As Integer     Dim vTabl As TableDef     On Error Resume Next     CreatLink = 0     '- - - - - Проверка существования доступа к таблице     For Each vTabl In MainBase.TableDefs         If (vTabl.Name = pNameTabl) Then             DoCmd.DeleteObject acTable, pNameTabl             MainBase.TableDefs.Refresh             Exit For         End If     Next vTabl            '- - - - - - Установить связь     If (IsFile(pBase) = True) Then         DoCmd.TransferDatabase acLink, "Microsoft Access", pBase, acTable, pOrigTabl, pNameTabl         MainBase.TableDefs.Refresh                      '- - - - - Проверка установления таблицы         For Each vTabl In MainBase.TableDefs             If (vTabl.Name = pNameTabl) Then                  CreatLink = 1                  Exit Function             End If         Next vTabl     End If End Function

Это сообщение отредактировал(а) Akina - 12.4.2005, 07:44

Ммм..... скопируй это еще раз на русском шрифте.

Здравствуйте. 
У меня похожая проблема.
Я создал небольшую аля программулину для создания отчетов за различные периоды. закрыл доступ ко всему через параметры запуска кроме кномпки Ф11 про которую у меня на работе мало кто знает. но все было бы хорошо, но вот возникает подобный заданому вопрос.
У меня связаные таблицы работают через ODBC драйвера и при переносе на новую машину возникает проблема с обновлением связанных таблиц. Такая же проблема возникает и даже при заходе другого пользователя на эту же машину. 
Подскажите каким образом можно с помощью кнопки на форме вызвать обновление связанных таблиц?

Ответ есть в теме - прочтите ее более внимательно.
Для выбора путей к новым связанным таблицам поместите на форму и используйте CommonDialog.

Эххх.... дарю:
Вызови ее с правильным путем при старте....