Как перееписать путь

maksim177

Добрый день! На работе пользовался самописной программой (на Access) по учету заданий для сотрудников.Программа "Планерка" состоит из двух частей - форм и базы. База лежала в сети. Я скопировал всю базу и формы на флешку. Установил дома на компе. Но вот незадача- в этой программе для базы прописан путь, который посылает ее на сетевой ресурс. Подскажите как перепрописать путь, ведь база у меня есть. Хотелось бы настроить путь таким образом, чтобы интерфейс и база была в одной папке и прогу можно было переносить на флешке, а также ставить товарищам на их компы. Пробовал в меню "Сервис" команду "Служебные программы" и подкоманду "Диспетчер связанных таблиц" она неактивна.
3 ответа

maksim177

Пробовал в меню "Сервис" команду "Служебные программы" и подкоманду "Диспетчер связанных таблиц" она неактивна.
чего это ?
Подскажите как перепрописать путь, ведь база у меня есть. Хотелось бы настроить путь таким образом, чтобы интерфейс и база была в одной папке и прогу можно было переносить на флешке, а также ставить товарищам на их компы.
а "файл форм", хоть, не скомпилированный ? НЕ mde/accde ?если нет - то можно программносоздайте в файле форм такую функцию
Function ReLink()
 Dim db As DAO.Database
 Dim td As DAO.TableDef
 Dim PathFileBD As String
 '
 PathFileBD = CurrentProject.Path & <span>"\ИмяФайлаСТаблицами.mdb"</span>
 Set db = CurrentDb
 For Each td In db.TableDefs
 If td.Attributes And dbAttachedTable Then
 td.Connect = ";DATABASE=" & PathFileBD
 End If
 Next
 Set db = Nothing
End Function
и вызывайте когда нужно пересвязать таблицы... или просто, задайте выполнение этой функции в макросе AutoExec - тогда всегда будет перелинковывать при запуске


maksim177

чего это ?
может быть путь к внешним таблицам с флэшки не переписывается.вполне реально


maksim177

qwerty112maksim177Пробовал в меню "Сервис" команду "Служебные программы" и подкоманду "Диспетчер связанных таблиц" она неактивна.чего это ?
пичаль... аднако...