View Full Version : یافتن مسیر برنامه ی نصب شده
mikhak
پنج شنبه 29 اردیبهشت 1384, 12:04 عصر
سلام
با چه دستوری میتونیم مسیر برنامه رو که نصب شده پیدا کنیم؟؟
یه چیزی شبیه این "vb6.getpath"؟؟؟؟؟؟
یاشار
پنج شنبه 29 اردیبهشت 1384, 13:03 عصر
اگر منظورتون مسیر فایل اجرایی برنامه است :
Dim s As String
s = Application.ExecutablePath()
'The path and executable name for the executable file that started the application.
s = Application.StartupPath()
'The path for the executable file that started the application.
hadi2345
پنج شنبه 29 اردیبهشت 1384, 14:51 عصر
با سلام کدی که آقای یاشار نوشته اند هیچ ایرادی ندارد و عالی است . ولی از کد زیر هم میتونی استفاده کنی . در این کد من میخواهم ببینم که آیا فایل dbase.mdb در مسیر اجرایی برنامه وجود دارد یا خیر :
Dim sname As String
Dim dirname As String
Dim prodir As IO.Directory
dirname = prodir.GetParent(prodir.GetCurrentDirectory).ToStr ing
Dim myfile As New IO.FileInfo(dirname & "\dbase.mdb")
If myfile.Exists = True Then
...............
mikhak
پنج شنبه 29 اردیبهشت 1384, 18:46 عصر
tanx
vBulletin® v4.2.5, Copyright ©2000-1403, Jelsoft Enterprises Ltd.