Mục lục:

Tạo một chương trình khó chịu mở và đóng tất cả ổ đĩa Cd của bạn: 4 bước
Tạo một chương trình khó chịu mở và đóng tất cả ổ đĩa Cd của bạn: 4 bước

Video: Tạo một chương trình khó chịu mở và đóng tất cả ổ đĩa Cd của bạn: 4 bước

Video: Tạo một chương trình khó chịu mở và đóng tất cả ổ đĩa Cd của bạn: 4 bước
Video: DỌN RÁC máy tính kiểu này là DỞ RỒI chị ơi 🥲 2024, Tháng bảy
Anonim
Thực hiện một chương trình khó chịu mở và đóng tất cả các ổ đĩa Cd của bạn
Thực hiện một chương trình khó chịu mở và đóng tất cả các ổ đĩa Cd của bạn
Thực hiện một chương trình khó chịu mở và đóng tất cả các ổ đĩa Cd của bạn
Thực hiện một chương trình khó chịu mở và đóng tất cả các ổ đĩa Cd của bạn

đâ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

Mở Notepad
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

Nhập tập lệnh
Nhập tập lệnh

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

Đề xuất: