Tester présence d'un cdrom ?

Signaler
Messages postés
18
Date d'inscription
vendredi 22 août 2003
Statut
Membre
Dernière intervention
30 janvier 2004
-
cs_pfft
Messages postés
18
Date d'inscription
vendredi 22 août 2003
Statut
Membre
Dernière intervention
30 janvier 2004
-
Comment faire pour tester la présence d'un cdrom (et gérer cette erreur ) dans un lecteur choisi pour eviter le plantage avec un dir...

Merci

2 réponses

Messages postés
21042
Date d'inscription
jeudi 23 janvier 2003
Statut
Modérateur
Dernière intervention
21 août 2019
18
API:
teste le retour de GetVolumeInformation en ayant modifie le flag avec SetErrorMode au prealable.
BruNews, ciao...
Messages postés
18
Date d'inscription
vendredi 22 août 2003
Statut
Membre
Dernière intervention
30 janvier 2004

Merci pour le tuyau...

J'ai fait quelques tests sur GetVolumeInformation et il se trouve qu'il renvoit le numéro de série du cd...et il renvoit 0 quand il n'y a pas de cd !! formidable !!

Dim No&, s As String * 256
Dim s2 As String * 256

Call GetVolumeInformation(chemin, s, 256, No, 0&, 0&, 0&, 256)

If No = 0 Then GoTo erreur