به طور فرض می خواهید فایلی را در شاخه وندوز پوشه System32 کپی کنی باید ادرس بدی خوب انوقت از کجا باید فهمید در چه درایویه.
2-مثلا می هواهی درایو ویندوزش تو فرم نشان داده بشه
Printable View
به طور فرض می خواهید فایلی را در شاخه وندوز پوشه System32 کپی کنی باید ادرس بدی خوب انوقت از کجا باید فهمید در چه درایویه.
2-مثلا می هواهی درایو ویندوزش تو فرم نشان داده بشه
از اين كد استفاده كن :
کد:Private Function WindowsDirectory() As String
Dim windows_dir As String
Dim length As Long
windows_dir = Space$(MAX_PATH)
length = GetWindowsDirectory(windows_dir, _Len(windows_dir))
WindowsDirectory = Left$(windows_dir, length)
End Function
Private Function SystemDrive() As String
SystemDrive = Left$(WindowsDirectory(), 1)
End Function
مشخصات پوشه نصب ويندوز [ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]نقل قول:
رو از اینجا دانلود کنید
البته از بالای صفحه پرچه انگلیس را انتخابکنید
سلام.
کد حامد جواب میده.
اینم جواب میده.
کد:strWinDir = Environ("WinDir")
واقعا اگه آدم ویژوال بیسیک رو خوب بلد باشه به همین راحتیه ها :8: اگه هرکاری رو درست انجام بدیمنقل قول:
خیلی خوشم اومد مرسی