Fonction retournant le nom d'un fichier

Soyez le premier à donner votre avis sur cette source.

Snippet vu 8 167 fois - Téléchargée 35 fois

Contenu du snippet

Cette source sert pour connaitre le nom d'un fichier sans l'exension en minuscule

Source / Exemple :


public function fnom_page(fichier as string)
	dim taille_tableau, spage, sval, sval2, fichier2, extension as string
	dim tabpage, val_extension as array

	tabPage = split(fichier,"/")						' on regarde dans quel page on est
	val_extension = split(fichier,".")					' on decoupe avec tous les points

	for each sval2 in val_extension						'on passe tous les membre jusqu'au dernier
		extension = sval2
	next

	for each sval in tabpage							'on remet tabpage dans un string
		fichier2 &= sval
	next
	
	if fichier2 = fichier then							'on à regardé si ca a fait qqchose avec le slash
		tabPage = split(fichier,"\")					'on refait avec l'antislash
	end if
	
	taille_tableau = Ubound(tabpage)
	spage = tabpage(taille_tableau) 
	
	spage = replace(spage, "." + extension,"")			' replace(string, valeure a remplacer, valeur de remplacement
	spage = StrConv(spage, VbStrConv.LowerCase) 		' StrConv fonction de formatage; VbStrConv.LowerCase ==> tt en minuscule
	fnom_page = spage
end function

' ensuite pour afficher la fonction on fait simplement

response.write(fnom_page(Request.Params("URL")))

Conclusion :


on peut facilement transformer la fonction pour conaitre l'extension d'un fichier etc.. si y'a des trucs qui peuvent se raccourcir faites le moin savoir.

A voir également

Ajouter un commentaire Commentaires
Messages postés
3
Date d'inscription
dimanche 22 décembre 2002
Statut
Membre
Dernière intervention
21 mars 2005

Salut

dans System.io.path,la fonction getFileNameWithoutExtension(chemin) rempli cet tache

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.