+- Parsi Coders (http://parsicoders.com)
+-- انجمن: Software Development Programming (http://parsicoders.com/forumdisplay.php?fid=37)
+--- انجمن: Visual Basic Programming (http://parsicoders.com/forumdisplay.php?fid=39)
+---- انجمن: Visual Basic 6 (http://parsicoders.com/forumdisplay.php?fid=44)
+---- موضوع: بدست اوردن لیست درایوهای موجود بر روی سیستم (/showthread.php?tid=1448)
RE: بدست اوردن لیست درایوهای موجود بر روی سیستم - پنام - 01-09-2012
توی یکی از سایتها گفته بودن که برای کسایی که می خوان از صفر ویژوال بیسیک یادبگیرند کتاب برنامه نویسی 1و2و3 هنرستان را بخوانند ؟
خواستم نظر شما را بدونم ؟
شما هم با این موافقید ؟
من برنامه شما را مطالعه کردم و چند نکته بنظرم رسید؟
1- من در پایه مشکل دارم برای مثال من باید معنای دستورات را بدونم و بعد ببینم که فلان دستور کجا خوبه برای مثال:
من معنی
Kill H:*.exe
را می دانم ولی اون دستوراتی که در این برنامه نوشتین را نمی دانم .برای مثال:
Private Declare Function GetDriveType Lib "kernel32.dll" Alias "GetDriveTypeA"
یا
Const DRIVE_REMOVABLE
و....
پس من باید در ابتدا با مفهوم دستورات آشنا بشم و بعد از درک کردنش بتونم خلاقیتم را در تغییر یا اصلاح یا نوشتن برنامه جدید بکار گیرم .
برای این کار چی پیشنهاد میدید؟
RE: بدست اوردن لیست درایوهای موجود بر روی سیستم - Amin_Mansouri - 01-09-2012
کتاب هنرستان خوبه
وقتی خوندینش برید سراغ توابع api
عجله نکنید...
RE: بدست اوردن لیست درایوهای موجود بر روی سیستم - پنام - 01-10-2012
سلام امروز بهتر هستید امیدوارم حالتون خوب باشه.
یک سوال دارم
اگه بخوام فایلهای موجود در درایو H
1- از حالت سیستمی در بیایند.
2- از حالت مخفی بودن خارج شن.
دستور وی بی اش چطور می شه ؟
البته زمانی که فروم لود بشه !
ممنموم!
RE: بدست اوردن لیست درایوهای موجود بر روی سیستم - Amin_Mansouri - 01-10-2012
سلام
ممنون بهترم شما خوبی؟
کد:
کد:
Private Sub Form_Load()
SetAttr ("h:\amin.exe"), vbNormal
End SubRE: بدست اوردن لیست درایوهای موجود بر روی سیستم - پنام - 01-10-2012
خدار را شکر !
من امتحان کردم دستتون درد نکنه ولی یه چیز دیگه من میخواستم که تمام فایلهای مخفی و سیستمی را
توی این کد شما محدودیت اسمی است یعنی فقط amin.exe از حالت مخفی در میاره!
ولی من میخام همه فایلهی مخفی ، حتی فولدر های مخفی را از حالت 1- مخفی 2- سیستمی در بیاره، بهمین خاطر دستور زیر را وارد کردم ولی کار نکرد!!
Private Sub Form_Load()
SetAttr ("h:\*.*"), vbNormal
End Sub
مگه این کد فایلهای سیستمی را هم از حالت سیستمی خارج میکنه؟ سعی کنید دستوری که مینویسید بتونه فولدر های مخفی را هم از حالت مخفی و سیستمی در بیاره!
RE: بدست اوردن لیست درایوهای موجود بر روی سیستم - Amin_Mansouri - 01-10-2012
سلام
این پروژه که ازم خواستی همه این دستورها که میگی توش پیاده سازی کردم
RE: بدست اوردن لیست درایوهای موجود بر روی سیستم - پنام - 01-10-2012
پس یه دنیا ممنون !
پس دارید روی پروژه حقیر کار میکنید و یکجا تحویل دهید ؟ یا منظورتون پروژه های قبلی است؟؟؟؟
تازه می خواستم محیط گرافیکی برنامه یامهدی 2014(عَجَه الله تَعالی فَرَجَهُ الشَریف) را براتون بفرستم که بصورت گجت بر روی دکستاپ طراحی کردم که هم جذاب باشه و هم دائم قابل دسترس ، می خوام نظرتون را بدونم!
چطوری بفرستم که امن باشه؟ فقط خودتون ببینید!!!!
RE: بدست اوردن لیست درایوهای موجود بر روی سیستم - Amin_Mansouri - 01-10-2012
الان این چیزهای که میخواهید تو همین پروژه که دادم بهتون بود که !
روش پسوورد بزارید و توی up.iranblog.com اپلود کنید لینکشو پیغام خصوصی بفرستید.
یه پیغام خصوصی هم چند روز پیش فرستادم فکر کنم ندیدینش
RE: بدست اوردن لیست درایوهای موجود بر روی سیستم - پنام - 01-10-2012
سلام اون محل آپلودی که فرستادین هر کاری کردم نتونست فایلم را آپلود کنه بهتره لطفی کنین و قبول زحمت کنین یک آدرس ایمیل یاهو برام بفرستین تا براتون اتچ منت کنم .
ممنونم!
RE: بدست اوردن لیست درایوهای موجود بر روی سیستم - Amin_Mansouri - 01-10-2012
زیپ کن و اپلود
رو یوزرم کلیک کن ایمیلمو میبینی