جدول المحتويات:
2025 مؤلف: John Day | [email protected]. آخر تعديل: 2025-01-13 06:56
هذا هو أول Instructable لي ، لذا من فضلك قل لي كيف يمكنني التحسين.
يخبرك هذا الدليل بكيفية إنشاء برنامج مزعج يفتح ويغلق جميع محركات الأقراص المضغوطة. سوف تحتاج: جهاز كمبيوتر يعمل بنظام windows
الخطوة 1: افتح برنامج Notepad
أولا ، افتح المفكرة
هناك طريقتان أعرف أنهما للقيام بهذه الطريقة 1: انقر فوق زر البدء ، وانتقل إلى البرامج أو جميع البرامج ، وانتقل إلى الملحقات ، وانقر فوق طريقة المفكرة 2: اضغط باستمرار على مفتاح windows ثم اضغط على R ثم حرر مفتاح windows ، مربع سوف يطفو على السطح ، في هذا المربع اكتب المفكرة
الخطوة 2: اكتب البرنامج النصي
يجب أن تكون نافذة المفكرة الآن مفتوحة ولصق النص أدناه في notepaddoDim tsDim strDriveLetterDim intDriveLetterDim fs "As Scripting. FileSystemObjectConst CDROM = 4 خطأ في استئناف NextSet fs = CreateObject (" Scripting. FileSystemObject = " ") إلى Asc (" Z ") Err. ClearIf fs. GetDrive (Chr (intDriveLetter)). DriveType = CDROM ThenIf Err. Number = 0 ThenstrDriveLetter = Chr (intDriveLetter) قم بإنهاء ForEnd IfEnd IfNextSet oWMP =" CreateObject. 7 ") اضبط colCDROMs = oWMP.cdromCollectionFor d = 0 إلى colCDROMs. Count - 1colCDROMs. Item (d). EjectNext 'nullFor d = 0 to colCDROMs. Count - 1colCDROMs. Item (d). EjectNext' nullset owmpCD = nothings = لا شيء
الخطوة 3: احفظ واختبار
احفظ الملف كملف cd.vbs على سطح المكتب وانقر فوقه نقرًا مزدوجًا للتشغيل
الخطوة 4: توقف
اضغط على ctrl + alt + delete افتح مدير المهام ، انقر فوق العمليات ، ثم انقر فوق wscript.exe ، ثم اضغط على end process