kan ik met javascript een vb script nadoen?? en hoe??

Status
Niet open voor verdere reacties.

bartspagina

Gebruiker
Lid geworden
24 aug 2008
Berichten
119
ik heb een vb script gemaakt:

strTitle = "cd/dvd station"
msgbox "hallo. om de stations te openen moet je de vlogende vraag beantwoorden...",64+4096,strTitle
a=inputbox("Wat voor spel ga je spelen??")
msgbox "oke"
Msgbox"klik op ok om het station voor je cd en/of dvd open te doen. "
Set oWMP = CreateObject("WMPlayer.OCX.7")
Set colCDROMs = oWMP.cdromCollection
if colCDROMs.Count >= 1 then
For i = 1 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next
Dim oWMP
Dim colCDROMs, i
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
msgbox"klik op ok om het dvd en/of cd station te sluiten"
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next
End If
oWMP.close
Set colCDROMs = Nothing
Set oWMP = Nothing
End if
msgbox"klaar voor lancering programma!"
Wscript.Sleep 100000
if msgBox("Wilt u stoppen?", vbYesNo, "vraag") = vbYes then
msgbox "bedankt voor de moeite!"
else
msgbox "ok, ga maar verder!"
end if

hoe zet ik dat om naar javascript??
 
Als ik jou was zou ik even de inleiding over Javascript op w3schools.com lezen. Houd er rekening mee dat in Javascript alle functies en variable hoofdlettergevoelig zijn.
http://w3schools.com/js/default.asp

Als vervanging for "msgbox(string)" heb je "alert(string)"
In plaats van "set variable = value" gewoon "variable = value"
ipv "dim variable" -> "var variable"
Na elke opdracht een semicolumn ";"

Alleen ik weet vrij zeker dat je de dvd/cd-speler niet kunt openen vanuit Javascript.
 
Waarom is het eigenlijk nodig om je CD-Rom drive te openen vanuit javascript? Je kunt verder toch weinig doen met de CD die erin zit.
 
Lol, je kan mensen doen verschieten (laten denken dat ze met een virus zitten) dat zal waarschijnlijk zo wat alles zijn :D
 
Status
Niet open voor verdere reacties.

Nieuwste berichten

Terug
Bovenaan Onderaan