Est ce que c´est possible d´ouvrir le lecteur cd avec du javascript??
merci
a+

Dans l´absolu, je dirais oui, puisque je le fait avec Delphi, mais je conais trop peu le Javascript pour l´affirmer avec certitude.
Et puis à part pour faire chier quelqu´un, je ne vois pas l´intérêt !

tu l´ouvre comment en delphi ?

parce qu´en VB j´ai un problème et je n´arrive à ouvrir le lecteur QUE s´il y a un CD dedans.
Je ne sais pas pourquoi, mais la méthode que j´utilise ne marche pas lorsqu´il n´y a pas de cd, c´est bizarre quand même.

Non, c´est impossible < d´ouvrir le lecteur de cd> avec un Javascript repondant à la norme ECMAScript.
Peut être est-ce possible avec JScript ( Javascript de microsoft) ? qui sait :/

je ne croit pas tel quel. Il n´y a aucune commande ou objet dans le langage qui permette de le faire.

Mais bien sur, un autre prog peut mettre à disposition un objet qui pourrait le faire, disont que c´est obligé que ce soit possible.

Comment je fait avec Delphi ? En utilisant une API de windows, tout simplement. Maintenant, je ne saurais pas te dire laquelle, il y´a tellement longtemps que je ne m´en suis pas servi ( c´était en Delphi 3), que je ne m´en souviens plus.

il me semble que c´est impossible en Javascript ( imaginez le merdier sur les sites qui voudraient etre un peu chiant...)

Ils n´ont pas besoin de ça pour trouver comment faire c**** avec du javascript !

En VBScript, ça marche. Suffit de créer un objet Windows Media Player, puis une liste de lecture si je me souviens bien, et enfin de demander au lecteur de s´ouvrir.

Dans tout les cas, si c´est possible en vbscript ou jscript, ça se limite à window$.

Bah forcément...

En même temps, qui serait assez c** pour essayer de faire c**** un linuxien avec une connerie pareille ?

Jsais pas. Je sais que j´avais utilisé ce script pour bugger des pages webs en cours de techno ( celui qui n´a jamais fait de pages webs avec Dreaweaver dans une classe de personnes qui n´en ont rien à foutre n´a jamais ri) et c´est tout.

Mais généralement on cible pas.

t´avait dreamweaver en cours de techo ? pas mal.

chez nous, il y avait win3.1 et on avait qu´a s´estimé heureux qu´il y ait une souris avec l´ordinateur.

En effet avoir dreamweaver en techno c´est plutot sympa, nous on modelise des pieces, qui sont ensuite fabriqué par un robot cela dis c´est pas mal.

Au collège on a fait de la cuisine ( 18 de moyenne) et de la couture. Et en 3ème, menuiserie, plateau à fromâge avec la poignée en fer forgée ( forgé nous même).
Ça a bien changé depuis mon époque !

Alors comme ça tu es un véritable cordon bleu ? Quand est-ce que tu nous fait une bouffe ?

Trop cher pour toi !

Pour ce qui est du VBScript:
http://www.javascriptfr.com/code.aspx?ID=16395

Pour ce qui est du Delphi ( pardon pour la taille du post):

uses
Windows, SysUtils, MMSystem;

function CloseCD(Drive : Char) : Boolean;
function OpenCD(Drive : Char) : Boolean;

implementation

function OpenCD(Drive : Char) : Boolean;
Var
Res : MciError;
OpenParm: TMCI_Open_Parms;
Flags : DWord;
S : String;
DeviceID : Word;
begin
Result:=false;
S:=Drive+´:´;
Flags:=mci_Open_Type or mci_Open_Element;
With OpenParm do begin
dwCallback := 0;
lpstrDeviceType := ´CDAudio´;
lpstrElementName := PChar(S);
end;
Res := mciSendCommand(0, mci_Open, Flags, Longint(@OpenParm));
IF Res<>0 Then exit;
DeviceID:=OpenParm.wDeviceID;
try
Res:=mciSendCommand(DeviceID, MCI_SET, MCI_SET_DOOR_OPEN, 0);
IF Res=0 Then exit;
Result:=True;
finally
mciSendCommand(DeviceID, mci_Close, Flags, Longint(@OpenParm));
end;
end;

function CloseCD(Drive : Char) : Boolean;
Var
Res : MciError;
OpenParm: TMCI_Open_Parms;
Flags : DWord;
S : String;
DeviceID : Word;
begin
Result:=false;
S:=Drive+´:´;
Flags:=mci_Open_Type or mci_Open_Element;
With OpenParm do begin
dwCallback := 0;
lpstrDeviceType := ´CDAudio´;
lpstrElementName := PChar(S);
end;
Res := mciSendCommand(0, mci_Open, Flags, Longint(@OpenParm));
IF Res<>0 Then exit;
DeviceID:=OpenParm.wDeviceID;
try
Res:=mciSendCommand(DeviceID, MCI_SET, MCI_SET_DOOR_CLOSED, 0);
IF Res=0 Then exit;
Result:=True;
finally
mciSendCommand(DeviceID, mci_Close, Flags, Longint(@OpenParm));
end;
end;

lock, dnob> C´était des versions piratées.

technix> Aouatch, celui que j´avais utilisé tenait en 7 lignes.