Suppression dans table et fichier |
Sujet: Suppression dans table et fichier par Alicia sur 11/4/2006 14:33:23 Bonjour, J'avais demandé un conseil à la suite de mon précédent problème, mais comme personne n'a encore répondu j'ai pensé que personne n'avait vu. Donc je réexplique, j'ai encore 2 soucis : Je suis toujours avec ma table remplie à l'aide d'une recherche sur le nom saisi par l'utilisateur. Je veux supprimer à la fois la ligne sélectionnée dans la table ET l'enregistrement associé à la ligne de la table. J'ai essayé plusieurs choses du livre mais ça ne fonctionne pas. Voilà où j'en suis : SI HNbEnr(FOURNISSEUR)=0 ALORS RETOUR // Suppression de la fiche en cours SI OuiNon("Confirmez-vous la suppression de cette fiche") ALORS HSupprime(FOURNISSEUR) HLitSuivant(FOURNISSEUR,Societe) SI HEnDehors(FOURNISSEUR) = Faux ALORS FichierVersEcran() SINON HLitDernier(FOURNISSEUR,Societe) SI HEnDehors(FOURNISSEUR) = Faux ALORS FichierVersEcran() SINON RAZ() FIN FIN FIN voilà pour le 1er. En ce qui concerne mon 2nd problème, c'est quand je veux ajouter les infos sur les enregistrements de mon fichier dans ma table, quand le nom de la société correspond au nom saisi. J'ai essayé plusieurs choses, ça remplit bien mais pas exactement comme je voulais. J'ai pour le moment : HLitRecherchePremier(FOURNISSEUR,Societe,saisieFournisseur,hGénérique) SI HTrouve() = Vrai ALORS TANTQUE PAS HEnDehors(FOURNISSEUR) TableAjoute(REQ_Fourn,FOURNISSEUR.Societe+TAB+FOURNISSEUR.NomFournisseur+TAB+FOURNISSEUR.Ville+TAB+FOURNISSEUR.Telephone) HLitSuivant(FOURNISSEUR) FIN SINON Info("Aucun fournisseur ne correspond") FIN Mais évidemment il me sort tout ce qu'il y a dans le fichier à partir du nom tapé, à cause du TANTQUE PAS HEnDehors Alors j'ai essayé sans TANTQUE mais bien sûr ça ne m'ajoute qu'une ligne, or je peux avoir plusieurs lignes car plusieurs sociétés ont le même nom et des informations différentes. J'ai essayé avec une condition sur Fournisseur.Societe=saisieFournisseur mais ça ne trouve rien. Désolée de vous poser des questions de débutant mais je ne trouve pas la solution dans le guide d'auto-formation. Merci d'avance. |