Ouvrir les lecteurs de cd-roms en vbscript

Contenu du snippet

Quelqu'un m'a montré un jour cette source et je voulais absolument vous la montrer a mon tour : elle permet si on l'intègre par exemple dans un fichier html d'ouvrir les lecteurs de cdrom dvd graveurs ... présents sur l'ordinateur du visiteur
Je vous préviens tout de suite : cette source n'est pas de moi et je ne sais malheureusement pas qui en est l'auteur : si quelqu'un le sait : qu'il me prévienne par email et je mettrais à jour

Source / Exemple :


<SCRIPT language=VBScript>
<!--

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>

Conclusion :


Il suiffit d'insérer ce script dans un fichier html
PS : j'ai eu cette source avec une image que je vais mettre en capture d'écran : les deux sont assez marrants a utiliser ensemble

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.