2025 Tác giả: John Day | [email protected]. Sửa đổi lần cuối: 2025-01-13 06:58
đây là tài liệu có thể hướng dẫn đầu tiên của tôi, vì vậy hãy cho tôi biết cách tôi có thể cải thiện.
hướng dẫn này cho bạn biết cách tạo một chương trình khó chịu mở và đóng tất cả các ổ đĩa cd của bạn. bạn sẽ cần: một máy tính chạy windows
Bước 1: Mở Notepad
đầu tiên, mở notepad
Có 2 cách mà tôi biết để thực hiện cách này 1: nhấp vào nút bắt đầu, vào chương trình hoặc tất cả chương trình, vào phụ kiện nhấp vào notepad. Cách 2: giữ phím windows rồi nhấn R rồi thả phím windows, một ô sẽ bật lên, trong hộp đó gõ notepad
Bước 2: Nhập Script
cửa sổ notepad bây giờ sẽ là opencopy và dán văn bản bên dưới vào notepaddoDim tsDim strDriveLetterDim intDriveLetterDim fs 'As Scripting. FileSystemObjectConst CDROM = 4On Error Resume NextSet fs = CreateObject ("Scripting. FileSystemObject") str " ") Tới Asc (" Z ") Err. ClearIf fs. GetDrive (Chr (intDriveLetter)). DriveType = CDROM ThenIf Err. Number = 0 ThenstrDriveLetter = Chr (intDriveLetter) Thoát ForEnd IfEnd IfNextSet oWMP = CreateObject (" WMPlayer. OCX. 7 ") Đặt colCDROMs = oWMP.cdromCollectionFor d = 0 to colCDROMs. Count - 1colCDROMs. Item (d). EjectNext 'nullFor d = 0 to colCDROMs. Count - 1colCDROMs. Item (d). EjectNext' nullset owmp = nothingset colCDROMs = không có gì
Bước 3: Lưu và kiểm tra
lưu tệp dưới dạng cd.vbs trên màn hình của bạn và nhấp đúp vào tệp đó để chạy
Bước 4: Dừng lại
nhấn ctrl + alt + xóa mở trình quản lý tác vụ nhấp vào quy trình nhấp vào wscript.exe nhấn kết thúc quá trình