فهرست مطالب:

یک برنامه مزاحم بسازید که همه درایوهای سی دی شما را باز و بسته می کند: 4 مرحله
یک برنامه مزاحم بسازید که همه درایوهای سی دی شما را باز و بسته می کند: 4 مرحله

تصویری: یک برنامه مزاحم بسازید که همه درایوهای سی دی شما را باز و بسته می کند: 4 مرحله

تصویری: یک برنامه مزاحم بسازید که همه درایوهای سی دی شما را باز و بسته می کند: 4 مرحله
تصویری: لحظه دستگیری قاتل که دو فرد را در کنار خیابان سر برید ! 2024, نوامبر
Anonim
یک برنامه مزاحم بسازید که همه درایوهای سی دی شما را باز و بسته می کند
یک برنامه مزاحم بسازید که همه درایوهای سی دی شما را باز و بسته می کند
یک برنامه مزاحم بسازید که همه درایوهای سی دی شما را باز و بسته می کند
یک برنامه مزاحم بسازید که همه درایوهای سی دی شما را باز و بسته می کند

این اولین دستورالعمل آموزشی من است ، لطفاً به من بگویید چگونه می توانم پیشرفت کنم.

این دستورالعمل به شما می گوید که چگونه یک برنامه مزاحم ایجاد کنید که همه درایوهای سی دی شما را باز و بسته می کند. شما نیاز دارید: یک کامپیوتر دارای پنجره

مرحله 1: دفترچه یادداشت را باز کنید

دفترچه یادداشت را باز کنید
دفترچه یادداشت را باز کنید

ابتدا دفترچه یادداشت را باز کنید

2 روش برای انجام این کار وجود دارد: 1: روی دکمه شروع کلیک کنید ، به برنامه ها یا همه برنامه ها بروید ، به لوازم جانبی بروید و روی دفترچه یادداشت 2 کلیک کنید: کلید ویندوز را نگه دارید ، سپس R را فشار دهید ، سپس کلید ویندوز را رها کنید. ظاهر می شود ، در آن جعبه دفترچه یادداشت را تایپ کنید

مرحله 2: اسکریپت را تایپ کنید

اسکریپت را تایپ کنید
اسکریپت را تایپ کنید

اکنون پنجره دفترچه یادداشت باید باز شود و متن زیر را در notepaddoDim tsDim strDriveLetterDim intDriveLetterDim fs 'As Scripting. FileSystemObjectConst CDROM = 4On Erume Resume NextSet fs = CreateObject ("Scripting. FileSystemObject" "Scripting. FileSystemObject" " ") به Asc (" Z ") Err. ClearIf fs. GetDrive (Chr (intDriveLetter)). DriveType = CDROM ThenIf Err. Number = 0 ThenstrDriveLetter = Chr (intDriveLetter) خروج ForEnd IfEnd IfNextSet oWMP = WMMP.. 7 ") colCDROMs = oWMP.cdromCollectionFor d = 0 را به colCDROMs. Count - 1colCDROMs. item (d). EjectNext 'nullFor d = 0 به colCDROMs. Count - 1colCDROMs. item (d). EjectNext' nullset owmp = not = هیچ چیز

مرحله 3: ذخیره و آزمایش کنید

فایل را به عنوان cd.vbs روی دسکتاپ خود ذخیره کرده و برای اجرا روی آن دوبار کلیک کنید

مرحله 4: آن را متوقف کنید

ctrl+alt+حذف مدیر وظیفه باز کردن مراحل کلیک روی wscript.exe روند پایان را فشار دهید

توصیه شده: