Discussion :

[faressam]

Bonjour

J'affiche des données dans mon Formulaire, j'ai un Boutton "Modifier" qui modifie la donnée resaisie.

Certe je voulais afficher un message de Succé si jamais l'enregistrement et bien entré dans la Table ou bien un message d'information pour dire que la modification ne c'est pas faitez car il accepte pas de Doublons.

La question comment faire pour vérifier que le Dernier enregistrement est bien entrée dans la table.

Merci

[FreeAccess]

Bonjour,

Il nous manque quelques éléments pour répondre complètement à ta question..

Ton formulaire de saisie est-il indépendant (non lié à une source)....

Quel code as-tu sur ton bouton de validation....:question

[bernardmichel]

Bonjour

J'affiche des données dans mon Formulaire, j'ai un Boutton "Modifier" qui modifie la donnée resaisie.

Certe je voulais afficher un message de Succé si jamais l'enregistrement et bien entré dans la Table ou bien un message d'information pour dire que la modification ne c'est pas faitez car il accepte pas de Doublons.

La question comment faire pour vérifier que le Dernier enregistrement est bien entrée dans la table.

Merci

A priori, si tu as indexé correctement ta table, il n'y a pas de possibilité de créer des doublons.
Donc, si Access ne te donne pas de message dans ce sens lors de la validation de ton enregistrement... c'est que c'est tout bon

[faressam]

Non pas du tous, c'est ce que je croyais Moi aussi.

Mais quand tu le fais directement sur la table tu as un message d'erreur comme quoi tu ne peux pas crée des Doublons, mais si tu le fais à l'aide d'une interface Formulaire, il l'accepte ou pas ta rien.

C'est pour ça que je voulais savoir si la fonction "Find First" vous dit quelque chose et si elle peut m'aider à vérifier si mon dernier enregistrement est rentrée dans la Table.

MErci.

[bernardmichel]

As-tu solutionné ton post ?

Je t'ai un peu oublié... sorry

[faressam]

Pas de soucies,
en faite j'ai dépanné avec une Solution par Requette Select qui test si toutes les Valeurs qui viennent d'être saisie ne sont pas dèjà saisie dans la Table.

Mais je pensais faire plus propre, avec une fonction ou une fonction existant en VBA pour voir aprés l'évenement Clic la table "T1" a eu une rafrichissement ou une mise à jour, ou bien changé de Taille ...

Merci pour ton aide.

[Bruno2r]

Pas de soucies,
en faite j'ai dépanné avec une Solution par Requette Select qui test si toutes les Valeurs qui viennent d'être saisie ne sont pas dèjà saisie dans la Table.

Mais je pensais faire plus propre, avec une fonction ou une fonction existant en VBA pour voir aprés l'évenement Clic la table "T1" a eu une rafrichissement ou une mise à jour, ou bien changé de Taille ...

Merci pour ton aide.

Ben justement au lieu de tester tes données ...
si tu stockais dans deux variables avant et après ton nombre d'enregistrement ce serait simple de vérifier après = avant +1

[bernardmichel]

Ok, si ta solution te conviens... n'oublies pas le tag

Bye, bye

[faressam]

Pour la solution des Variables :

mon insert est stoké dans une variable String :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
dim insSql as String 
 
insSql = insert ............
 
CurrentDbExecute(insSql)

Mais si je suis votre raisonnement comment je pourrai faire le teste d'avant et d'aprés pour insSql ?

Merci.

Pas encore résolut on pousse encore plus pour plus de résultats au profil de tous le monde.

[bernardmichel]

Donnes-nous plus simplement tout ton code entre les balises # (comme ci-dessous) ce sera plus évident pour comprendre.

Mais pour le problème évoqué plus haut, pourquoi ne vérifies-tu pas avec une fonction du type :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

DlookUp("ChampCherché","DansMaTable","DontValeur = " & Forms!MonFormulaire!ControlAVérifier)

[faressam]

(Désolé pour le retard, Occupé à Bronzer au Maroc )

En faite je connais DLookup, mais elle ne peut pas prendre plus qu'un critére pour vérifier si l'enregistrement saisie est déjà présent dans la Table "T1".

Sinon il faut vérifié avec DLookup pour chaque Enregistrement saisie :

- DLookup 1 pour voir si le nom est bien présent dans la Table

- DLookup 2 pour voir si le Prénomest bien présent dans la Table etc .

C'est pour ça que jevoulais tous Simplement faire un teste sur le Changement de Taille de la Table, ou bien voir si la table à reçu un changement avec "First Update" mais je n'ai trouvé aucun exemple utilisant "First Update".

Nb : Pour mon Code, rien de Spéciale, c'est juste un insert :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
 
 
dim insSql as String
dim Bd as database
 
insSql= insert ( nom, Prénom) & _
insSql =" select Me!n1, ....
 
Bd.Execute ()