PDA

View Full Version : بدست آوردن درایو ویندوز



sajjad_kochekian
دوشنبه 11 مرداد 1389, 21:48 عصر
چطوری میشه درایو که ویندوز در آن نصب شده را پیدا کرد.
آیا دستوری هست که فایل های مهم سیستم را برگردونه.
مثل
Program file
windows
font
system32

alirezabahrami
سه شنبه 12 مرداد 1389, 00:47 صبح
چطوری میشه درایو که ویندوز در آن نصب شده را پیدا کرد.
آیا دستوری هست که فایل های مهم سیستم را برگردونه.
مثل
Program file
windows
font
system32


سلام با یک دستور ساده میتوانید نام درایو ویندوز را در یک لیبل نمایش بدهید
بر روی یک فرم یک لیبل مثلاً بانام Label1 و سپس در رخداد Load فرم کد زیر را وارد کن:


Environ "Windir"
Label1.Caption = Left(Environ("windir"), 1)

موفق باشید

aminhacker
یک شنبه 14 شهریور 1389, 00:28 صبح
سلام می شه بگید با SetAttr می شه چه کارکرد

ali190
یک شنبه 14 شهریور 1389, 01:49 صبح
با این دستور میتونین خصوصیات خارجی یک فایل رو تعیین کنید
مثلاً من با دستور زیر فایل اکسس db2.mdb رو که در مسیر برنامه ام هست رو hidden میکنم


Dim x
x = CurrentProject.Path + "\db2.mdb"
SetAttr x, vbHidden
موفق باشید