Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Hard disc
Message
 
À
30/03/2001 00:17:56
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Titre:
Divers
Thread ID:
00490204
Message ID:
00490225
Vues:
8
Try GetDriveType API Funcion:
DECLARE INTEGER GetDriveType IN Win32API STRING DriveName

FOR drv_lett = 65 TO 90 && Letters of drives A-Z
test_drv = CHR(drv_lett)+":\"+CHR(0)
drv_type = GetDriveType(test_drv)
DO CASE
CASE drv_type = 2 && drive is a Floppy
CASE drv_type = 3 && drive is a Hard Disk
CASE drv_type = 4 && drive is a mapped Network drive
CASE drv_type = 5 && drive is a CD-ROM
ENDCASE
ENDFOR


HTH
Boris
Against Stupidity the Gods themselves Contend in Vain - Johann Christoph Friedrich von Schiller
The only thing normal about database guys is their tables.
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform