Comment vérifier la présence d'un disque en VB.Net?

Bonjour à tous,

Aprés des essais avec WM_DEVICECHANGE et directory.exist, je cherche à vérifier la présence d'une carte (CF, SD...) dans un lecteur 6en1 avant de faire les opérations lecture/écriture.

le but est simple : envoyer un message si pas de lecteur, sinon copier les photos sur le pc.

Existe t-il des exemples utilisant QueryDosDevice en VB.Net ou sinon en VBScript?

Merci d'avance



Jeune progammeur de 43 ans

labout

Salut
Voila

nécessite Imports Sytem

Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
' Sample for the Environment.GetLogicalDrives method
Dim x As String

Dim drives As [String]() = Environment.GetLogicalDrives()
x = "GetLogicalDrives: {0}" & [String].Join(", ", drives)

'
'
'x(0) =: A:\, C:\, D:\
'

End Sub

Programmeur de 57 ans !!

Merci je vais tester demain matin.




Jeune progammeur de 43 ans

Pour Labout,

J'ai essayé , je récupére bien la liste des disques disponibles, mais les disques correspondants au lecteur de carte 6en1 sont toujours vus qu'il y ai une carte dedans ou pas.
je teste la présence du lecteur 6en1 par la fonction WM_DeviceChange qui détecte les ajouts/suppression de matériel (USB, carte PCMCIA...).


J'ai essayé un OnError sur Directory.exists, mais il y a un temps de réponse trés long avant de récupérer le message system de disque non accessible. pour l'instant c'est le seul moyen que j'ai trouvé.

Merci

Patrick



Jeune progammeur de 43 ans