سلام!
اگر ميشه كدي را كه بتوان باVB 6 یک Folder را Open کرد بگویید.
سلام!
اگر ميشه كدي را كه بتوان باVB 6 یک Folder را Open کرد بگویید.
ابتدا يه Refrence به Microsoft Shell And Automation درست كن(به منوي Project برو و اونو پيدا كن و تيك اونو پر كن)
بعد از كد زير استفاده كن:
Dim objShell As New ShellobjShell.Open YourFolderPath
Last edited by majid_kntu; 21-07-2006 at 17:58.
چی جوری؟
یه نگاهی به این کد بندازید .
کد:برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
دستت درد نکنه
با دستور shell "Explorer " و مسیر پوشه می توانی !
----------------
دوستم راهنمایی کرد ممنون از راهنمایی تو هم
سلام
این کد پوشه رو تو اکسپلورر باز میکنه
اما اگه خواستید
اونو تو یه پنجره مثل مای کامپیوتر باز کنید از این استفاده کنید
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]
اول اینو بزار اول فرمت
Private Declare Function WinExec Lib "kernel32" (ByVal lpCmdLine As String, ByVal nCmdShow As Long) As Long
وبعد برای استفاده می تونی این کد رو استفاده کنی
WinExec "Explorer.exe c:\", 10
هم اکنون 1 کاربر در حال مشاهده این تاپیک میباشد. (0 کاربر عضو شده و 1 مهمان)