|
07.08.09, 11:18
| #1 (permalink) |
| ♥ ...  Üyelik tarihi: Ağu 2009
Mesajlar: 1.622
Ettiği Teşekkür Sayısı: 88
65 Konuda 78 Teşekkür Aldı
 |  CDROM Açma- Kapama Kod: Private Declare Function mciExecute Lib "winmm.dll" (ByVal lpstrCommand As String) As Long
Private Sub Command1_Click()
mciExecute ("set cdaudio door open") 'Cdrom aç
End Sub
Private Sub Command2_Click()
mciExecute ("set cdaudio door closed") ' Cdrom kapat
End Sub
|
|  |
adresine bildirebilirsiniz, şikayetiniz incelenip en kısa sürede gereken yapılır.
Normal
