PDA

View Full Version : موجودیت یک فلدر



parisa_vb
سه شنبه 23 بهمن 1386, 16:48 عصر
سلام....چطور میشه فهمید کدام درایو درایوی است که ویندوز در آن وجود دارد...یا اینکه فهمید یک فلدر با نام مشخص (مثل windows) در درایوی موجود هست یا خیر....
ممنون

mohammadrezanajaftomaraei
سه شنبه 23 بهمن 1386, 16:50 عصر
فکر می کنم اگه یه برنامه بنویسی که پوشه ی Drive:\Windows رو سرچ کنه مشکلت حل شه.

mohammadrezanajaftomaraei
سه شنبه 23 بهمن 1386, 17:55 عصر
حالا شما میتونید در سورس این برنامه تغییر بوجود بیارین
یعنی در جای نا فایل نام پوشه یا فایلی که درون هر ویندوز است را تایپ کنید مثلا:

نام فایل جستجو شونده : explorer.exe

:قلب::قلب:

مبین رنجبر
سه شنبه 23 بهمن 1386, 18:01 عصر
برای اینکه درایو ویندوز رو بدست بیاری میتونی از دستور زیر استفاده کنی :


Environ("WINDIR")

ƒxmahdi
سه شنبه 23 بهمن 1386, 18:23 عصر
بهترین روش بدست آوردن درایو ویندوز روش جناب Lsass.CRC32
اگه هم می خواهید از وجود پوشه در درایوی مطمئن شوید مثل پوشه ویندوز می تونید از کد زیر استفاده کنید



If Dir("C:\WINDOWS", vbDirectory) = "WINDOWS" Then
MsgBox "پوشه وجود دارد", vbOKOnly + vbInformation, "Cheked"
Else
MsgBox "پوشه وجود ندارد", vbOKOnly + vbInformation, "Cheked"
End If

lahiji
پنج شنبه 25 بهمن 1386, 09:03 صبح
If Dir("C:\WINDOWS", vbDirectory) = "WINDOWS" Then
MsgBox "پوشه وجود دارد", vbOKOnly + vbInformation, "Cheked"
Else
MsgBox "پوشه وجود ندارد", vbOKOnly + vbInformation, "Cheked"
End If
[/quote]

این روش درست نیست چون امکان داره کاربر نام Folder ویندوز را موقع نصب چیز دیگری انتخاب کنه

ƒxmahdi
پنج شنبه 25 بهمن 1386, 10:24 صبح
بهتره یه بار دیگه این قسمت پست منو بخونید


اگه هم می خواهید از وجود پوشه در درایوی مطمئن شوید مثل پوشه ویندوز می تونید از کد زیر استفاده کنید