Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Développement Développement Visual Basic FSO, type de lecteur

FSO, type de lecteur

8 réponses
Avatar
Jean
Bonjour,

Dans FSO la propriété DRIVETYPE de l'objet DRIVE permet d'obtenir le type du
lecteur(réseau, cd..).
Y a t 'il un objet correspondant dans VB.NET permettant d'obtenir ce
renseignement ??
(ainsi que l'espace disponible sur un lecteur)
Merci à tous et bonne journée.
Jean
Signaler un problème avec ce contenu

8 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Jacques
Bonjour,

Voici peut-être de quoi t'aider...

Public Declare Function GetDriveType Lib "kernel32" _
Alias "GetDriveTypeA" (ByVal nDrive As String) As Integer

Private Sub btnDriveType_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles btnDriveType.Click
'Display the Drive type for the Drive letter they entered

Dim strMyDrive As String
strMyDrive = txtDrive.Text + ":"

Select Case GetDriveType(strMyDrive)
Case 2
MessageBox.Show("Drive type: Removable")
Case 3
MessageBox.Show("Drive type: Fixed")
Case Is = 4
MessageBox.Show("Drive type: Remote")
Case Is = 5
MessageBox.Show("Drive type: Cd-Rom")
Case Is = 6
MessageBox.Show("Drive type: Ram disk")
Case Else
MessageBox.Show("Drive type: Unrecognized")
End Select
End Sub



"Jean" a écrit dans le message de
news:4296dc95$0$21638$
Bonjour,

Dans FSO la propriété DRIVETYPE de l'objet DRIVE permet d'obtenir le type


du
lecteur(réseau, cd..).
Y a t 'il un objet correspondant dans VB.NET permettant d'obtenir ce
renseignement ??
(ainsi que l'espace disponible sur un lecteur)
Merci à tous et bonne journée.
Jean




Avatar
Vincent Poyo
tu peux toujours utiliser ton filesystemobject
Il suffit de rajouter a ton projet une référence
cliques sur l'onglet com et va chercher microsoft scripting runtime

un petit dim fso as new Scripting.FileSytemObject et le tour est joué
le reste c'est comme avant ^^


"Jacques" a écrit dans le message de news:
%
Bonjour,

Voici peut-être de quoi t'aider...

Public Declare Function GetDriveType Lib "kernel32" _
Alias "GetDriveTypeA" (ByVal nDrive As String) As Integer

Private Sub btnDriveType_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles btnDriveType.Click
'Display the Drive type for the Drive letter they entered

Dim strMyDrive As String
strMyDrive = txtDrive.Text + ":"

Select Case GetDriveType(strMyDrive)
Case 2
MessageBox.Show("Drive type: Removable")
Case 3
MessageBox.Show("Drive type: Fixed")
Case Is = 4
MessageBox.Show("Drive type: Remote")
Case Is = 5
MessageBox.Show("Drive type: Cd-Rom")
Case Is = 6
MessageBox.Show("Drive type: Ram disk")
Case Else
MessageBox.Show("Drive type: Unrecognized")
End Select
End Sub



"Jean" a écrit dans le message de
news:4296dc95$0$21638$
Bonjour,

Dans FSO la propriété DRIVETYPE de l'objet DRIVE permet d'obtenir le type


du
lecteur(réseau, cd..).
Y a t 'il un objet correspondant dans VB.NET permettant d'obtenir ce
renseignement ??
(ainsi que l'espace disponible sur un lecteur)
Merci à tous et bonne journée.
Jean








Avatar
Zoury
> un petit dim fso as new Scripting.FileSytemObject et le tour est joué
le reste c'est comme avant ^^



yep.. c'est comme avant...

Quels sont les désavantages du FSO
http://faq.vb.free.fr/index.php?question6

;O)

--
Cordialement
Yanick
MVP pour Visual Basic
Avatar
Zoury
Bonjour ! :O)

Voici la liste des constantes si vous intéresse :
'***
Public Const DRIVE_REMOVABLEAs Int32 = 2
Public Const DRIVE_FIXED As Int32 = 3
Public Const DRIVE_REMOTE As Int32 = 4
Public Const DRIVE_CDROM As Int32 = 5
Public Const DRIVE_RAMDISK As Int32 = 6
'***

--
Cordialement
Yanick
MVP pour Visual Basic
Avatar
Jacques93
Bonsoir Zoury,
Zoury a écrit :
un petit dim fso as new Scripting.FileSytemObject et le tour est joué
le reste c'est comme avant ^^




yep.. c'est comme avant...




[...]

Mais plus pour longtemps ?

http://msdn2.microsoft.com/library/k22c1a85(en-us,vs.80).aspx

Suffit d'être patient... :-)

--
Cordialement,

Jacques.
Avatar
Zoury
Bonjour ! :O)

Il est également possible d'employé les classes de System.Management (WMI)
'***
Option Explicit On

Imports System.Management

Public Enum DriveType
Removable = 2
Fixed = 3
Remote = 4
CdRom = 5
RamDisk = 6
End Enum

Module MainModule

Public Sub Main()

Console.WriteLine(GetDriveType("c:"))

End Sub

Public Function GetDriveType(ByVal sDrive As String) As DriveType

Dim mo As ManagementObject = New
ManagementObject(String.Format("Win32_LogicalDisk.DeviceID='{0}'", sDrive))
Return CType(Convert.ToInt32(mo("DriveType")), DriveType)

End Function

End Module
'***

--
Cordialement
Yanick
MVP pour Visual Basic

"Jean" a écrit dans le message de
news:4296dc95$0$21638$
Bonjour,

Dans FSO la propriété DRIVETYPE de l'objet DRIVE permet d'obtenir le type


du
lecteur(réseau, cd..).
Y a t 'il un objet correspondant dans VB.NET permettant d'obtenir ce
renseignement ??
(ainsi que l'espace disponible sur un lecteur)
Merci à tous et bonne journée.
Jean




Avatar
Zoury
en effet ! :O)

--
Cordialement
Yanick
MVP pour Visual Basic
Avatar
Jean
Bonjour,
Merci à tous pour votre aide.
Bon boulot
Jean


"Jean" a écrit dans le message de
news:4296dc95$0$21638$
Bonjour,

Dans FSO la propriété DRIVETYPE de l'objet DRIVE permet d'obtenir le type


du
lecteur(réseau, cd..).
Y a t 'il un objet correspondant dans VB.NET permettant d'obtenir ce
renseignement ??
(ainsi que l'espace disponible sur un lecteur)
Merci à tous et bonne journée.
Jean