Проблема с БД при создании инсталлятора

@Pashka · Регистрация: 15.12.2009

Студворк — интернет-сервис помощи студентам

Привет. У меня возникла небольшая проблемка. Написал я програмку которая в работе обращается к БД ACCESS подключение выглядит таким образом

Visual Basic
1
2
3
4
5
Dim Db As DAO.Database
Dim Rs As DAO.Recordset
Set Db = DAO.OpenDatabase('C:NDataDetMater')
sSQL = 'SELECT DISTINCT N1, N2, N3, N4, N5, N6, N7 FROM sver'        
Set Rs = Db.OpenRecordset(sSQL)

Создал я инстальник для своей программы. И тут возникла проблемка связанная с тем что я указал жестко путь в программном коде. После инсталляции программы в другой каталог программа естественно не находит БД по указанному пути.
Вопрос: Подскажите каким образом мне нужно было указывать путь к БД чтобы небыло таких проблем.

@PMSSpy · 08.03.2011, 10:33

Code
1
2
ap = App.Path
If Not Right(ap, 1) = ' ' then ap = ap + ' '

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

например, открытие базы:

Code
1
Set db = ADO.Opendatabase(ap + 'DataDetMater.mdb')

ВНИМАНИЕ! Проверяйте количество слэшей. По-умолчанию, код автоматически доавбляет в конец переменной ap символ ' '

Удачи

08.03.2011, 12:24

Я вообще не указываю где находится БД. Просто как было выше указано, ложу чистую Бд в корень программы. Потом пишу функцию прописки в реестр пути к БД(по умолчанию ставлю App.Path & '***' - имя файла БД, тока соединяю я это через FSO).А в коде в строке соединения вызываю эту функцию... она смотрит реестр, если там пусто то берет из корня. Но единственно .. надо будет добавить форму(или в форму) настройки. выбор пути к БД с его сохранением.

@Konst_one · 08.03.2011, 12:28

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

08.03.2011, 12:30

Visual Basic
1
2
3
4
5
6
7
Set Db = DAO.OpenDatabase('C:NDataDetMater')
 
public function Путь() as string
   Путь=GetSetting('***','***','БД',FSO(App.Path,'Имя Бд'))
end function
 
Set Db = DAO.OpenDatabase(Путь())' добавляю скобки к Ф чтоб помнить что она чтото возращает :-)

Если не знаете что такое FSO, то лучше почтитать про эту библу.. даже тут на форуме есть про нее.

@Pashka · 09.03.2011, 12:03 **[ТС]**

Спасибо за советы все получилось

Новые блоги и статьи Все статьи Все блоги /
Контроль заполнения и очистка дат в зависимости от значения перечислений Maks 12.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .	Архитектура слоя интернета для сервера-слоя. Hrethgir 11.04.2026 В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .	Подстановка значения реквизита справочника в табличную часть документа Maks 10.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .	Очистка реквизитов документа при копировании Maks 09.04.2026 Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .
модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий anaschu 08.04.2026 https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI	Блокировка документа от изменений, если он открыт у другого пользователя Maks 08.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .	Система безопасности+живучести для сервера-слоя интернета (сети). Двойная привязка. Hrethgir 08.04.2026 Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .	Модель ЗдрввоСохранения 7: больше работников, больше ресурсов. anaschu 08.04.2026 работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20% kYBz3eJf3jQ

Сумрак
	08.03.2011, 12:24
	Я вообще не указываю где находится БД. Просто как было выше указано, ложу чистую Бд в корень программы. Потом пишу функцию прописки в реестр пути к БД(по умолчанию ставлю App.Path & '***' - имя файла БД, тока соединяю я это через FSO).А в коде в строке соединения вызываю эту функцию... она смотрит реестр, если там пусто то берет из корня. Но единственно .. надо будет добавить форму(или в форму) настройки. выбор пути к БД с его сохранением.

@Konst_one 2 / 2 / 1 Регистрация: 19.07.2007 Сообщений: 737
	08.03.2011, 12:28
	господа, обычно делается настройка в программе, в которой задается путь к файлу базы 0

@Pashka 0 / 0 / 0 Регистрация: 15.12.2009 Сообщений: 84
	09.03.2011, 12:03 [ТС]
	Спасибо за советы все получилось 0