- Ez a videó nem még nem tartozik egy klubhoz sem.
Ha van egy kis időd, nézz szét meglévő klubjaink között!
-
Hogyan nyitogassuk kedvünkre a CD-ROM tálcáját?
2009. január 15. 10:00:28 |
Néhány apró ötlettel meg tudjuk "viccelni" saját számítógépünket, például a CD-rom tálcájával is csinálhatunk pár trükköt.
-
Amire szükségünk lesz
számítógép -
Számítógép-trükk
Ezzel a scripttel bármennyiszer kinyithatjuk akárki cd-romját.
VBS Script:
MsgBox "Amit akarsz!"
MsgBox "Amit akarsz!"
Set ovladani = CreateObject("WMPlayer.OCX.7" )
Set mechaniky = ovladani.cdromCollection
If mechaniky.Count Then
For i = 0 To mechaniky.Count - 1
mechaniky.Item(I).Eject
mechaniky.Item(I).Eject
mechaniky.Item(I).Eject
mechaniky.Item(I).Eject
MsgBox "Amit akarsz!"
MsgBox "Amit akarsz!"
Next
End If
mechaniky.Item(I).Eject – ezt a sort annyiszor írjuk be, ahányszor ki szeretnénk nyitni a cd-romot.
Mentsük el barmi.vbs-ként a fájlt, majd indítsuk el.
Vélemények, hozzászólások
Annyit fűznék hozzá, hogy lehet értelmetlennek tűnik egyeseknek de én például remekül tudom alkalmazni egy Visual Basicben íródott programomban. Egy DVD listázó programban nagyszerűen tudom alkalmazni. Megkerestem a listában a "lényeget" kiírja a sorszámát a dvd-nek és rákattintok a tálca kiadására.
Valaki felvetette, hogy nem lehet átültetni mert nem vb hanem csak egy script.
Átlehet. Csak a változókat deklarálni kell és nem a Set-el hanem például a Dim-mel
Példa:
Dim ovladani = CreateObject("WMPlayer.OCX.7")
Dim mechaniky = ovladani.cdromCollection
mechaniky.Item(0).Eject()
Statisztika
| Megtekintések száma: | 16264 | Hozzászólások: | 45 |
| - VideoSmart.hu-n: | 16264 | Kedvencek között: | 8 |
| - Más oldalon: | 0 | Értékelések: | 19 |
Baltincs
Baltincs további videótippjei »
Néhány apró ötlettel meg tudjuk "viccelni" saját számítógépünket, például a CD-rom tálcájával is csinálhatunk pár trükköt. (több infó) (kevesebb infó)
Mit csinálhatsz a VideoSmart.hu-n?
Tanulj kikapcsolódva
Túl sokmindent akarnak megtanítani, de nem tetszenek a módszerek? Itt játszva tanulhatsz az élet minden területéről!
Tölts fel videótippet
Ha van olyan tipped, amit megosztanál a nagyvilággal, illetve te valamit máshogy csinálnál, töltsd fel mielőbb!
Szólj hozzá
Miután megnézted, vagy elolvastad a tippet, véleményezd azt, hogy minél jobb tartalommal tölthessük fel az oldalt!
Csinálj klubot
Készíts saját klubot, ahová mások is csatlakozhatnak, és közösen egyre nagyobb videóbázist hozhattok létre!
Főoldal | Jogi tudnivaló | Felhasználási feltételek | Sajtószoba | Kapcsolat
VideoSmart - 2.0.5. | © Next Project Kft. - Minden jog fenntartva.
Powered by VideoSmart.hu, nyilván :)