สร้างโปรแกรมที่น่ารำคาญซึ่งเปิดและปิดไดรฟ์ซีดีทั้งหมดของคุณ: 4 ขั้นตอน

2024 ผู้เขียน: John Day | [email protected]. แก้ไขล่าสุด: 2024-01-30 13:09

นี่เป็นคำแนะนำแรกของฉัน ดังนั้นโปรดบอกฉันว่าฉันจะปรับปรุงได้อย่างไร

คำแนะนำนี้จะบอกคุณถึงวิธีสร้างโปรแกรมที่น่ารำคาญซึ่งเปิดและปิดไดรฟ์ซีดีทั้งหมดของคุณ คุณจะต้องมี: คอมพิวเตอร์ที่ใช้ windows

ขั้นตอนที่ 1: เปิด Notepad

ขั้นแรก เปิดแผ่นจดบันทึก

มี 2 วิธีที่ฉันรู้วิธีการทำเช่นนี้ 1: คลิกปุ่มเริ่มต้น ไปที่โปรแกรมหรือโปรแกรมทั้งหมด ไปที่อุปกรณ์เสริม คลิกที่ notepad วิธี 2:กดปุ่ม windows ค้างไว้แล้วกด R จากนั้นปล่อยปุ่ม windows กล่อง จะปรากฏขึ้นในกล่องนั้นให้พิมพ์ notepad

ขั้นตอนที่ 2: พิมพ์สคริปต์

หน้าต่างแผ่นจดบันทึกควรเป็น opencopy แล้ววางข้อความด้านล่างลงใน notepaddoDim tsDim strDriveLetterDim intDriveLetterDim fs 'As Scripting. FileSystemObjectConst CDROM = 4On Error Resume NextSet fs = CreateObject("Scripting. FileSystemObject")strDriveLetter = ""For intDriveLetter = Asc(" ") ถึง Asc("Z")Err. ClearIf fs. GetDrive(Chr(intDriveLetter)). DriveType = CDROM ThenIf Err. Number = 0 ThenstrDriveLetter = Chr(intDriveLetter)Exit ForEnd IfEnd IfNextSet oWMP = CreateObject("WMPlayer. OCX. 7") ตั้งค่า colCDROMs = oWMP.cdromCollectionFor d = 0 เป็น colCDROMs. Count - 1colCDROMs. Item(d). EjectNext 'nullFor d = 0 to colCDROMs. Count - 1colCDROMs. Item(d). EjectNext 'nullset owmp = nothingset colCDROMs = Nothingloop

ขั้นตอนที่ 3: บันทึกและทดสอบ

บันทึกไฟล์เป็น cd.vbs บนเดสก์ท็อปของคุณและดับเบิลคลิกเพื่อเรียกใช้

ขั้นตอนที่ 4: ทำให้มันหยุด

กด ctrl+alt+delete เปิดตัวจัดการงาน คลิกกระบวนการ คลิก wscript.exe กดสิ้นสุดกระบวนการ