WDForge.org - Forums - WD 10 - Problème lors de l'ajout de lignes dans une table

Index des forums WDForge.org

WD 10

Problème lors de l'ajout de lignes dans une table

Bas

Suivant S'enregistrer pour contribuer

	Problème lors de l'ajout de lignes dans une table	#1
Utilisateur WDF Inscrit: 28/05/2007 18:18 Post(s): 90	Bonjour, je suis en train de créer une recherche plus "simple" que la recherche prévue par le RAD. J'ai donc créé une fenetre avec les champs ( texte et date ) que je souhaite rechercher. ( PLAN 1) Dans le Plan2, j'ai créer une table remplie par programmation qui s'appelle "table_recherche". Dans le plan1, je rentre les informations de la recherche, et en appuyant sur le bouton "suivant" qui passe au plan 2, il y a cette procédure : PROCEDURE def_param( NomFichier est une chaîne = "Donnee") sRubCléParcours est une chaîne // On active le filtre sRubCléParcours = HFiltre(NomFichier, "Nom]'"+valNom+"'"... +" ET Classes]'"+ValClasse+"'"... +" ET Date]'"+ValDate+"'"... +" ET Difficultes]'"+ValDifficultes+"'"... +" ET Pai]'"+ValPai+"'"... +" ET Suites]'"+ValSuites+"'"... +" ET Suivi]'"+ValSuivi+"'") // on efface la table TableSupprime(Table_recherche) // Parcours des enregistrements filtrés HLitPremier(NomFichier, sRubCléParcours) // Si l'enregistrement n'existe pas SI HEnDehors() ALORS Info("Aucun enregistrement ne correspond à votre sélection.") // Méssage SINON //remplir la table TableAjoute(Table_recherche) HLitSuivant(NomFichier, sRubCléParcours) FIN // On désactive le filtre HDésactiveFiltre(NomFichier) Comme vous l'avez deviner, le problème se situe en rouge, pour remplir la table avec UNIQUEMENT les données recherchées. Je ne sais pas comment la table pourrait s'alimenter des fiches rentrées précédemment ... Enfin, comme la fenetre de recherche RAD. J'ai bien regarder le code mais je n'ai pas bien compris ! Merci de m'aider @+ Contribution le : 09/07/2007 13:58
Utilisateur WDF Inscrit: 28/05/2007 18:18 Post(s): 90

	Re: Problème lors de l'ajout de lignes dans une table	#2
Developpeur WDF Inscrit: 18/06/2006 13:54 Post(s): 106	Euh... quelques petites "pistes" deja peut etre. TableSupprime(<Nom de la table> [, <Indice>]) <Indice> : Entier optionnel Indice de la ligne à supprimer. Si ce paramètre n'est pas précisé, la ou les lignes sélectionnées sont supprimées. Si ce paramètre n'est pas précisé et si aucune ligne n'est sélectionnée, la fonction TableSupprime n'a aucun effet Donc là théoriquement ca ne supprimme que les lilgens séléctionnés, pour effacer toute la table TableSupprimeTout. TableAjoute(<Nom de la table> [, <Ligne>]) Ligne> : Chaîne de caractères optionnelle Ligne à ajouter dans la table spécifiée. Cette ligne est de la forme : <Elément Colonne1> + TAB + <Elément Colonne2> + TAB + ... Si ce paramètre n'est pas spécifié, une ligne vide est ajoutée dans la table. Pour une table fichier, les valeurs par défaut définies dans le fichier lié sont prises en compte. Là aussi j'ai un petit doute, TableAjouteLigne serait mieux peut être. Ajoute un petit Trace(NomFichier.NomRubrique) apres TableAjoute voir déjà si il ya des enregistrements à ajouter dans la table. Contribution le : 10/07/2007 13:32
Developpeur WDF Inscrit: 18/06/2006 13:54 Post(s): 106

	Re: Problème lors de l'ajout de lignes dans une table	#3
Utilisateur WDF Inscrit: 28/05/2007 18:18 Post(s): 90	Il y a "donnee1" qui sort du trace J'avais déjà modifier en TablesupprimeTout et TableAjouteLigne. Et, je ne vois pas pourquoi ça ne fonctionnerai pas, je ne sais pas quel code ajouter dans ce "Tableajoute" Il faudrait faire quelque chose du genre : `sligne est une chaine sligne = les données de tous les enregistrements TableAjouteLigne(Table_recherche,sligne)` il y a dans la fenetre de recherche RAD, quelque chose dans le genre ... Contribution le : 10/07/2007 14:29
Utilisateur WDF Inscrit: 28/05/2007 18:18 Post(s): 90

	Re: Problème lors de l'ajout de lignes dans une table	#4
Developpeur WDF Inscrit: 18/06/2006 13:54 Post(s): 106	Quelles sont les colonnes de table_recherche ? Quelles sont les rubriques de ton fichier ? Si tu fait un TableAjouteLigne(table_recherche, NomFichier.NomRubrique, NomFichier.NomAutreRubrique) ca devrait ajouter la valeur "donnée1" dans ta table si bien sur ta premiere colonne est de type Texte et pas autre chose. Contribution le : 10/07/2007 15:54
Developpeur WDF Inscrit: 18/06/2006 13:54 Post(s): 106

Re: Problème lors de l'ajout de lignes dans une table

Utilisateur WDF

Inscrit:
28/05/2007 18:18

Post(s): 90

Bonjour,
Bonjour,
tout marche avec ce code :

PROCEDURE def_param( NomFichier est une chaîne = "Donnee")

sRubCléParcours est une chaîne

// on efface la table
TableSupprimeTout(Table_recherche)

// On active le filtre
sRubCléParcours = HFiltre(NomFichier, "Nom]'"+valNom+"'"...
+" ET Classes]'"+ValClasse+"'"...
+" ET Date]'"+ValDate+"'"...
+" ET Difficultes]'"+ValDifficultes+"'"...
+" ET Pai]'"+ValPai+"'"...
+" ET Suites]'"+ValSuites+"'"...
+" ET Suivi]'"+ValSuivi+"'")



// Parcours des enregistrements filtrés
HLitPremier(NomFichier,sRubCléParcours)

TANTQUE PAS HEnDehors()
	//remplir la table
	TableAjouteLigne(Table_recherche,{NomFichier + ".Nom"},...
	{NomFichier + ".Date"},...
	{NomFichier + ".classes"},...
	{NomFichier + ".Difficultes"},...
	{NomFichier + ".Pai"},...
	{NomFichier + ".Suivi"},...
	{NomFichier + ".Suites"})

	HLitSuivant(NomFichier, sRubCléParcours)


FIN

// On désactive le filtre
HDésactiveFiltre(NomFichier)

@+ et merci !

Contribution le : 10/07/2007 18:56

Edité par Le_GnU sur 10/7/2007 19:23:14

Haut

S'enregistrer pour contribuer

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.