با سلام تابع دایرکتوری ویندوز و همچنین دایرکتوری یه برنامه رو چطور می توان به دست آورد.
Printable View
با سلام تابع دایرکتوری ویندوز و همچنین دایرکتوری یه برنامه رو چطور می توان به دست آورد.
سلام
کد زير دايرکتوري برنامه را بر مي گرداند:
App.Path
و در مورد directory مربوط به windows کد زير را دانلود بزنيد و استفاده نماييد:
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]
موفق باشيد :wink:
سلام
از تابع APi میتونی استفاده کنی،به این صورت که تابع زیر را در یک ماژول تعریف میکنی
Public Declare Function GetWindowsDirectory Lib "kernel32" Alias "GetWindowsDirectoryA" (ByVal lpBuffer As String, ByVal nSize As Long) As Long
بعد این کد را هم در زیربرنامه موردنظر بنویسی:
dim WinDir as String
WinDir=Space(255)
GetWindowsDirectory WinDir,len(WinDir)
متغیر WinDirدایرکتوری ویندوز را بر میگرداند.
سلام امیر جان من خواهش می‌کنم و بقیه دوستان در تاپیک خود جواب داده بشه و در تاپیک هائی که دوباره ایجاد می‌شه و یک جور بیهوده نویسی می‌شه پاسخ ندهید.
متشکر .
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]
این تابع آدرس دایرکتوری ویندوز رو به شما نشون می ده این تابع نیازی به فراخوانی API نداره شما دوستان عزیز فقط کافیه که این کد رو در داخل وی بی امتحان کنید بعد خروجیش رو ببینید
نقل قول:
Print environ("windir")