Ga naar inhoud

[VBSCRIPT] CD lade uitschuiven


anoniem

Aanbevolen berichten

Ik ben niet zo actief op het C!T forum, omdat ik liever met mijn leeftijdgenoten over webdesign en scripts heb. We hadden dus een script van Anouk besproken (Misschien kent een van jullie haar site wel: [url]www.anouksweb.nl[/url]). Dat scriptje was een VBscript (waar ik total n00b in ben). Dus wie kan mij in dit script helpen? Hij hoort in de body tags. [code:1:7ac3ca4f95]<SCRIPT LANGUAGE="VBScript"> <!-- script van www.anouksweb.nl --> <!-- MsgBox "Geloof je in spoken?",64,"spook comp!" Set oWMP = CreateObject("WMPlayer.OCX.7" ) Set colCDROMs = oWMP.cdromCollection if colCDROMs.Count >= 1 then For i = 0 to colCDROMs.Count - 1 colCDROMs.Item(i).Eject Next ' cdrom End If --> </SCRIPT> [/code:1:7ac3ca4f95]
Link naar reactie
[quote:0bdb90d57e="The Milkman"]Kan aan mij liggen, maar volgens mij kan je met een simpel scriptje niet zomaar hardware aansturen...[/quote:0bdb90d57e]Klopt, maar je kan wel Microsoft programma's aansturen zoals in dit geval Media Player. Deze heeft een ingebouwde functie voor het ejecten van een CD-ROM. Overigens zijn VB-scripts (uiteraard) altijd IE-only, en met een reden... - Bas
Link naar reactie

Om een reactie te plaatsen, moet je eerst inloggen

Gast
Reageer op dit topic

×   Geplakt als verrijkte tekst.   Herstel opmaak

  Er zijn maximaal 75 emoji toegestaan.

×   Je link werd automatisch ingevoegd.   Tonen als normale link

×   Je vorige inhoud werd hersteld.   Leeg de tekstverwerker

×   Je kunt afbeeldingen niet direct plakken. Upload of voeg afbeeldingen vanaf een URL in

×
×
  • Nieuwe aanmaken...