Comment faire pour ne pas provoquer d'erreur du programme lorsqu'on clique sur un lecteur cd-rom qui ne contient pas de CD ? Est-il possible de le gérer par windows (attendre que le périphérique soit prêt) .
Merci d'avance.

pourkoi tu utilises ce composant ? si c pour enregister/ouvrir un document, c p'tet mieux et + simple une boite de dialogue "ouvrir" non ?

Peut-être faire un "on error goto xxx" avant l'appel, et voir quelle est l'erreur générée (en mode "point d'arrêt" (ça existait sous VB3)) pour la dérouter ensuite automatiquement (signaler que le lecteur n'est pas prêt, est vide, a disparu ..)
sans oublier "on error go to 0" ensuite avant de quitter le SUB pour pas avoir de pb ailleurs.

Je pense que c'est ce que tu cherches ...
 
Private Sub Drive1_Change()
On Error Resume Next
 
OldPath$ = Dir1.Path
 
Dir1.Path = Drive1.Drive
If Err = 68 Then
Dir1.Path = OldPath$
MsgBox "Message d'erreur !", vbCritical + _
        vbOKOnly, "Error"
Drive1.Drive = "C:\"
Dir1.Path = "C:\Mes documents"
File1.Path = Dir1.Path
End If
End Sub