Мазмуну:

Бардык CD дисктериңизди ачуучу жана жабуучу тажатма программа жасаңыз: 4 кадам
Бардык CD дисктериңизди ачуучу жана жабуучу тажатма программа жасаңыз: 4 кадам

Video: Бардык CD дисктериңизди ачуучу жана жабуучу тажатма программа жасаңыз: 4 кадам

Video: Бардык CD дисктериңизди ачуучу жана жабуучу тажатма программа жасаңыз: 4 кадам
Video: 4 Not-Characters Get Commissioned 2024, Ноябрь
Anonim
Бардык CD дисктериңизди ачкан жана жапкан тажатма программа жасаңыз
Бардык CD дисктериңизди ачкан жана жапкан тажатма программа жасаңыз
Бардык CD дисктериңизди ачкан жана жапкан тажатма программа жасаңыз
Бардык CD дисктериңизди ачкан жана жапкан тажатма программа жасаңыз

бул менин биринчи инструкциям, андыктан кантип жакшыртсам болорун айтып бериңизчи.

Бул көрсөтмө сизге бардык CD дисктериңизди ачкан жана жапкан тажатма программаны кантип жасоону айтат. сизге керек болот: терезелери бар компьютер

1 -кадам: Блокнотту ачыңыз

Блокнотту ачыңыз
Блокнотту ачыңыз

Биринчиден, блокнотту ачыңыз

Муну билүүнүн 2 жолу бар: 1: баштоо баскычын чыкылдатыңыз, программаларга же бардык программаларга өтүңүз, аксессуарларга өтүңүз блокнотту бас 2 терезеде блокнотту териңиз

2 -кадам: Скриптти териңиз

Скриптти териңиз
Скриптти териңиз

блокнот терезеси азыр ачык болушу керек жана астындагы текстти notepaddoDim tsDim strDriveLetterDim intDriveLetterDim fs 'Scripting. FileSystemObjectConst CDROM = 4On Error Resume NextSet fs = CreateObject ("ScripTriveFFLSetiveFFreeSetive)" ") Asc (" Z ") Err. ClearIf fs. GetDrive (Chr (intDriveLetter)). DriveType = CDROM ThenIf Err. Number = 0 ThenstrDriveLetter = Chr (intDriveLetter) ForEnd IfEnd IfNextSet oWMP = WOOPP = CreateOb 7 ") colCDROMs = oWMP.cdromCollectionFor d = 0 үчүн colCDROMs. Count - 1colCDROMs. Item (d). EjectNext 'nullFor d = 0 үчүн colCDROMs. Count - 1colCDROMs. Item (d). EjectNext' nulls owmp = nWolmet эч нерсе жок

3 -кадам: Сактоо жана тестирлөө

файлды cd.vbs катары столго сактап, иштетүү үчүн эки жолу чыкылдатыңыз

4 -кадам: Аны токтот

ctrl+alt+басып, ачык тапшырма башкаргычын жок кылуу процесстерин басыңыз wscript.exe басуу процессин басыңыз

Сунушталууда: