1. Accueil
  2. Tous les snippets
  3. Snippets ASP / ASP.NET
  4. Asp - simple fonction pour mettre en maj la premiere lettre d'un mot

Asp - simple fonction pour mettre en maj la premiere lettre d'un mot

Soyez le premier à donner votre avis sur cette source.

Snippet vu 5 250 fois - Téléchargée 36 fois

Commenter

Contenu du snippet

Cette petite fonction est très utile pour l'affichage des mois ou jours des dates.
Ex : afficher "12 Juin 2002"

Source / Exemple : 


Function PremiereLettreMaj(texte)
' Permet de donner le texte avec la premiere lettre en majuscule
	PremiereLettreMaj = UCase(Left(texte,1))& mid(texte,2,len(texte)-1)
End Function

' Très simple et courte la fonction, s'appelle comme ceci.
i = month(LaDate)
PremiereLettreMaj(MonthName(i))

Conclusion :


Simple à utiliser et à comprendre :))

Romelard Fabrice (Alias F___)

A voir également

Ajouter un commentaire

Commentaires

Signaler
Zlub
Messages postés
809
Date d'inscription
mercredi 11 octobre 2000
Statut
Membre
Dernière intervention
29 septembre 2010
 6
Salut,

C'est vrai qu'en fonction du titre, je m'attendais à se que le début de la chaine soit en Majuscule et la fin en minuscule... soit à texte = UCase(Left(texte,1))& LCase(Mid(texte,2,Len(texte)-1))
Signaler
cs_fabrice69
Messages postés
1765
Date d'inscription
jeudi 12 octobre 2000
Statut
Modérateur
Dernière intervention
11 décembre 2013
 4
Je ne refuse pas les critique sur mon code, mais je refuse les jugement de valeur où les réflexions assassines (comme tu viens encore d'en ajouter à la fin : "A méditer..."), ca ne fait rien avancer.

Dire comme tu le fais au départ qu'il serait bon de s'assurer que le reste du texte soit en Minuscule est tout à fait exact dans le cas ou on ne maîtrise pas l'origine des données à traîter (ce qui n'était pas mon cas lors que la création de cette fonction (il y a près d'un an)).

Mais ajouter à la fin du message que seulement dans ce cas, "LA ca devient interressant!" (surtout avec les MAJ sur le LA), montre un jugement de valeur et non une critique d'un code ou d'une fonction.

Tu estimes par cette remarque que seulement avec cet ajout, la fonction en question devient utile.

Ceci ne se fait pas, comme je te l'ai expliqué plus haut.

Enfin le coup de "A méditer ..." est encore pire, car tu lances des insinuations un peu déplacées.

Sur ce bon coding.

F___
Signaler
LleWellA
Messages postés
37
Date d'inscription
mardi 18 juin 2002
Statut
Membre
Dernière intervention
28 juin 2007
Faut pas te facher comme ca.
Je ne prétend pas tout connaitre.

En réagissant de la sorte, c'est à dire, en refusant la critique, tu te compares en supérieur par rapport à d'autres.
Il est toujours interressant d'avoir a se remettre en cause.
Cela étant dit, rien ne t'empêche de mettre des remarques constructives ou non, sur les lignes que je pose sur le site.
Au contraire, cela ne sera de meilleur pour moi. Plus je cherche à améliorer mes codes, plus je devient bon.
Plus je devient bon et au mieux je peux utiliser mes capacités à aider les autres.
Comme le dit si bien le proverbe :
Tout ce qui ne tue pas rend plus fort.
A méditer...
Signaler
cs_fabrice69
Messages postés
1765
Date d'inscription
jeudi 12 octobre 2000
Statut
Modérateur
Dernière intervention
11 décembre 2013
 4
Cette source est un exemple et donc à ce titre doit être adapté aux besoin de ceux qui la reprenne, comme l'ensemble des sources ou tutoriaux que je pose sur Codes-Sources.
Je ne donne pas de solution toute cuite pour un "paresseux" qui ne voudrait pas se fatiguer, mais une idée de piste à creuser pour un problème ponctuel lors d'un développement.

Enfin, la remarque de fin est tout-à-fait désobligeante, car je ne me permets pas de ton codage, et t'invite à faire de même.
Les jugements de valeur de ce type sont inutiles car je ne cherche pas à me comparer aux autres ou à dire qui est le plus ou moins fort, mais juste aider ceux qui peuvent en avoir besoin.

Si tu te sens si fort, tant mieu pour toi.

F___
Signaler
LleWellA
Messages postés
37
Date d'inscription
mardi 18 juin 2002
Statut
Membre
Dernière intervention
28 juin 2007
C'est pas mal mais y a quand même un légé probleme.
Si le texte comporte des majuscules ?????
Il n'y a que le premiere caractère qui est forcé en majuscule.
Le plus "logique" serait de forcer le reste en minuscule
texte = UCase(Left(texte,1))& LCase(Mid(texte,2,Len(texte)-1))

LA ca devient interressant!
S'inscrire maintenant

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.

Du même auteur (cs_fabrice69)