| Как получить путь к EXE файлу программы |
|
Public Function GetEXEPath() As String Dim s As String s = App.Path If Right(s, 1) <> "\" Then s = s & "\" GetEXEPath = s & App.EXEName & ".exe" End Function |
| « Пред. | След. » |
|---|
Главная Библиотека кодов Другое Как получить путь к EXE файлу программы |
07.01.2009 г. |
| designed by rgb(raduga) finished by Administrator | |||||||