PDA

View Full Version : باز کردن یک مسیر در سیستم



click.1387
جمعه 20 شهریور 1388, 05:37 صبح
سلام
چطور میشه برنامه ای نوشت که مسیری در Text بنویسیم بعد یک دکمه بزنیم تا اون مسیر رو برامون باز کنه
مثلا تو تکست بنویسیم C:\ali\Nam

xxxxx_xxxxx
جمعه 20 شهریور 1388, 20:43 عصر
Shell "Explorer.exe " & Text1.Text, vbMaximizedFocus

:لبخندساده:

click.1387
جمعه 20 شهریور 1388, 21:02 عصر
سلام
اینکه برای باز کردن IE هستش مگه میشه با این دستور مسیر یک درایو رو باز کرد ؟
شما در نظر بگیرید که من مسیر یک فایل ورد رو بدم برام باز کنه
ممنون بابت پاسختون

xxxxx_xxxxx
جمعه 20 شهریور 1388, 21:17 عصر
معنی دستور = مسیر مقابل Explorer.exe را تحت Explorer.exe باز کن.
پس هر مسیری که باشه توسط Explorer.exe تشخیص داده میشه که با چه برنامه ای باز بشه. اگر با برنامه مورد نظرتون باز نشد بجای Explorer.exe باید مسیر فایل اجرایی اون برنامه رو قرار بدید (یعنی مسیر winword.exe).

دقت کنید که بین فایل اجرای و مسیر فایلی که می خواین باز بشه باید یک فضای خالی وجود داشته باشه(space).

HjSoft
شنبه 21 شهریور 1388, 04:19 صبح
اين كد در صورتي كه پوشه موجود نباشه ، پوشه رو ميسازه .

Private Declare Function MakeSureDirectoryPathExists Lib "imagehlp.dll" (ByVal lpPath As String) As Long
Private Sub Form_Load()
'KPD-Team 2000
'URL: http://www.allapi.net/
'E-Mail: KPDTeam@Allapi.net
'create the directory "c:\this\is\a\test\directory\", if it doesn't exist already
MakeSureDirectoryPathExists "c:\this\is\a\test\directory\"
End Sub