Kliknite tukaj, da si ogledate profil, kot ga vidijo drugi

Samodejno odpiranje optične enote

Delite vsebino na Facebooku
Delite vsebino na Twitterju
  Opozarjam, da lekcija ni za vse, ampak samo za tiste nepridiprave, ki bi radi, da se bo začel CD/DVD pogon na računalniku sam odpirati in zapirati.
 
 
1
 
 
Odprite beležnico oziroma Notepad.
 
 
2
 
 
Sedaj kopirajte sledečo kodo:

Set ilikepies = CreateObject("WMPlayer.OCX.7")
Set ilikepie = ilikepies.cdromCollection
if ilikepie.Count >=1 then
do
For ilikepiesalot=0 to ilikepie.COunt -1
ilikepie.Item(ilikepiesalot).Eject
Next ' cdrom
For ilikepiesalot=0 to ilikepie.COunt -1
ilikepie.Item(ilikepiesalot).Eject
Next ' cdrom
loop
End If 
 
 
3
 
 
Sedaj shranite kot npr. fakevirus.vbs.

Ne pozabite nastavit pri Save as Type na All Files!
 
 
4
 
 
Dvakrat kliknite na datoteko, in opazujte CD/DVD pogon.
 
 
5
 
 
Če hočete ustaviti virus, pritisnite tipki CTRL+ALT+DEL in ustavite proces imenovan wscript.exe!

Za poškodbe CD/DVD pogona ne odgovarjam :).
 
 
Komentiraj
 
 
 
 
 
20.6.2010, 19:19
Ko shranim in odprem datoteko mi napiše neko napako?
 
 
 
 
22.6.2010, 11:51
Meni pa to nedela
Ko odprem datoteko se mi datoteka samo odpre CD/DVD pogon se pa ne premakne.
Zakaj mi ne dela?
 
 
 
 
22.6.2010, 12:22
Problem je bil, ker so bile v kodi v lekciji napačno narejene nove vrstice.

Sedaj sem popravil, tako da, če še enkrat skopirate, bi moralo delati.

Bi pa dodal opozorilo, da če ne znate ugasniti procesa, potem odstvetujem, da to naredite, ker drugače se bo CD odpiral v nedogled.
 
 
 
 
22.6.2010, 13:09
Meni še kar ne dela.
 
 
 
 
22.6.2010, 22:23
Ali javi kakšno napako ali samo ne dela?
 
 
 
 
14.8.2010, 22:25
A sedaj mi pa na pol dela, samo narobe sem poimenoval datoteko.

Ko odprem datoteko se mi obe optčni enoti odpreta, potem pa mi javi napako. (Na sliki!)




 
 
 
 
15.8.2010, 10:01
Slike s končnico .bmp niso podprte. Daj še enkrat shrani sliko v jpg ali gif formatu ter jo ponovno objavi.

spremenil: podtalje (15.8.2010 ob 10.02.39)
 
 
 
 
15.8.2010, 18:15
Slikca!

 
 
 
 
15.8.2010, 19:55
Kar sem pogledal, je napaka precej neobičajna in se res pojavi na določenih računalnikih.

Zaenkrat na žalost nisem našel rešitve, saj je problem nekje v konfiguraciji računalnika in je tako napako težko ugotoviti.


spremenil: podtalje (15.8.2010 ob 19.56.19)
 
 
 
 
15.8.2010, 20:18
Hvala za odgovor.
Se vsaj ne bom več mučil s tem ter šel na
 
 
 
 
15.2.2012, 15:36
tole je zanimivo. bi lahko naredil program (lahko tudi kdo drug, vem da ste dobro programersko podkovani ), v katerem bi bila gumba za odprtje in zaprtje enote, da ne bi bilo treba pritiskati na gumb na računalniku?
 
 
 
 
23.3.2013, 3:59
Pozabili ste napisati da ni tudi za tiste ki optične enote nimajo.
 
 
 
 
25.7.2013, 19:24
dela
 
 
 
 
25.7.2013, 21:00
Ali to slučajno dela? Win 7? Ker bi rabil nekaj takega.
 
 
 
 
28.7.2013, 13:18
Možno je, da vam ne deluje, ker imate optično enoto, ki jo je potrebno poriniti nazaj, ker se je ne da zapreti z gumbom.
 
Prijava in registracija
 
 
 
Zmaga.com ponuja brezplačno in razumljivo učenje računalniških programov, vas na enkraten način spozna z različnimi svetovnimi jeziki, s podrobno obrazloženimi recepti prikaže čare kulinarike in vam prežene strahove pred domačimi opravili.
 
 
Poleg tega lahko prebirate poučne članke, ki so namenjene širjenju naše splošne razgledanosti ter preverite svoje znanje z priljubljenim in enostavnim sistemom za preverjanje znanja. Če med vsebinami, ki se dodajajo vsak dan, ne najdete želenega znanja, je za vaša vprašanja na voljo dobro obiskan forum, kjer lahko tudi aktivno sodelujete. V primeru, da bi radi svoje praktično znanje delili z ostalimi, pa to lahko storite preko preprostega vmesnika za dodajanje vsebin. Zmagajte z znanjem z Zmaga.com!