Bonjour,
je chercher comment faire pour recupére le dernier fichier hyper file
utilisé, je m'explique par un morceau de code, c mieux qu'un long
discours, merci d'avance ;)
// Ce que j'ai :
QUAND EXCEPTION DANS
Contact.IDFoyer = IDFoyer
Contact.Type = ctBENEFICAIRE
HAjoute(Contact)
FAIRE
// affichage du message d'erreur
Erreur(MsgErreurAjout+ Contact..NomPhysique+ RC+HErreurInfo())
RENVOYER Faux
FIN
QUAND EXCEPTION DANS
Logement.IDFoyer = IDFoyer
HAjoute(Logement)
FAIRE
// affichage du message d'erreur
Erreur(MsgErreurAjout+ Logement..NomPhysique+ RC+HErreurInfo())
RENVOYER Faux
FIN
// Ce que je voudrait :
QUAND EXCEPTION DANS
Contact.IDFoyer = IDFoyer
Contact.Type = ctBENEFICAIRE
HAjoute(Contact)
Logement.IDFoyer = IDFoyer
HAjoute(Logement)
FAIRE
// affichage du message d'erreur
Erreur(MsgErreurAjout+ "HDernier ?"..NomPhysique+ RC+HErreurInfo())
RENVOYER Faux
FIN
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Gilles TOURREAU
Dans son message précédent, Loiseau gaetan a écrit :
Bonjour, je chercher comment faire pour recupére le dernier fichier hyper file utilisé, je m'explique par un morceau de code, c mieux qu'un long discours, merci d'avance ;)
// Ce que j'ai : QUAND EXCEPTION DANS Contact.IDFoyer = IDFoyer Contact.Type = ctBENEFICAIRE HAjoute(Contact) FAIRE // affichage du message d'erreur Erreur(MsgErreurAjout+ Contact..NomPhysique+ RC+HErreurInfo()) RENVOYER Faux FIN
QUAND EXCEPTION DANS Logement.IDFoyer = IDFoyer HAjoute(Logement) FAIRE // affichage du message d'erreur Erreur(MsgErreurAjout+ Logement..NomPhysique+ RC+HErreurInfo()) RENVOYER Faux FIN
// Ce que je voudrait :
QUAND EXCEPTION DANS Contact.IDFoyer = IDFoyer Contact.Type = ctBENEFICAIRE HAjoute(Contact)
Logement.IDFoyer = IDFoyer HAjoute(Logement) FAIRE // affichage du message d'erreur Erreur(MsgErreurAjout+ "HDernier ?"..NomPhysique+ RC+HErreurInfo()) RENVOYER Faux FIN
Merci d'avance ;)
HErreurInfo(hErrFichier) devrait faire ton bonheur !
Cordialement
-- Gilles TOURREAU Responsable informatique
Société P.O.S Spécialiste en motoculture depuis + de 30 ans ! http://www.pos.fr
Dans son message précédent, Loiseau gaetan a écrit :
Bonjour,
je chercher comment faire pour recupére le dernier fichier hyper file
utilisé, je m'explique par un morceau de code, c mieux qu'un long discours,
merci d'avance ;)
// Ce que j'ai :
QUAND EXCEPTION DANS
Contact.IDFoyer = IDFoyer
Contact.Type = ctBENEFICAIRE
HAjoute(Contact)
FAIRE
// affichage du message d'erreur
Erreur(MsgErreurAjout+ Contact..NomPhysique+ RC+HErreurInfo())
RENVOYER Faux
FIN
QUAND EXCEPTION DANS
Logement.IDFoyer = IDFoyer
HAjoute(Logement)
FAIRE
// affichage du message d'erreur
Erreur(MsgErreurAjout+ Logement..NomPhysique+ RC+HErreurInfo())
RENVOYER Faux
FIN
// Ce que je voudrait :
QUAND EXCEPTION DANS
Contact.IDFoyer = IDFoyer
Contact.Type = ctBENEFICAIRE
HAjoute(Contact)
Logement.IDFoyer = IDFoyer
HAjoute(Logement)
FAIRE
// affichage du message d'erreur
Erreur(MsgErreurAjout+ "HDernier ?"..NomPhysique+ RC+HErreurInfo())
RENVOYER Faux
FIN
Merci d'avance ;)
HErreurInfo(hErrFichier) devrait faire ton bonheur !
Dans son message précédent, Loiseau gaetan a écrit :
Bonjour, je chercher comment faire pour recupére le dernier fichier hyper file utilisé, je m'explique par un morceau de code, c mieux qu'un long discours, merci d'avance ;)
// Ce que j'ai : QUAND EXCEPTION DANS Contact.IDFoyer = IDFoyer Contact.Type = ctBENEFICAIRE HAjoute(Contact) FAIRE // affichage du message d'erreur Erreur(MsgErreurAjout+ Contact..NomPhysique+ RC+HErreurInfo()) RENVOYER Faux FIN
QUAND EXCEPTION DANS Logement.IDFoyer = IDFoyer HAjoute(Logement) FAIRE // affichage du message d'erreur Erreur(MsgErreurAjout+ Logement..NomPhysique+ RC+HErreurInfo()) RENVOYER Faux FIN
// Ce que je voudrait :
QUAND EXCEPTION DANS Contact.IDFoyer = IDFoyer Contact.Type = ctBENEFICAIRE HAjoute(Contact)
Logement.IDFoyer = IDFoyer HAjoute(Logement) FAIRE // affichage du message d'erreur Erreur(MsgErreurAjout+ "HDernier ?"..NomPhysique+ RC+HErreurInfo()) RENVOYER Faux FIN
Merci d'avance ;)
HErreurInfo(hErrFichier) devrait faire ton bonheur !
Cordialement
-- Gilles TOURREAU Responsable informatique
Société P.O.S Spécialiste en motoculture depuis + de 30 ans ! http://www.pos.fr