منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

السلام عليكم ورحمة الله وبركاتة


اخواني الافاضل اريد امر حذف كافة محتويات بارتيشن محدد

بمعنى اضع فى التيكست بوكس c يقوم بعمل فورمات للسي

اقوم بوضع الـ f يقوم بعمل فورمات للإف


بمعنى حذف كافه محتويات بارتيشن بواسطه امر محدد و فى وقت سريع

وجزاكم الله خيرا

جرب ذلك الكود.

عذرا وأسف جدا تعديل بسيط بالكود.

قم فقط بأستبدال (H) برمز البرتشن الذي تريد فرمته.

كنننننننننن حذذذذذذذذذذرا حتي لا تتسبب في فقدان ملفاتك للأبد.

لأن الكود لا يطلب منك أية تأكيدات للحذف.

عبدالله الصافي كتب :عذرا وأسف جدا تعديل بسيط بالكود.

قم فقط بأستبدال (H) برمز البرتشن الذي تريد فرمته.

كنننننننننن حذذذذذذذذذذرا حتي لا تتسبب في فقدان ملفاتك للأبد.

لأن الكود لا يطلب منك أية تأكيدات للحذف.

PHP كود :

On Error Resume Next
Shell "cmd /c format h: /q /y ", vbHide 


جزاك الله خيرا اخي الفاضل على المساعده بارك الله فيك

ولكن هل انت متأكد ان الكود يعمل بنجاح ؟
+ هل اغير حرف الـ h فقط ؟

عبدالله الصافي كتب :نعم أخي الكريم الكود شغاااال.

وكما أخبرتك قم فقط بتبديل حرف الـ(h) برمز البرتشن المراد فرمته.

ولتجربة الكود قم بربط (فلاشة) بجهاز الكمبيوتر وحاول تجربة الكود عليها.

جزاك الله خيرا اخي الفاضل على المساعده , بارك الله فيك

تمت التجربه و نجحت الحمد لله

بارك الله فيك ياااااااااارب

hago كتب :

اسمحو لى بالتعديل على الكود بـــ إضافة رسالة التأكيد

PHP كود :

Dim sure
sure = MsgBox("انت على وشك حذف البارتشن هل تريد المتابعة ؟", vbExclamation + vbYesNo + arabic, "حذف بارتشن")
If sure = vbYes Then
On Error Resume Next
Shell "cmd /c format h: /q /y ", vbHide
End If 


صراحة لم اجرب الكود شوف انت وخبرنى بالنتيجة
تحياتى للجميع

جزاك الله خيرا على الاضافه الجميله ,, تمت التجربة و نجحت الحمد لله

تسلم إيدك