PDA

View Full Version : دایرکتوریهای سیستمی



VB6.0
سه شنبه 04 آذر 1382, 15:29 عصر
با سلام
آدرس و مسیر این دایرکتوریهای سیستمی (مثل دایرکتوری ویندوز و ...) رو چه جوری میشه پیداش کرد؟

Abbas Arizi
سه شنبه 04 آذر 1382, 15:45 عصر
توی VB معمولا برای این کار از API استفاده میشه. تابع GetSystemDirectory برای دایرکتوری System و GetWindowsDirectory برای فولدر ویندوز هستند.

Voldemort
سه شنبه 04 آذر 1382, 16:27 عصر
دوست عزیز شما می توانید از توابع زیر استفاده کنید:
GetSystemDirectory: برای بدست آوردن مسیر فولدر System
GetWindowsDirectory: برای بدست آوردن مسید فولدر ویندوز
GetSystemWindowsDirectory: برای بدست آوردن مسیر مشترک ویندوز هنگامی که چند کاربر وجود دارد
:GetTempPathبرای بدست آوردن مسیر فولدر فایلهای موقت در ویندوز
SHGetFolderPath: از این تابع هم برای یافتن هر فولدری استفاده می شود

VB6.0
سه شنبه 04 آذر 1382, 20:41 عصر
با سلام
باز هم میگم که من هیچ جای دنیا رو با این فروم عوض نمیکنم.
دستتون درد نکنه.
موفق باشید.

کم حوصله
سه شنبه 04 آذر 1382, 20:52 عصر
باز هم میگم که من هیچ جای دنیا رو با این فروم عوض نمیکنم.
این جمله شما را باید بدهتد با طلا بنویسند :تشویق: :تشویق: :تشویق:

saeidtf
چهارشنبه 19 اسفند 1383, 21:49 عصر
شما می توانید با نوشتن فقط یک خط مسیر دایرکتوری ویندوز را مشخص نمایی

Environ("windir") :sunglass:

am 241
یک شنبه 14 اسفند 1384, 13:37 عصر
اگه میشه خط تابع api رو برام بنویسید

Payman62
یک شنبه 14 اسفند 1384, 17:07 عصر
اگه میشه خط تابع api رو برام بنویسید

Private Declare Function GetWindowsDirectoryA Lib "kernel32" (ByVal lpBuffer As String, ByVal nSize As Long) As Long
strSave = String(200, Chr$(0))
Path = Left$(strSave, GetWindowsDirectoryA(strSave, Len(strSave)))