Occurrence dans une table
Stagiaire WDF
Inscrit:
22/07/2007 10:04
Post(s): 36
Bonjour,
J'ai une table associées à un fichier avec plusieurs lignes et plusieurs colonnes et j'aimerai déterminer le nombre de fois qu'apparait une chaine de caractère (ou un nombre) dans l'ensemble de la table : info("nb d'occurrence").
Quelqu'un connaitrait-il le code à utiliser ?
Merci de votre aide.

Contribution le : 24/08/2007 15:36
Créer un fichier PDF de la contribution Imprimer


Re: Occurrence dans une table
Developpeur WDF
Inscrit:
26/07/2004 09:01
Post(s): 127
Bonjour, alors :

NbOcc, NbCol, NbLig, i, j sont des entiers
sRech est une chaîne="Chaine à trouver"

NbCol=TableOccurrence(tbRech,toColonne)
NbLig=TableOccurrence(tbRech)

POUR i=1 A NbLig //Parcours des lignes
	POUR j=1 A NbCol//Parcours des colonnes
		SI Position(tbRech[i][j],sRech)>0 ALORS
			NbOcc++
		FIN
	FIN
FIN
Info("'"+sRech+"' apparait "+NbOcc+" fois.")



Saisi à la volée, donc à vérifier

Contribution le : 24/08/2007 16:54
_________________
Faut pas trop se prendre au sérieux ...
Créer un fichier PDF de la contribution Imprimer


Re: Occurrence dans une table
Stagiaire WDF
Inscrit:
22/07/2007 10:04
Post(s): 36
Merci beaucoup de m'avoir donné la solution complète. J'étais arrivé à une solution partielle par colonne :
Reseach est un entier 
i est un entier = 0 
Research = tablecherche( <Nom de la colonne>,<L'élement recherché>,<Le mode de recherche>,<Ligne de départ>) 
TANTQUE Research<>-1 
i++ 
FIN 
info("L'élement "+<Lélement recherché>+" apparait "+i+" fois")

Merci et bon week-end
__________________________
Arsène

Contribution le : 25/08/2007 15:23
Créer un fichier PDF de la contribution Imprimer


Re: Occurrence dans une table
Stagiaire WDF
Inscrit:
22/07/2007 10:04
Post(s): 36
Il y a une erreur dans le programme.
Il faut rajouter la ligne ci-dessus aprés i++ pour reprendre la fonction à la ligne suivante afin que le programme ne bloque pas:
Research = TableCherche(Nom de la colonne,L'élement recherché,Le mode de recherche,Research + 1)

Contribution le : 26/08/2007 14:29
Créer un fichier PDF de la contribution Imprimer



 Haut   Précédent   Suivant




Enregistrer votre réponse
CompteNom   Mot de passe   Authentification
Message:


Vous ne pouvez pas débuter de nouveaux sujets.
Vous pouvez voir les sujets.
Vous ne pouvez pas répondre aux contributions.
Vous ne pouvez pas éditer vos contributions.
Vous ne pouvez pas effacez vos contributions.
Vous ne pouvez pas ajouter de nouveaux sondages.
Vous ne pouvez pas voter en sondage.
Vous ne pouvez pas attacher des fichiers à vos contributions.
Vous ne pouvez pas poster sans approbation.

[Recherche avancée]


Connexion
Menu
Chercher WDForge
Chercher Web
Partenaires
Visualiser tous les Partenaires...
WinDev, WebDev, WinDev Mobile et HyperFile sont des marques déposées par PCSoft. |  Voter |  Legal |  Contact |   XOOPS 2.0.13.2