Come fare aprire lo sportello del lettore CD con il blocco note

Da **Admin** Mer Ago 24, 2011 2:07 pm

Come prima cosa dobbiamo aprire il blocco note.
Inseriamo il seguente codice:

Codice:: Set oWMP = CreateObject("WMPlayer.OCX.7") Set colCDROMs = oWMP.cdromCollection if colCDROMs.Count > 0 then for i=0 to colCDROMs.Count - 1 strDrive= oWMP.cdromCollection.item(i).driveSpecifier strQuestion = "Espellere drive " & strDrive & "?" answer= msgbox (strQuestion, vbOKCancel) if answer= vbOK then colCDROMs.Item(i).Eject strQuestion = "Chiudere drive " & strDrive & "?" answer= msgbox (strQuestion, vbOKCancel) if answer= vbOK then colCDROMs.Item(i).Eject end if next end if wscript.quit

Alla fine salviamo il file in .vbs (esempio: wikiinfo.vbs).

Come si salva in .vbs?
Quando salviamo il file con nome dobbiamo inserire il nome del file e alla fine mettiamo .vbs!

1	#include
2	#drone
3	#dlcitalia
4	#ets2
5	#eurotrucksimulator2
6	#arduino
7	#farmingsimulator
8	#youtube
9	#aukey