Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

sous vb 2008 EXPRESS

2 views
Skip to first unread message

mg

unread,
Mar 27, 2010, 1:29:38 PM3/27/10
to
Bonjour,
sous vb 2008 EXPRESS
Qui connait le code pour éjecter le tiroir d'un cd ou dvd
ou le code clsid pour l'éjection dans une application ?
d'avance merci
Michel

mg

unread,
Mar 28, 2010, 8:21:57 AM3/28/10
to
probleme, resolu

excuser moi !

Bill2

unread,
Mar 28, 2010, 12:41:37 PM3/28/10
to
mg wrote:
> probleme, resolu
>
> excuser moi !

Bonjour,

Ca serait sympa de donner la réponse, pour ceux que ça intéresse ...

--
Bill2
Utilisez Process Manager, gestionnaire de processus automatique :
http://www.bill2-software.com/processmanager/


mg

unread,
Apr 3, 2010, 4:37:18 AM4/3/10
to

Option Explicit On
Public Class Form1
Private 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
Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs)
Handles MyBase.Load
Dim RetVal As Long
Dim RString As String
RString = Space$(128)
RetVal = mciSendString("set CDAudio door open", RString, 128, 0)
End Sub
End Class

Bill2

unread,
Apr 3, 2010, 4:49:34 AM4/3/10
to

Ca pourrait m'être utile.
Merci :)

0 new messages