Podrías usar algo asÍ:
Local cDrives,cLetra,lPusoPen
lPusoPen = .f.
cDrives = [D:,E:,F:,G:,H:,I:,J:,K:]
For i = 1 to GetWordCount(cDrives,[,])
cLetra = GetWordNum(cDrives,i,[,])
n = DriveType(cLetra)
If InList(DriveType(cLetra),2,4) && puso un pendrive
lPusoPen = .t.
Exit
endif
EndFor
El código anterior verifica si el usuario puso un pendrive, para hacer el
backup. La letra en donde puso el pendrive la captura la propiedad cLetra.
Fijate la ayuda para la función DriveType y lo sacás al toque.
Rafael Copquin
----- Original Message -----
From: Julio C. Lascano
To: GUFA List Member
Sent: Wednesday, November 18, 2009 8:26 PM
Subject: [spam] [GUFA] Lectora grabadora de CD
Buenas tardes, en una red las terminales tienen configurada la
grabadora-lectora de CD con distintas letras, ¿hay alguna función que me
permita determinar esa letra en un formulario?, es a los efectos de realizar
copias en el CD automáticamente.
Gracias de antemano por vtra ayuda
Saludos
Julio C. Lascano
Río Cuarto - Cba
