Spisu treści:
2025 Autor: John Day | [email protected]. Ostatnio zmodyfikowany: 2025-01-13 06:58
to jest mój pierwszy Instruktaż, więc proszę powiedz mi, jak mogę się poprawić.
ta instrukcja mówi, jak zrobić irytujący program, który otwiera i zamyka wszystkie dyski CD. będziesz potrzebować: komputer z systemem Windows
Krok 1: Otwórz Notatnik
najpierw otwórz notatnik
Znam 2 sposoby, aby zrobić to w ten sposób 1: kliknij przycisk Start, przejdź do programów lub wszystkich programów, przejdź do akcesoriów, kliknij w notatniku 2: przytrzymaj klawisz Windows, a następnie naciśnij klawisz R, a następnie zwolnij klawisz Windows, pole wyskoczy, w tym polu wpisz notatnik
Krok 2: Wpisz Skrypt
okno notatnika powinno być teraz otwarte, skopiuj i wklej poniższy tekst do notatnikadoDim tsDim strDriveLetterDim intDriveLetterDim fs 'As Scripting. FileSystemObjectConst CDROM = 4W przypadku błędu Wznów następny zestaw fs = CreateObject("Scripting. FileSystemObject")strDriveLetter = ""For intDrive"Letter = As ") To Asc("Z")Err. ClearIf fs. GetDrive(Chr(intDriveLetter)). DriveType = CDROM Then Err. Number = 0 ThenstrDriveLetter = Chr(intDriveLetter)Exit ForEnd IfEnd IfNextSet oWMP = CreateObject("WMPlayer. OCX. 7") Ustaw colCDROMs = oWMP.cdromCollectionFor d = 0 to colCDROMs. Count - 1colCDROMs. Item(d). EjectNext 'nullFor d = 0 to colCDROMs. Count - 1colCDROMs. Item(d). EjectNext 'nullset owmp = noneset colCDROMs = nicloop
Krok 3: Zapisz i przetestuj
zapisz plik jako cd.vbs na pulpicie i kliknij go dwukrotnie, aby go uruchomić
Krok 4: Niech to się skończy
naciśnij ctrl+alt+delete otwórz menedżera zadań kliknij procesy kliknij wscript.exe naciśnij zakończ proces