Guida Aprire e chiudere il cassetto del lettore DVD con VB.NET

[DarkPako]

Inserite il seguente codice in un modulo:

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

Inserite il seguente codice in un bottone che servirà per aprire il cassetto:

1.OpenDrawerCD("set CDAudio door open", Nothing, 127, 0)

Inserite il seguente codice in un bottone che servirà per chiudere il cassetto:

1.OpenDrawerCD("set CDAudio door closed", Nothing, 127, 0)

Ovviamente nel caso di notebook, netbook e Co. il cassetto non si richiuderà. Ciao.

fonte: web

 

[crokki95]

Ottimo provato e funziona benissimo complimenti...

 

[DarkPako]

Grazie Costy ;P

 

[pok3rlalo]

Ero convinto ke gia fosse stato postato e invece ci sono solo release, bravo a qualkuno può essere utile questa guida.

 

[crokki95]

hehe

Ero convinto ke gia fosse stato postato e invece ci sono solo release, bravo a qualkuno può essere utile questa guida.

A ME XD

 

[funnygame123]

grazie per averlo postato

 

[DarkPako]

Grazie raga

 

[Max090]

Utili bravo ^^

 

[-Dragone-]

oh!!! guardate ke coincidenza lui lo ha postato mercoledi 2 dicembre mentro quello originale il 24/10/2009 sito:

Perfavore, Entra oppure Registrati per vedere i Link!

posta la fonte prima

 

[crokki95]

Dragone ma che cazzate è normale che la fonte sia un sito internet o un altro forum oramai è inutile che la mettiamo...Oppure la mettiamo solo quando facciamo qualche cosa di nostro......

 

[-Dragone-]

Dragone ma che cazzate n.

stai calmino ma comunque la deve posta la fonte lo dice il regolamento (penso)

 

[crokki95]

Vabbe...