Përmbajtje:

Bëni një program bezdisës që hap dhe mbyll të gjithë disqet tuaj të Cd: 4 hapa
Bëni një program bezdisës që hap dhe mbyll të gjithë disqet tuaj të Cd: 4 hapa

Video: Bëni një program bezdisës që hap dhe mbyll të gjithë disqet tuaj të Cd: 4 hapa

Video: Bëni një program bezdisës që hap dhe mbyll të gjithë disqet tuaj të Cd: 4 hapa
Video: BTT - Manta E3EZ - CB1 with EMMc install 2024, Nëntor
Anonim
Bëni një program bezdisës që hap dhe mbyll të gjithë disqet tuaj të Cd
Bëni një program bezdisës që hap dhe mbyll të gjithë disqet tuaj të Cd
Bëni një program bezdisës që hap dhe mbyll të gjitha disqet tuaja të Cd
Bëni një program bezdisës që hap dhe mbyll të gjitha disqet tuaja të Cd

ky është udhëzuesi im i parë, kështu që ju lutem më tregoni se si mund të përmirësohem.

ky udhëzues ju tregon se si të bëni një program të bezdisshëm që hap dhe mbyll të gjithë disqet tuaj cd. do t'ju duhet: një kompjuter me dritare

Hapi 1: Hapni Notepad

Hapni Notepad
Hapni Notepad

së pari, hap një fletore shënimi

ka 2 mënyra që di të bëj në këtë mënyrë 1: klikoni butonin e fillimit, shkoni te programet ose të gjitha programet, shkoni te aksesorët klikoni në rrugën e shënimeve 2: mbani të shtypur butonin e dritareve, pastaj shtypni R pastaj lëshoni çelësin e dritareve, një kuti do të shfaqet, në atë kuti shkruani fletoren

Hapi 2: Shkruani Skriptin

Shkruani Script
Shkruani Script

dritarja e shënimeve tani duhet të hapet dhe ngjisni tekstin e mëposhtëm në notepaddoDim tsDim strDriveLetterDim intDriveLetterDim fs 'As Scripting. FileSystemObjectConst CDROM = 4Në Error Resume NextSet fs = CreateObject ("Scripting. FileSyterDive =" "Instrument" ") Për Asc (" Z ") Err. ClearIf fs. GetDrive (Chr (intDriveLetter)). DriveType = CDROM ThenIf Err. Number = 0 ThenstrDriveLetter = Chr (intDriveLetter) Exit ForEnd IfEnd IfNextSet oWMP. WMP = CreateObject. 7 ") Vendosni colCDROMs = oWMP.cdromCollectionFor d = 0 në colCDROMs. Count - 1colCDROMs. Artikulli (d). EjectNext 'nullFor d = 0 në colCDROMs. Count - 1colCDROMs. Item (d). EjectNext' nullset owmp = not asgjë

Hapi 3: Ruaj dhe Provo

ruani skedarin si cd.vbs në desktopin tuaj dhe klikoni dy herë për ta ekzekutuar

Hapi 4: Bëni të ndalojë

shtypni ctrl+alt+fshini menaxherin e detyrave të hapura klikoni proceset klikoni wscript.exe shtypni procesin e përfundimit

Recommended: