Страница: 1 |
Вопрос: Определить путь | Добавлено: 07.01.08 22:47 |
Автор вопроса: ![]() |
Уважаемые! пишу прогу для себя, но тут возникла проблема. Для решения необходимо понять: как узнать полный путь экзешника, т.е. как в форме определить путь откуда она была запущена? вроде так)) Спасибо! |
Ответы | Всего ответов: 10 |
Номер ответа: 1 Автор ответа: ![]() ![]() ![]() ICQ: 298826769 Вопросов: 53 Ответов: 1732 |
Профиль | Цитата | #1 | Добавлено: 08.01.08 00:06 |
App.Path |
Номер ответа: 2 Автор ответа: ![]() ![]() Вопросов: 3 Ответов: 13 |
Профиль | Цитата | #2 | Добавлено: 08.01.08 11:57 |
но App.Path возвращает директорию, а как узнать и имя самого exe? |
Номер ответа: 3 Автор ответа: ![]() ![]() ![]() ICQ: 298826769 Вопросов: 53 Ответов: 1732 |
Профиль | Цитата | #3 | Добавлено: 08.01.08 13:51 |
App.EXEName |
Номер ответа: 4 Автор ответа: ![]() ![]() Вопросов: 3 Ответов: 13 |
Профиль | Цитата | #4 | Добавлено: 08.01.08 18:31 |
Выручил, спасибо! |
Номер ответа: 5 Автор ответа: ![]() ![]() ![]() ![]() ![]() Вопросов: 1 Ответов: 4 |
Профиль | Цитата | #5 | Добавлено: 16.01.08 09:33 |
Если не трудно, а как узнать путь к своей .mdb/mde БД? |
Номер ответа: 6 Автор ответа: ![]() ![]() ![]() ICQ: 298826769 Вопросов: 53 Ответов: 1732 |
Профиль | Цитата | #6 | Добавлено: 16.01.08 09:44 |
хм... так база там же, где и приложение?
App.Path & "\ИмяБазы.mdb"
|
Номер ответа: 7 Автор ответа: ![]() ![]() ![]() ICQ: 308-534-060 Вопросов: 20 Ответов: 1860 |
Web-сайт: Профиль | Цитата | #7 | Добавлено: 16.01.08 15:50 |
Директория текущей базы в Access определяется так:
CurrentProject.Path
Например, Option Compare Database
Option Explicit Sub GetPath() Debug.Print CurrentProject.Path End Sub |
Номер ответа: 8 Автор ответа: ![]() ![]() ![]() ICQ: 308-534-060 Вопросов: 20 Ответов: 1860 |
Web-сайт: Профиль | Цитата | #8 | Добавлено: 16.01.08 15:56 |
Имя файла базы данных Access:
Option Compare Database
Option Explicit Sub GetPath() If Len(CurrentProject.Path) > 3 Then Debug.Print CurrentProject.Path & "\" & CurrentProject.Name Else 'Для корневой папки есть свои правила ![]() Debug.Print CurrentProject.Path & CurrentProject.Name End If End Sub |
Номер ответа: 9 Автор ответа: ![]() ![]() Вопросов: 3 Ответов: 13 |
Профиль | Цитата | #9 | Добавлено: 26.01.08 12:36 |
Replace(App.Path & "\ИмяБазы.mdb", ":\\", ":\"![]() Вот так, лучше наверное |
Номер ответа: 10 Автор ответа: ![]() ![]() ![]() ICQ: 308-534-060 Вопросов: 20 Ответов: 1860 |
Web-сайт: Профиль | Цитата | #10 | Добавлено: 27.01.08 19:04 |
можно и так, да вообще какой идиот будет базу в корневую директорию кидать. это довольно частный случай. |
Страница: 1 |
|