begin process at 2010 02 10 12:06:12
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Fichiers/Disque

 > AFFICHER LA TAILLE DE TOUS LES SOUS -REPERTOIRES

AFFICHER LA TAILLE DE TOUS LES SOUS -REPERTOIRES


 Information sur la source

Note :
10 / 10 - par 2 personnes
10,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Fichiers/Disque Classé sous :afficher, taille, directories, répertoires, size Niveau :Initié Date de création :19/04/2001 Vu / téléchargé :11 459 / 274

Auteur : Nix

Ecrire un message privé
Site perso
Ce membre participe au partage de revenus publicitaires
Commentaire sur cette source (2)
Ajouter un commentaire et/ou une note


 Description

Pratique surtout pour un provider, histoire de checker si un utilisateur ne dépasse pas son quota :)

Source

  • <html>
  • <title>Taille des répertoires contenu dans un disque dur ou dans un répertoire</title>
  • <body bgcolor="#FFFFFF" text="#000000" link="#0000FF" vlink="#0000FF" alink="#FF0000">
  • <table width="100%" border="1" cellspacing="0" cellpadding="2" align="center" bordercolor="#000000">
  • <tr>
  • <td align="center" bgcolor="#C0C0C0"><b><font face="Verdana" size="2">Répertoire</font></b></td>
  • <td align="center" bgcolor="#C0C0C0"><b><font face="Verdana" size="2">Go</font></b></td>
  • <td align="center" bgcolor="#C0C0C0"><b><font face="Verdana" size="2">Mo</font></b></td>
  • <td align="center" bgcolor="#C0C0C0"><b><font face="Verdana" size="2">Ko</font></b></td>
  • <td align="center" bgcolor="#C0C0C0"><b><font face="Verdana" size="2">Octets</font></b></td>
  • </tr>
  • <%
  • Dim LesReps, LesFichiers, Taille, LeChemin
  • LeChemin = "c:\" 'Changez ici le chemin ou vous souhaitez regarder la taille des sous-répertoires
  • Set LesReps = server.createobject("Scripting.FileSystemObject")
  • Set LesFichiers = LesReps.GetFolder(LeChemin)
  • For Each LesReps In LesFichiers.SubFolders
  • Taille = Taille + LesReps.Size %>
  • <tr>
  • <td align="center"><font face="Verdana" size="2"><%=LeChemin%><%=LesReps.Name%>\</font></td>
  • <td align="center"><font face="Verdana" size="2"><%=FormatNumber((LesReps.Size/1024/1024/1024),2)%> Go</font></td>
  • <td align="center"><font face="Verdana" size="2"><%=FormatNumber((LesReps.Size/1024/1024),2)%> Mo</font></td>
  • <td align="center"><font face="Verdana" size="2"><%=FormatNumber((LesReps.Size/1024),0)%> Ko</font></td>
  • <td align="center"><font face="Verdana" size="2"><%=FormatNumber(LesReps.Size,0)%> octets</font></td>
  • </tr>
  • <%Next%>
  • <tr>
  • <td align="center" bgcolor="#C0C0C0"><b><font face="Verdana" size="2">Total</font></b></td>
  • <td align="center" bgcolor="#C0C0C0"><font face="Verdana" size="2"><b><%=FormatNumber((Taille/1024/1024/1024),2)%> Go</b></font></td>
  • <td align="center" bgcolor="#C0C0C0"><font face="Verdana" size="2"><b><%=FormatNumber((Taille/1024/1024),2)%> Mo</b></font></td>
  • <td align="center" bgcolor="#C0C0C0"><font face="Verdana" size="2"><b><%=FormatNumber((Taille/1024),0)%> Ko</b></font></td>
  • <td align="center" bgcolor="#C0C0C0"><font face="Verdana" size="2"><b><%=FormatNumber(Taille,0)%> octets</b></font></td>
  • </tr>
  • </table>
  • </body>
  • </html>
<html>
	<title>Taille des répertoires contenu dans un disque dur ou dans un répertoire</title>
	<body bgcolor="#FFFFFF" text="#000000" link="#0000FF" vlink="#0000FF" alink="#FF0000">

<table width="100%" border="1" cellspacing="0" cellpadding="2" align="center" bordercolor="#000000">
	<tr>
		<td align="center" bgcolor="#C0C0C0"><b><font face="Verdana" size="2">Répertoire</font></b></td>
		<td align="center" bgcolor="#C0C0C0"><b><font face="Verdana" size="2">Go</font></b></td>
		<td align="center" bgcolor="#C0C0C0"><b><font face="Verdana" size="2">Mo</font></b></td>
		<td align="center" bgcolor="#C0C0C0"><b><font face="Verdana" size="2">Ko</font></b></td>
		<td align="center" bgcolor="#C0C0C0"><b><font face="Verdana" size="2">Octets</font></b></td>
	</tr>
<%
Dim LesReps, LesFichiers, Taille, LeChemin
LeChemin = "c:\" 'Changez ici le chemin ou vous souhaitez regarder la taille des sous-répertoires
Set LesReps = server.createobject("Scripting.FileSystemObject")
Set LesFichiers = LesReps.GetFolder(LeChemin)

For Each LesReps In LesFichiers.SubFolders
	Taille = Taille + LesReps.Size %>
	<tr>
		<td align="center"><font face="Verdana" size="2"><%=LeChemin%><%=LesReps.Name%>\</font></td>
		<td align="center"><font face="Verdana" size="2"><%=FormatNumber((LesReps.Size/1024/1024/1024),2)%> Go</font></td>
		<td align="center"><font face="Verdana" size="2"><%=FormatNumber((LesReps.Size/1024/1024),2)%> Mo</font></td>
		<td align="center"><font face="Verdana" size="2"><%=FormatNumber((LesReps.Size/1024),0)%> Ko</font></td> 
		<td align="center"><font face="Verdana" size="2"><%=FormatNumber(LesReps.Size,0)%> octets</font></td> 
	</tr>
<%Next%>
	<tr>
		<td align="center" bgcolor="#C0C0C0"><b><font face="Verdana" size="2">Total</font></b></td>
		<td align="center" bgcolor="#C0C0C0"><font face="Verdana" size="2"><b><%=FormatNumber((Taille/1024/1024/1024),2)%> Go</b></font></td>
		<td align="center" bgcolor="#C0C0C0"><font face="Verdana" size="2"><b><%=FormatNumber((Taille/1024/1024),2)%> Mo</b></font></td>
		<td align="center" bgcolor="#C0C0C0"><font face="Verdana" size="2"><b><%=FormatNumber((Taille/1024),0)%> Ko</b></font></td> 
		<td align="center" bgcolor="#C0C0C0"><font face="Verdana" size="2"><b><%=FormatNumber(Taille,0)%> octets</b></font></td> 
	</tr>
</table>
</body>
</html> 


 Fichier Zip

Les Membres Club peuvent télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip


 Sources du même auteur

Source avec une capture Source .NET (Dotnet) RÉCUPÉRER L'ADRESSE IP D'UN NOM DE DOMAINE AVEC ASP.NET
Source avec une capture Source .NET (Dotnet) FAIRE UN HISTORGRAMME (EN GIF) À LA VOLÉE EN ASP.NET
Source .NET (Dotnet) ENVOYER UN MAIL LORSQU'UNE PAGE GÉNÈRE UNE ERREUR
Source .NET (Dotnet) RÉCUPÉRER UNE PAGE WEB À TRAVERS UNE PAGE ASP.NET
Source avec Zip UPLOADER UN FICHIER SANS COMPOSANT V2.0

 Sources de la même categorie

Source .NET (Dotnet) IMPORTER UN FICHIER EXCEL DEPUIS UN POSTE ET L'AJOUTER SUR L... par jseblavoie
SERVER.MAPPATH QUI ACCEPTE LES ../ par divlys
UPLOAD D'IMAGES VIA ADODB.STREAM ET SQL SERVER par Nicolas_kojack
LISTING DE FICHIERS ET RÉPERTOIRES (FONCTION RÉCURSIVE) par Warwick
Source avec Zip UTILITAIRE POUR FORCER LE TÉLÉCHARGEMENT D'UN FICHIER SUR UN... par shaiulud

 Sources en rapport avec celle ci

Source .NET (Dotnet) FONCTION POUR GÉNÉRER UN JAVACRIPT D'OUVERTURE D'UNE IMAGE E... par tikrimi
LISTING DE FICHIERS ET RÉPERTOIRES (FONCTION RÉCURSIVE) par Warwick
Source avec Zip COMPTEUR SIMPLE par Caius_junioricus
Source avec Zip GESTION DES EXTENSIONS SELON LE SIZE par Jackboy
Source .NET (Dotnet) TITRE EN PLUSIEURS TAILLES - DÉBUTANTS par GillesWebmaster

Commentaires et avis

Commentaire de DarkGate le 14/05/2002 16:04:14

Merci Nix c'est exactement ce que je cherchais.

Commentaire de mouseobcd le 06/10/2003 14:59:04

Salut et merci pour le code, mais je veux savoir si il possible de l'adapter pour connaitre le contenu complet d'un fichier .

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

Problème après le chargement d'un page [ par Jojo092 ] Bonjour tout le monde,voilà j'ai un petit problème, comme vous pouvez vous en douter. Je suis en ASP.NET C#, framework 1.1 (oui super vieux, mais mon ASP.NET - Changer la taille d'une textbox (single ligne) suivant le choix d'une valeur [ par TY0MAREZ ] Bonjour, Je suis débutant en asp.net. J'essaye qu'une de mes textbox change de taille (passe de 4 à 5 chiffres) selon qu'un utilisateur choisisse dan dropdownextender et gridview [ par sandra26 ] salut je cherche un exemple de code afin d'utiliser plusieurs dropdownextender dans un gridview j'arrive a afficher les dropdownextender sur chacun Httphandler - taille limitée [ par scottmat ] Bonjour à tous, Voila j'ai testé les httphandler (ashx) pour le téléchargement de fichier et je me rends compte que sa marche pour des fichiers qui f afficher les données d'une requete sql sur deux tables dans un gridview [ par mutatos ] bonjour,je travaille sur une application en ASP.NET je veux afficher les données d'une requete sql sur deux tables dans un gridview et utiliser Le cha entrer des valeurs dans des textbox et afficher les résultats dans un gridveiw [ par mutatos ] bonjour,je developpe une application en asp.net je veux afficher les données d'une requete sql dans un gridview quand je travaille avec des valeurs pr afficher le resultat d'uen boucle dans plusieurs textbox [ par mutatos ] bonjour,je travaille avec asp.net et c# je souhaite entrer une valeur dans un textbox ,cliquer sur un bouton ,effectuer un traitement de la valeur sai on navigue sur le web via quel port? [ par kerycross ] [b]on navigue sur le web via quel port?[/b][size=100][/size] je veux de l'aide [ par massene ] Bonjour, j'ai un gos problème. je suis entarine de créer un forum de discussion qui est repartie sur des thème EXEMPLE(webmastering et windows). si je afficher du texte tant qu'on clique sur un boutton [ par joulnare18 ] Bonjour tout le monde, J'ai un petit problème que je n'arrive pas à le résoudre.je développe une application web en php my sql, et je veux faire un c


Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Février 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728

Consulter la suite du CalendriCode

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,796 sec (4)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales