مشاهده نسخه کامل
: پیدا کردن درایو ویندوز
سلام
چگونه می توانم درایو ویندوز را پیدا کنم؟
مثلا
برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
نه
برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
چرا جواب نمیدین؟؟؟؟؟؟؟؟؟؟؟
mahdi7610
10-04-2009, 11:56
سلام
من ویژوال بیسیک کار نکردم اما فکر کنم مطلب زیر بتونه کمکتون کنه .
برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
موفق باشید :)
samiblog
10-04-2009, 17:19
کد تابع توی یه ماژول :
Public Declare Function GetWindowsDirectory Lib "kernel32" Alias "GetWindowsDirectoryA" (ByVal lpBuffer As String, ByVal nSize As Long) As Long
lpBuffer : مقدار اين بافر توسط تابع مقدار دهي مي شود و مقدار بر گشتي آن مسير نصب ويندوز خواهد بود.
nSize : طول بافر lpBuffer است.
کد اجرایی هم توی Form_Load برنامه :
()Private Sub Form_Load
Dim WINPath As String
Dim StrBuffer As String
((StrBuffer = String(255, Chr$(0
(((WINPath = Left$(StrBuffer, GetWindowsDirectory(StrBuffer, Len(StrBuffer
MsgBox "Windows Folder : " & WINPath
End Sub
منم اینو می دونستم.
ولی من فقط \:c رو می خواستم نه c:\windows
samiblog
14-04-2009, 09:54
خوب می تونی از همین هم استفاده کنی و یک مرحله برگردی عقب و برسی به \:c
ممنون از راهنمایی شما
مشکلم حل شد
با درستور زیرم میشه
%windir%
ch4llenge
29-04-2009, 15:37
ارور می ده مشکل کجاست ؟
MicrosoftH
03-05-2009, 16:18
سلام
چگونه می توانم درایو ویندوز را پیدا کنم؟
مثلا
برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنیدنه
برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
سلام من دانشجوی رشته کامپیوتر هستم تو دبیرستان VB می خوندیم ولی حالا سی پلاس پلاس
ولی جوابت
ساده با دستور
Environ "Windir"
Label1.caption=Environ("windir")
برنامه رو بصورت پروژه برات نوشتم دانلود کن حجمش هم 2 کیلو بایته
لینک دانلود :
برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
موفق باشی
vBulletin , Copyright ©2000-2025, Jelsoft Enterprises Ltd.