تابع دایرکتوری در vb6

[ooje_asman]

با سلام تابع دایرکتوری ویندوز و همچنین دایرکتوری یه برنامه رو چطور می توان به دست آورد.

[مهمان]

سلام
کد زير دايرکتوري برنامه را بر مي گرداند:
App.Path
و در مورد directory مربوط به windows کد زير را دانلود بزنيد و استفاده نماييد:
http://www.pscode.com/vb/scripts/ShowCode.asp?txtCodeId=37611&lngWId=1
موفق باشيد :wink:

[PROSPPECH]

سلام
از تابع 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دایرکتوری ویندوز را بر میگرداند.

[Nesta]

سلام امیر جان من خواهش می‌کنم و بقیه دوستان در تاپیک خود جواب داده بشه و در تاپیک هائی‌ که دوباره ایجاد می‌شه و یک جور بیهوده نویسی‌ می‌شه پاسخ ندهید.
متشکر .
http://forum.p30world.com/viewtopic.php?t=9825&start=60