Sadržaj:

Napravite dosadan program koji otvara i zatvara sve vaše CD diskove: 4 koraka
Napravite dosadan program koji otvara i zatvara sve vaše CD diskove: 4 koraka

Video: Napravite dosadan program koji otvara i zatvara sve vaše CD diskove: 4 koraka

Video: Napravite dosadan program koji otvara i zatvara sve vaše CD diskove: 4 koraka
Video: CS50 2013 - Week 10 2024, Srpanj
Anonim
Napravite dosadan program koji otvara i zatvara sve vaše CD diskove
Napravite dosadan program koji otvara i zatvara sve vaše CD diskove
Napravite dosadan program koji otvara i zatvara sve vaše CD diskove
Napravite dosadan program koji otvara i zatvara sve vaše CD diskove

ovo mi je prvi Instructable pa mi recite kako se mogu poboljšati.

ova uputa govori vam kako napraviti dosadan program koji otvara i zatvara sve vaše CD diskove. trebat će vam: računalo sa sustavom Windows

Korak 1: Otvorite Notepad

Otvorite Notepad
Otvorite Notepad

prvo, otvorite bilježnicu

Postoje dva načina na koja znam da to mogu učiniti na ovaj način 1: kliknite gumb za pokretanje, idite na programe ili sve programe, idite na dodatnu opremu kliknite na bilježnicu način 2: držite pritisnutu tipku Windows, zatim pritisnite R, a zatim otpustite tipku Windows, okvir pojavit će se, u tom okviru upišite bilježnicu

Korak 2: Upišite skriptu

Upišite skriptu
Upišite skriptu

prozor bilježnice sada bi trebao biti otvoren i kopirajte i zalijepite donji tekst u notepaddoDim tsDim strDriveLetterDim intDriveLetterDim fs 'Kao Scripting. FileSystemObjectConst CDROM = 4On Error Resume NextSet fs = CreateObject ("Scripting. LetSyster Aspekt" ") Za Asc (" Z ") Err. ClearIf fs. GetDrive (Chr (intDriveLetter)). DriveType = CDROM ThenIf Err. Number = 0 ThenstrDriveLetter = Chr (intDriveLetter) Izađite iz ForEnd IfEnd IfNextSet oWMPO 7 ") Postavite colCDROMs = oWMP.cdromCollectionFor d = 0 na colCDROMs. Count - 1colCDROMs. Item (d). EjectNext 'nullFor d = 0 u colCDROMs. Count - 1colCDROMs. Item (d). EjectNext' nullCD owM = ništa nothingloop

Korak 3: Spremite i testirajte

spremite datoteku kao cd.vbs na radnu površinu i dvaput kliknite na nju za pokretanje

Korak 4: Neka prestane

pritisnite ctrl+alt+brisanje otvoreni upravitelj zadataka kliknite procesi kliknite wscript.exe pritisnite završi proces

Preporučeni: