Comment détecter si une unité de stockage amovible (par exemple CD, clé USB, appareil photo USB, ?) a été ajoutée ou enlevée ? SI PAS USBDétecteStockageAmovible("ProcédureUSB") ALORS
Erreur(ErreurInfo())
FIN
//----------------------------------------
PROCEDURE ProcédureUSB(Lettre, Action)
SI Action = StockageAmovibleInséré ALORS
Info(Lettre + ": Inséré")
SINON
Info(Lettre + ": Ejecté")
FIN |