Les Snippets

Nouveaux snippets
Snippets les plus consultés
Proposer un snippet

 Abonnez vous à ce fil d'information Les rss

Rechercher :

Par langages :

Par Catégorie

Compteurs


Nombre de sujets : 659
Nombre de snippets : 2085
Connexion

Accorder le singulier pluriel d'un ensemble de mots à une quantité

Niveau requis pour utiliser/comprendre cette source : 1 ( Débutant )
Créé le 23/04/2006 18:28:41 et initié par PCPT [Liste]
Date de mise à jour : 23/04/2006 19:42:45
Vue : 13602
Catégorie(s) : Chaîne de caractères
Langages dispo pour ce code :
- VB6, VBA
- PHP 3, PHP 4, PHP 5
- SQL, SQL 2005
Proposer ce code dans un autre langage



Langage : VB6 , VBA
Date ajout : 23/04/2006
Posté par PCPT [Liste]
Private Function SetSingPlur(lNumber As Long, ByVal sString As String) As String 
    sString = Replace(sString, "#NB#", CStr(lNumber)) 
    SetSingPlur = Replace(sString, "#SS#", IIf(lNumber < 2, vbNullString, "s")) 
End Function 
'   EXEMPLE D'UTILISATION
'
Private Sub Command1_Click() 
    MsgBox SetSingPlur(1, "#NB# message#SS# reçu#SS#") 
    MsgBox SetSingPlur(8, "#NB# message#SS# reçu#SS#") 
End Sub
Langage : PHP 3 , PHP 4 , PHP 5
Date ajout : 23/04/2006
Posté par FhX [Liste]
<?php
function SetSingPlur ( $num, $string ) {
 if ( $num > 1 ) {
      $string = str_replace('#SS#', 's', $string);
 } else {
      $string = str_replace('#SS#', '', $string);
 }
 $string = str_replace('#NB#', $num, $string);
 return $string;
}
?>
<?php
// Utilisation :
 echo SetSingPlur ( 1, '#NB# message#SS# recu#SS#');
 echo SetSingPlur ( 10, '#NB# message#SS# recu#SS#');
?>
Langage : SQL , SQL 2005
Date ajout : 31/05/2006
Posté par fabrice69 [Liste]

DECLARE @CHAINE AS VARCHAR(500)
DECLARE @NB AS INT

SET @CHAINE = '#NB# message#SS# recu#SS#'

SET @NB = 10

SELECT 
 CASE
 WHEN
  @NB > 1 THEN REPLACE(REPLACE(@CHAINE, '#SS#', 's'), '#NB#', @NB)
 ELSE
  REPLACE(REPLACE(@CHAINE, '#SS#', ''), '#NB#', @NB) 
 END
 AS MOTAUPLURIEL
 
Remarque :
Attention : Cela ne fonctionne que sur SQL Server

Snippets en rapport avec : Accorder, Remplacer, Singulier, Pluriel, Accord

09/09/2007 - Remplacer des caractères d'une chaine

13/02/2007 - Remplacer une chaîne (inconnue) placée entre deux chaînes (connues)

25/10/2006 - Remplacer le texte d'un emplacement en listbox par un autre.

26/07/2006 - Remplacer une chaîne par une autre dans un fichier



Codes sources en rapport avec : Accorder, Remplacer, Singulier, Pluriel, Accord

{PHP} REMPLACER DES LETTRES EN IMAGES
C'est un ancien code que j'avais fait juste dans un but esthétique, son but est tout simplement de r...

{C# / C#.NET} REMPLACER UNE SÉQUENCE DE BYTE
Cette méthode sert à remplacer simultanément dans une séquence byte[] A toutes les sous-séquences by...

{Visual Basic, VB6, VB.NET, VB 2005} DICO ACCORDS GUITARE
J'ai refait un prog de dictionnaire d'accords pour guitare beaucoup plus ergonomique et utilisant la...

{Flash} MODIFIER LES APOSTROPHES ET AUTRES CARACTÈRES MADE IN WORD DANS FLASH
Bonjour après avoir un peu trop cherché sur les pages de mon navigatuer pour trouver une solution af...

{Javascript / DHTML} REMPLACER PLUSIEURS MOTS ET CARACTÈRES DANS UN CHAMP
Voici comment remplacer plusieurs mots différents et caractères spéciaux également dans un champ ou...

{Javascript / DHTML} REMPLACER UN MOT DANS UNE CHAINE
Bonjour, N'aimant pas travailler avec les expressions régulières sous javascript, voici une fonct...

{Javascript / DHTML} RECHERCHE ET REMPLACEMENT DE MOT INTERDIT SUR VALIDATION DE FORMULAIRE
La sécurité sur serveur quand elle est activé ne permet pas l'envoi des données si celuis-ci inclu u...

{Javascript / DHTML} RECHERCHER ET REMPLACER UN MOT DANS UN TEXTE
Un script de recherche des mots d'un texte: 2 versions, la première pour Internet Explorer sur la ba...

{ColdFusion} RECHERCHER/REMPLACER
Bonjours à tous, Venant du php, j'ai decouvert avec enthousiasme coldfusion remplis de balise super...

{IRC} RANDOM REPLACE
le replace habituel ne remplace les lettres ou mots que par 1 remplacant cette source permet de def...