francisco
28 de Diciembre del 2003

Como puedo controlar la disquetera pasa saber si han introducido un disco

jared_sc
28 de Diciembre del 2003

no estoy seguro pero mas o menos este es el codigo, no lo he probado muy bien. Debes agregar la referencia Microsoft Scripting Runtime.

Dim fso As New Scripting.FileSystemObject
Dim dr As Drive

For Each dr In fso.Drives
If dr.IsReady And dr.Path = "A:" Then Call copiarA
'Next