VBNet - Форум - Определить путь

Вопрос: Определить путь Добавлено: 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 Автор ответа: Arseny ICQ: 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 Автор ответа: Arseny ICQ: 298826769 Вопросов: 53 Ответов: 1732	Профиль \| Цитата \| #6	Добавлено: 16.01.08 09:44
	хм... так база там же, где и приложение? App.Path & "\ИмяБазы.mdb" Ответить

Номер ответа: 7 Автор ответа: mc-black ICQ: 308-534-060 Вопросов: 20 Ответов: 1860	Web-сайт: mc-black.narod.ru/dzp.htm Профиль \| Цитата \| #7	Добавлено: 16.01.08 15:50
	Директория текущей базы в Access определяется так: CurrentProject.Path Например, Option Compare Database Option Explicit Sub GetPath() Debug.Print CurrentProject.Path End Sub Ответить

Номер ответа: 8 Автор ответа: mc-black ICQ: 308-534-060 Вопросов: 20 Ответов: 1860	Web-сайт: mc-black.narod.ru/dzp.htm Профиль \| Цитата \| #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-black ICQ: 308-534-060 Вопросов: 20 Ответов: 1860	Web-сайт: mc-black.narod.ru/dzp.htm Профиль \| Цитата \| #10	Добавлено: 27.01.08 19:04
	можно и так, да вообще какой идиот будет базу в корневую директорию кидать. это довольно частный случай. Ответить

Страница: 1 |