Gestion des extensions selon le size

Soyez le premier à donner votre avis sur cette source.

Vue 7 482 fois - Téléchargée 402 fois

Description

Fonction qui vérifie un nombre et le traduit selon le poids. Ex.: 1115798 donnera 1.1 MB

Permet de mettre un size sans ce soucier des extension et faire une gestion de ceux si !

Source / Exemple :


sub ValueSizeImage(SizeImage, Extension)
                dim SizeTotalSelect
	if SizeImage <> "" then 
		if SizeImage = 0 or SizeImage < 0 then
			SizeTotalSelect = ""
			ExtensionValueSelect = "NaN"
					
		elseif SizeImage > 0 or SizeImage < 1048576 then
			SizeTotalSelect = (SizeImage / 1024)
			if SizeTotalSelect < 999 then 
				ExtensionValueSelect = "KB"
			else
				SizeTotalSelect = (SizeImage / 1048576)
				if SizeTotalSelect > 999 then
					SizeTotalSelect = (SizeTotalSelect / 1024)
					ExtensionValueSelect = "GB"
				else
					ExtensionValueSelect = "MB"
				end if
			end if
						
		elseif SizeImage => 1048576 or SizeImage < 1073741824 then
			SizeTotalSelect = (SizeImage / 1073741824)
			ExtensionValueSelect = "GB"
		
		elseif SizeImage => 1073741824 then
			SizeTotalSelect = (SizeImage / 1099511627776)
			ExtensionValueSelect = "TB"
				
		else
			SizeTotalSelect = ""
			ExtensionValueSelect = "NaN"
		end if
				
		if SizeTotalSelect <> "" then
			SizeTotalSelect = FormatNumber(SizeTotalSelect, 1)
			SizeImage = SizeTotalSelect
			Extension = ExtensionValueSelect 
		end if
				
	else
		SizeTotalSelect = 0
		ExtensionValueSelect = "B"
	end if		
end sub

Codes Sources

A voir également

Ajouter un commentaire Commentaire
Messages postés
757
Date d'inscription
vendredi 7 septembre 2001
Statut
Membre
Dernière intervention
19 juin 2008

Pour caller la fonction ont met ceci genre :

dim SizeTotalCollection
SizeTotalCollection = 1115798
dim Extension
Extension = ""

ValueSizeImage SizeTotalCollection, Extension

response.write SizeTotalCollection &" " & Extension

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.