Accueil > > > SANS API SCAN VOTRE PC + INFOS SUR LES DISQUES
 SANS API SCAN VOTRE PC + INFOS SUR LES DISQUES
 Information sur la source
 Description
 Source
- Private Sub Command1_Click()
- Dim fso, d, dc, s
- Set fso = CreateObject("Scripting.FileSystemObject")
- Set dc = fso.Drives
- s = "Voici les Disques de votre PC." & vbCrLf
- st = "Voici les Espaces libres de vos disques non vides." & vbCrLf
- On Error Resume Next
- For Each d In dc
- s = s & vbCrLf & d.DriveLetter & ": "
- st = st & vbCrLf & d.DriveLetter & ": " & "Espace disponible : " & FormatNumber(d.FreeSpace / 1024, 0) & " Ko"
- Next
- ShowDriveList = s
- MsgBox s, vbYes, "Résultat"
- MsgBox st, vbYes, "Résultat"
-
- End Sub
-
Private Sub Command1_Click()
Dim fso, d, dc, s
Set fso = CreateObject("Scripting.FileSystemObject")
Set dc = fso.Drives
s = "Voici les Disques de votre PC." & vbCrLf
st = "Voici les Espaces libres de vos disques non vides." & vbCrLf
On Error Resume Next
For Each d In dc
s = s & vbCrLf & d.DriveLetter & ": "
st = st & vbCrLf & d.DriveLetter & ": " & "Espace disponible : " & FormatNumber(d.FreeSpace / 1024, 0) & " Ko"
Next
ShowDriveList = s
MsgBox s, vbYes, "Résultat"
MsgBox st, vbYes, "Résultat"
End Sub
 Sources du même auteur
 Sources de la même categorie
 Commentaires et avis
 Discussions en rapport avec ce code source dans le forum
[WMI] recuperer l'espace disponible d'un disque [ par nicobox2 ]
Bonjour,J'ai fait une requete wmi qui affiche les tailles des disques d'un serveur distant, cependant je n'arrive pas à récupere l'information du pour
Comment connaitre l'espace libre d'un disque ? [ par copper ]
Salut,Je souhaiterai savoir comment on peut détérminer l'espace libre d'un disque en FAT32 (> 2048 Mo).
espace disque [ par swan94 ]
Salut à tous,je cherche à savoir comment trouver en VB2005 l'espace total et l'espace disponible sur le disque dur d'un autre poste présent sur le rés
WMI [ par flopad ]
Bonjour, j'ai récupéré le code suivant et je voudrais afficher également en pourcentage l'espace disque dispo, comment faire cela.
Somme des lignes d'un tableau. [ par Marneus73 ]
Bonjour à tous.J'ai crée un programme qui note dans un tableau de 10 lignes l'espace disque disponnible sur chaque disque dur de l'ordinateur. Au fina
Comment connaitre l'espace disponible sur un compte? [ par RMOINAS ]
SalutVoilà j'aimerais savoir comment avec la fonction inet je peux trouver l'espace disponible sur un compte (wanadoo, free, etc)Merci de me repondre+
Espace disque dur [ par guicore ]
Bonjour à tous ! Je souhaiterais savoir comment faire pour récupérer l'espace restant, utilisé et totale, de plusieurs disques durs de plusieurs serv
Espace disque dur [ par guicore ]
Bonjour à tous ! Je souhaiterais savoir comment faire pour récupérer l'espace restant, utilisé et totale, de plusieurs disques durs de plusieurs serv
Probleme au niveau de la mémoire disque [ par pataccess ]
Bonsoir tout le mondeEncore une question et pas des moindre. JE suis toujours sur Access avec une requête qui ne veux pas s'exécuter ! En ef
|
Derniers Blogs
 PRéSENTATION DES API REST DE WINDOWS AZURE : LISTER LES COMPTES DE STORAGEPRéSENTATION DES API REST DE WINDOWS AZURE : LISTER LES COMPTES DE STORAGE par richardc
http://www.c2idotnet.com/articles/presentation-des-api-rest-de-windows-azure-lister-les-comptes-de-storage
Désolé pour "toto", mais c2i existait avant blogs.developpeur.org et c'est mon site "officiel" ;-) ...
Cliquez pour lire la suite de l'article par richardc [HTML5] SLIDES ET DéMOS : AUTOUR DU W3C , NOUVEAUX STANDARDS ET WEB MOBILE (LILLE)[HTML5] SLIDES ET DéMOS : AUTOUR DU W3C , NOUVEAUX STANDARDS ET WEB MOBILE (LILLE) par Gio
Très bonne après-midi passée lors cette conférence avec le W3C, organisée par L' Inria sur les nouveaux standards, ce Mardi 14 Février, on sent vraiment que çà bosse au W3C, et l'avenir est très très prometteur pour le HTML5, notamment ...
Cliquez pour lire la suite de l'article par Gio GESTION D'EXCEPTION AVEC LES TASKSGESTION D'EXCEPTION AVEC LES TASKS par richardc
Nous avons vu dans un précédent article comment utiliser Task pour effectuer des opérations dans un autre thread.
Malheureusement, comme tout le monde n'est pas parfait, il se peut que cette exécution se passe mal et qu'une exception se produise.
La...
Cliquez pour lire la suite de l'article par richardc DéMARRONS AVEC LES TASKSDéMARRONS AVEC LES TASKS par richardc
Que vous le vouliez ou non, le développement multi-tâche est maintenant une obligation pour toute nouvelle application. Il est donc vital d'en comprendre les mécanismes et de s'y mettre le plus tôt possible.
En attendant le .NET Framework 4.5 avec le...
Cliquez pour lire la suite de l'article par richardc
Logiciels
 DocTranslate (V3.1.0.0)DOCTRANSLATE (V3.1.0.0)DocTranslate est un traducteur de document Microsoft Word, PowerPoint et Excel. Il permet d'autom... Cliquez pour télécharger DocTranslate Tribler (2012)TRIBLER (2012)Tribler est un client pair à pair (P2P/Peer-to-Peer) open source avec la capacité de regarder des... Cliquez pour télécharger Tribler OneSwarm (2012)ONESWARM (2012)Le peer-to-peer qui protège votre vie privée, c'est OneSwarm.
Ce logiciel de peer-to-peer crypté... Cliquez pour télécharger OneSwarm PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO (V8.4)PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO (V8.4)PONAMEDIA TV DEVIENS HELLLOOO FLASH
LA TV SUR VOTRE ORDINATEUR.
Toute une plateforme Multi... Cliquez pour télécharger PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO Academy System (17.2.1.0)ACADEMY SYSTEM (17.2.1.0)Logiciel de gestion des établissements.
- élèves/étudiants (inscription, dossier, absence...)
-... Cliquez pour télécharger Academy System
|