جدول المحتويات:

قم بعمل برنامج مزعج يفتح ويغلق جميع محركات الأقراص المضغوطة الخاصة بك: 4 خطوات
قم بعمل برنامج مزعج يفتح ويغلق جميع محركات الأقراص المضغوطة الخاصة بك: 4 خطوات

فيديو: قم بعمل برنامج مزعج يفتح ويغلق جميع محركات الأقراص المضغوطة الخاصة بك: 4 خطوات

فيديو: قم بعمل برنامج مزعج يفتح ويغلق جميع محركات الأقراص المضغوطة الخاصة بك: 4 خطوات
فيديو: 2021 Range Rover Westminster Edition Review & Drive-The Most Luxurious SUV 2024, شهر نوفمبر
Anonim
قم بعمل برنامج مزعج يفتح ويغلق جميع محركات الأقراص المضغوطة الخاصة بك
قم بعمل برنامج مزعج يفتح ويغلق جميع محركات الأقراص المضغوطة الخاصة بك
قم بعمل برنامج مزعج يفتح ويغلق جميع محركات الأقراص المضغوطة الخاصة بك
قم بعمل برنامج مزعج يفتح ويغلق جميع محركات الأقراص المضغوطة الخاصة بك

هذا هو أول 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

موصى به: