2017-01-23 8 views
0

У меня есть следующий код:Компактные базы данных с помощью переменной

Dim location As String 
location = DLookup("[db_location]", "locationandsetup") 

DBEngine.CompactDatabase "'" & location & "'\ReadinessDatabase_Backend.accdb", "'" & location & "'\ReadinessDatabase_Backup.accdb" 

Когда я положил его в действие он говорит «не является допустимым именем файла». Имя файла верное, а переменная «location» показывает правильное местоположение, поэтому я не могу понять, почему он говорит, что это не допустимое имя файла. Есть идеи?

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

Edit: db_location путь Locationandsetup является таблица

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

ответ

1

обирать цитаты:

DBEngine.CompactDatabase location & "\ReadinessDatabase_Backend.accdb", location & "\ReadinessDatabase_Backup.accdb" 
+0

Спасибо. Я продолжаю забывать о разных командах и о том, как они работают с переменными. – user2002716