| Вопрос: Определить путь | Добавлено: 07.01.08 22:47 |
Автор вопроса:  Destem
|
| Уважаемые! пишу прогу для себя, но тут возникла проблема. Для решения необходимо понять: как узнать полный путь экзешника, т.е. как в форме определить путь откуда она была запущена? вроде так)) Спасибо! |
| Ответы | Всего ответов: 10 |
|
Номер ответа: 1 Автор ответа:  Arseny ICQ: 298826769 Вопросов: 53 Ответов: 1732 |
Профиль | | #1 | Добавлено: 08.01.08 00:06 |
| App.Path | ||
|
Номер ответа: 2 Автор ответа: Destem Вопросов: 3 Ответов: 13 |
Профиль | | #2 | Добавлено: 08.01.08 11:57 |
| но App.Path возвращает директорию, а как узнать и имя самого exe? | ||
|
Номер ответа: 3 Автор ответа: ArsenyICQ: 298826769 Вопросов: 53 Ответов: 1732 |
Профиль | | #3 | Добавлено: 08.01.08 13:51 |
| App.EXEName | ||
|
Номер ответа: 4 Автор ответа: DestemВопросов: 3 Ответов: 13 |
Профиль | | #4 | Добавлено: 08.01.08 18:31 |
| Выручил, спасибо! | ||
|
Номер ответа: 5 Автор ответа: Doc_i Вопросов: 1 Ответов: 4 |
Профиль | | #5 | Добавлено: 16.01.08 09:33 |
| Если не трудно, а как узнать путь к своей .mdb/mde БД? | ||
|
Номер ответа: 6 Автор ответа: ArsenyICQ: 298826769 Вопросов: 53 Ответов: 1732 |
Профиль | | #6 | Добавлено: 16.01.08 09:44 |
|
хм... так база там же, где и приложение?
App.Path & "\ИмяБазы.mdb"
|
||
|
Номер ответа: 7 Автор ответа: mc-blackICQ: 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 Автор ответа: mc-blackICQ: 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 Автор ответа: DestemВопросов: 3 Ответов: 13 |
Профиль | | #9 | Добавлено: 26.01.08 12:36 |
Replace(App.Path & "\ИмяБазы.mdb", ":\\", ":\"
Вот так, лучше наверное |
||
|
Номер ответа: 10 Автор ответа: mc-blackICQ: 308-534-060 Вопросов: 20 Ответов: 1860 |
Web-сайт: Профиль | | #10 | Добавлено: 27.01.08 19:04 |
| можно и так, да вообще какой идиот будет базу в корневую директорию кидать. это довольно частный случай. | ||
Страница: 1 |