Determiner si un disque est bien un disque réseau

Vous débutez et vous avez besoin d'aide ? N'hésitez pas à poser vos questions
LOULOU25
Messages : 150
Inscription : mer. 19/mai/2004 20:40

Determiner si un disque est bien un disque réseau

Message par LOULOU25 »

Quelqu'unj connait-il l'API qui permet de déterminer si une lettre d'untié est bien celle d'un réseau ?
Backup
Messages : 14526
Inscription : lun. 26/avr./2004 0:40

Message par Backup »

t-a essaye ça : GetLogicalDrives

The GetLogicalDrives function returns a bitmask representing the currently available disk drives.

DWORD GetLogicalDrives(VOID)


Parameters

This function has no parameters.

Return Value

If the function succeeds, the return value is a bitmask representing the currently available disk drives. Bit position 0 (the least-significant bit) is drive A, bit position 1 is drive B, bit position 2 is drive C, and so on.
If the function fails, the return value is zero.

ou ça

GetLogicalDriveStrings

ou Mieux ça

GetDriveType
function determines whether a disk drive is a removable, fixed, CD-ROM, RAM disk, or network drive.

:?
LOULOU25
Messages : 150
Inscription : mer. 19/mai/2004 20:40

Message par LOULOU25 »

Peux-tu me donner un pe plus de renseignements, car avec ce que tu as donné je ne peux rien en faire
Backup
Messages : 14526
Inscription : lun. 26/avr./2004 0:40

Message par Backup »

voila tout ce que j'ai
The GetDriveType function determines whether a disk drive is a removable, fixed, CD-ROM, RAM disk, or network drive.

UINT GetDriveType(

LPCTSTR lpRootPathName // address of root path
);
Parameters

lpRootPathName

Points to a null-terminated string that specifies the root directory of the disk to return information about. If lpRootPathName is NULL, the function uses the root of the current directory.

Return Value

The return value specifies the type of drive. It can be one of the following values:

Value Meaning
0 The drive type cannot be determined.
1 The root directory does not exist.
DRIVE_REMOVABLE The drive can be removed from the drive.
DRIVE_FIXED The disk cannot be removed from the drive.
DRIVE_REMOTE The drive is a remote (network) drive.
DRIVE_CDROM The drive is a CD-ROM drive.
DRIVE_RAMDISK The drive is a RAM disk.
Fait une recherche sur le Net avec cette commande !! :D
KarLKoX
Messages : 1191
Inscription : jeu. 26/févr./2004 15:36
Localisation : France
Contact :

Message par KarLKoX »

Code : Tout sélectionner

#DRIVE_UNKNOWN = 0
#DRIVE_ABSENT = 1
#DRIVE_REMOVABLE = 2
#DRIVE_FIXED = 3
#DRIVE_REMOTE = 4
#DRIVE_CDROM = 5
#DRIVE_RAMDISK = 6

retval = GetDriveType_("c:\")
select retval
   case #DRIVE_FIXED
       debug "Fixed"
   case #DRIVE_REMOTE
        debug "Remote"
    [...]
endselect


(pas eu le temps de tester)
"Qui baise trop bouffe un poil." P. Desproges
Avatar de l’utilisateur
Flype
Messages : 2431
Inscription : jeu. 29/janv./2004 0:26
Localisation : Nantes

Message par Flype »

coucou, j'ai essayé, marche nickel. les types de ma clé usb et mes raccourcis réseaux, de mes lecteurs cd sont bien identifié

Code : Tout sélectionner


Enumeration
  #DRIVE_UNKNOWN
  #DRIVE_ABSENT
  #DRIVE_REMOVABLE
  #DRIVE_FIXED
  #DRIVE_REMOTE
  #DRIVE_CDROM
  #DRIVE_RAMDISK
EndEnumeration

Procedure.s GetDriveType(Drive.s)
  Select GetDriveType_(Drive)
    Case #DRIVE_UNKNOWN   : ProcedureReturn "Unknown"
    Case #DRIVE_ABSENT    : ProcedureReturn "Absent"
    Case #DRIVE_REMOVABLE : ProcedureReturn "Removable"
    Case #DRIVE_FIXED     : ProcedureReturn "Fixed"
    Case #DRIVE_REMOTE    : ProcedureReturn "Remote"
    Case #DRIVE_CDROM     : ProcedureReturn "CD-Rom"
    Case #DRIVE_RAMDISK   : ProcedureReturn "RAM Disk"
  EndSelect
EndProcedure

Procedure EnumDrives()
  For i=0 To 25
    If ( GetLogicalDrives_() & Int(Pow(2,i)) ) <> 0
      Drive.s = Chr(65+i) + ":"
      Debug Drive + " " + GetDriveType(Drive)
    EndIf
  Next
EndProcedure

EnumDrives()
Image
Backup
Messages : 14526
Inscription : lun. 26/avr./2004 0:40

Message par Backup »

Merci Flype !! :D
Répondre