Skip Navigation Links
Novas Tecnologias
Ferramentas Adicionais
Ferramentas Adicionais


Dica No :
839
Assunto : VB.NET
Titulo: Abrir e fechar o CDRom

Gostou do texto ? Vote e dê sua opinião! Pontuação atual :

Translate this page now :






Adicione aos Favoritos!
BlogBlogs Rec6 Linkk Ueba Technorati Delicious DiggIt! StumbleUpon



Na dica em http://www.bufaloinfo.com.br/dicas.asp?cod=137 mostramos como abrir e fechar a porta do drive de CD, o que pode ser útil para aplicações que utilizam dados em CD.

Para fazer o mesmo em .NET basta utilizar o que é chamado de PInvoke, uma chamada a código não gerenciado.

Primeiramente declaramos a sub :

<DllImport("winmm.dll")> _
Public Shared Function mciSendString(ByVal command As String, ByVal buffer As StringBuilder, _
ByVal bufferSize As Int32, ByVal hwndCallback As IntPtr) As Int32

End Function


O atributo <dllImport> indica que se trata de uma sub existente em uma dll externa, em código não gerenciado.

Feito isso podemos em qualquer local do código chamar a abertura ou fechamento do CD :

Abertura :

mciSendString("set CDAudio door open", nothing, 127, IntPtr.Zero)

Fechamento :

mciSendString("set CDAudio door closed", nothing, 127, IntPtr.Zero)



Nome :
E-mail:
Comentarios :
 
 
Os Últimos Comentários
data: 2/1/2017 1:12:00 AM
nome: hTLvrMxpiDIONQ
email: derby451@hotmail.com
comentário:
kiiIL0 http://www.y7YwKx7Pm6OnyJvolbcwrWdoEnRF29pb.com

data: 1/31/2017 10:35:00 AM
nome: byJgffegnyPi
email: derby451@hotmail.com
comentário:
FrzQ9w http://www.y7YwKx7Pm6OnyJvolbcwrWdoEnRF29pb.com

data: 1/30/2017 12:16:00 AM
nome: FBxhcDSUiIpYcz
email: derby451@hotmail.com
comentário:
Gg5GX2 http://www.y7YwKx7Pm6OnyJvolbcwrWdoEnRF29pb.com

data: 1/29/2017 11:07:00 PM
nome: FXZczIVfvTqyoxjed
email: jogcbfn@hotmail.com
comentário:
v9OzTl http://www.y7YwKx7Pm6OnyJvolbcwrWdoEnRF29pb.com

data: 1/29/2017 7:52:00 AM
nome: cSOyHUbsOwD
email: jogcbfn@hotmail.com
comentário:
NfIvgE http://www.y7YwKx7Pm6OnyJvolbcwrWdoEnRF29pb.com

 1  
Dicas
Dica do Dia
Receba Dicas Por Email
E-mail :  
 


 (help)
Aceito receber informativos do devASPNet, informações de eventos e treinamentos

Veja Quais Informativos Você Receberá

Pesquisar Dicas
Pesquisar Artigos, Dicas e Noticias

Banco de Dados
Algumas Entrevistas
Links Importantes

Búfalo Informática, Treinamento e Consultoria
R. Alvaro Alvim, 37/920 Centro - Cinelândia - Rio de Janeiro Cep: 20031-010
Tel : (21) 2262-1368 (21) 9240-5134 E-mail : Contato@bufaloinfo.com.br