Pour qlq'un qui connait le langage vb

Fermé
micro - 15 mai 2005 à 19:34
lorenzonowar Messages postés 350 Date d'inscription vendredi 17 novembre 2000 Statut Contributeur Dernière intervention 25 octobre 2010 - 26 mai 2005 à 23:47
je voulais juste demander que je veux avoir le code pour desactiver l'effet de "ctrl+alt+suppr" et je veux auusi avoir le code vb equivalent pour faire sotir et entrer le lecteur cd

ET MERCI D'AVANCE
A voir également:

3 réponses

lami20j Messages postés 21331 Date d'inscription jeudi 4 novembre 2004 Statut Modérateur, Contributeur sécurité Dernière intervention 30 octobre 2019 3 569
16 mai 2005 à 07:33
Utiliser les fonction API

1. ejecter le cd ou ouvrir le lecteur cd
Faut créer une feuille avec un bouton de commande.
Il faut declarer dans la section General
  Public Declare Function mciSendString Lib "winmm.dll" _
     Alias "mciSendStringA" _
    (ByVal lpstrCommand As String, _
     ByVal lpstrReturnString As String, _
     ByVal uReturnLength As Long, _
     ByVal hwndCallback As Long) As Long

Et après le code qui est éxécuté par le bouton
Private Sub Command1_Click()

   Call mciSendString("Set CDAudio Door Open Wait", 0&, 0&, 0&)

End Sub


2. Pour sortir le cd il faut utiliser Door Closed
0
Foane fabrice
16 mai 2005 à 19:19
Bonjour tu as juste à utiliser cette fonction API.
si ca marche pas tu peux à tout moment me contacter à mon adresse e-mail je l'ai déja fait ton truc mais j'ai peux de souvenir.

*Public Declare Function mciSendString Lib "winmm.dll" _
Alias "mciSendStringA" _
(ByVal lpstrCommand As String, _
ByVal lpstrReturnString As String, _
ByVal uReturnLength As Long, _
ByVal hwndCallback As Long) As Long


bonne chance.
0
lorenzonowar Messages postés 350 Date d'inscription vendredi 17 novembre 2000 Statut Contributeur Dernière intervention 25 octobre 2010 22
26 mai 2005 à 23:47
Salut,
qqun connait il ce code pour ouvrir le tiroir CD mais en HTML pour que, en cliquant sur un lien hypertexte, le tiroir s'ouvre?
Merci
0