Strona: [  << <   1   > >>  ]  z  1     
Autor Temat: Jak sprawdzić czy napęd istnieje ?
DJK



Typ: neutral
Postów: 871
Zarejestrowany: Feb 2004
Jak sprawdzić czy napęd istnieje ?

Z tym ze może to być np. CD-ROM

Przy użyciu Dir zwraca 0 gdy CD-ROM jest pusty dlatego ta funkcja raczej odpada no chyba ze sie mylę.

Pozdrawiam


_____________________________________________
Jeśli można coś zrobić w sposób optymalny to czemu nie

12-10-2004 20:41
Pokaż profil DJK  Wyślij email do DJK   Odwiedź stronę DJK  
bisiek




Typ: neutral
Postów: 487
Zarejestrowany: Jul 2003

Declare Function GetDriveType Lib "kernel32.dll" Alias "GetDriveTypeA" (ByVal nDrive As String) As Long

Const DRIVE_CDROM = 5            'CD-ROM
Const DRIVE_FIXED = 3                'dysk twardy
Const DRIVE_RAMDISK = 6        'dysk RAM
Const DRIVE_REMOTE = 4          'dysk sieciowy
Const DRIVE_REMOVABLE = 2  'wymienialny (np. dyskietka 3,5'' albo Omega Zip)

nDrive    - litera napędu


Jeżeli nie ma takiego dysku funkcja zwraca 0.


_____________________________________________
www.mob.abc.pl - moja strona o VB

12-10-2004 21:26
Pokaż profil bisiek  Wyślij email do bisiek   Odwiedź stronę bisiek       3380672
DJK



Typ: neutral
Postów: 871
Zarejestrowany: Feb 2004

Ok dzięki - temat zamknięty


_____________________________________________
Jeśli można coś zrobić w sposób optymalny to czemu nie

17-10-2004 17:53
Pokaż profil DJK  Wyślij email do DJK   Odwiedź stronę DJK  
Wszystkich odpowiedzi: 2 :: Maxymalnie na stronę: 20
Strona: [  << <   1   > >>  ]  z  1