PDA

View Full Version : نحوه تشخیص دیسک در فلاپی VB6.0


Mohsen229266
دوشنبه 05 شهریور 1386, 10:59 صبح
با سلام خدمت دوستان
من یک سوال دارم اونم اینه که چطور میشه تشخیص داد که دیسک در فلاپی است یا نه ؟
البته در VB 6.0
ashkan209
دوشنبه 05 شهریور 1386, 19:19 عصر
در Refrence دنبال microsoft scripting runtime بگرد و چک مارک بزن
این فرمان را اضافه کن
dim Fso1 as new file system object
if fso1.getdrive("A").isready then
فلاپی سالم و در دسترس است
else
فلاپی خراب یا در دسترس نیست
endif
Mohsen229266
دوشنبه 05 شهریور 1386, 20:07 عصر
متشکرم از راهنمائی شما