... me falta pulirlo un poco más para las unidades de CD - DVD o Extraibles, ando en eso.. Estudiando un poco el Ejemplo de Protect.Prg de Fivewin mejore el código, lo pongo como quedo funcionando para mis necesidades: #Include "FIVEWIN.CH" FUNCTION Main() LOCAL aDatos:= InfoDisco("C:")MSGInfo(aDatos[1],"Nombre")MSGInfo(aDatos[2],"Serial")MSGInfo(aDatos[3],"Interface")RETURN ...