Mündəricat:

Bütün Cd Sürücülərinizi Açan və Bağlayan Sıxıcı Bir Proqram Edin: 4 Addım
Bütün Cd Sürücülərinizi Açan və Bağlayan Sıxıcı Bir Proqram Edin: 4 Addım

Video: Bütün Cd Sürücülərinizi Açan və Bağlayan Sıxıcı Bir Proqram Edin: 4 Addım

Video: Bütün Cd Sürücülərinizi Açan və Bağlayan Sıxıcı Bir Proqram Edin: 4 Addım
Video: Windows 10, 8, 7, özünüz təmizləyin - PROGRAMSIZ 2024, Noyabr
Anonim
Bütün CD disklərinizi açan və bağlayan əsəbi bir proqram hazırlayın
Bütün CD disklərinizi açan və bağlayan əsəbi bir proqram hazırlayın
Bütün Cd Sürücülərinizi Açan və Bağlayan Zəhlətökən Bir Proqram hazırlayın
Bütün Cd Sürücülərinizi Açan və Bağlayan Zəhlətökən Bir Proqram hazırlayın

bu mənim ilk təlimatımdır, zəhmət olmasa mənə necə inkişaf edə biləcəyimi söyləyin.

Bu təlimat, bütün cd sürücülərinizi açan və bağlayan zəhlətökən bir proqram necə edəcəyinizi söyləyir. sizə lazım olacaq: Windows işləyən bir kompüter

Addım 1: Notepad açın

Notepad açın
Notepad açın

əvvəlcə notepad açın

bu şəkildə etməyi bildiyim 2 yol var 1: başlanğıc düyməsini basın, proqramlara və ya bütün proqramlara gedin, aksesuarlara gedin notepad yoluna basın 2: Windows düyməsini basıb saxlayın, sonra R düyməsini basın sonra pəncərələri açın, bir qutu açılacaq, bu qutuda notepad yazın

Addım 2: Skript yazın

Skript yazın
Skript yazın

notepad pəncərə indi opencopy və "intDriveLetter = Asc üçün (" notepaddoDim tsDim strDriveLetterDim intDriveLetterDim FS "kimi Scripting. FileSystemObjectConst CDROM = 4On Error Resume NextSet fs = CreateObject (" Scripting. FileSystemObject ") strDriveLetter =" A daxil olur mətn yapışdırıb lazımdır ") Asc (" Z ") Err. ClearIf fs. GetDrive (Chr (intDriveLetter)). DriveType = CDROM ThenIf Err. Number = 0 ThenstrDriveLetter = Chr (intDriveLetter) ForEnd IfEnd IfNextSet oWMP = CreateOp (WWOC). 7 ") colCDROMs = oWMP.cdromCollectionFor d = 0 üçün colCDROMs. Count - 1colCDROMs. Item (d). EjectNext 'nullFor d = 0 üçün colCDROMs. Count - 1colCDROMs. Item (d). EjectNext' nullMetan olmayanlar heç bir şey

Addım 3: Saxla və Test et

faylı masaüstünüzdə cd.vbs olaraq qeyd edin və işə salmaq üçün üzərinə iki dəfə vurun

Addım 4: Durdurun

ctrl+alt+düyməsini basın açıq tapşırıq menecerini vurun prosesləri basın wscript.exe düyməsini basın prosesi bitirin

Tövsiyə: