Discussion :

[gyzmo5]

Bonjour !!

j'ai une zone de texte appelé date ( date = Aujourd'hui()).
donc je voudrait qu'il y ait un formulaire par date donc dés l'ouverture du formulaire, je prend le dernier formulaire qui a étè crée et je compare le champs date avec la date d'aujourd'hui

si c'est la meme date il m'ouvre le formulaire sinon il en crée un nouveau.
seulement le code que j'ai mis ne fonctionne pas car il me met un message d'erreur qui me signale qu'une variable est introuvable !

Code :

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

1
2
3
4
5
6
7
8
9
10
11
Private Sub Form_Open(Cancel As Integer)
 
Dim nbr As Long
nbr = 0
nbr = Me.RecordsetClone.RecordCount
 
If nbr = 0 Or Me.Date.Value <> Date Then
  DoCmd.GoToRecord acDataForm, Me.FormName, acNewRec
End If
 
End Sub

Merci pour votre aide
version = access 97

[micniv]

pensez qu'il y existe des mots réservés

et Date en est un ...

[gyzmo5]

j'ai éssayé avec un autre nom de variable sa ne change rien !!

il me met toujours la meme erreur.

Comment puis-je faire pour résoudre le problème ?

Merci pour vos réponses.

[fdraven]

Tu peux peut-être testé ça :

Code :

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

If nbr = 0 Or Me.DateForm.Value <> Now() Then

En espérant t'avoir aidé.

[argyronet]

Bonjour,

Que signifie Me.FormName ???

En dehors du fait que l'on appel un chat un chat et que les variables comme les champs doivent porter des noms conventionnels, ton code ne pourra jamais aller sur un nouvel enregistrement comme tu le souhaites si tu as déjà des enregistrements et que le 1er possède une date égale à aujourd'hui. S'il y a une date, c'est que ton nbr sera > 0 mais si en plus Me.Date.Value qui doit s'écrire Me![Date] (on ne nomme jamais un champ Date) ne contient rien, la condition n'est jamais vérifié et tu ne pourras jamais basculer sur le acNewRec...

A l'ouverture, il est positionné sur le 1er enregistrement donc...
Il faut procéder autrement ou plus simplement (comme je fais systématiquement), à savoir un formulaire pour la création d'enregistrements et un autre pour la consultation l'un et l'autre ayant leurs propriétés Ajout autorisé et Entrée de données respectivement à OUI/OUI et NON/NON...

Argy

[gyzmo5]

bonjour !

donc j'ai un menu avec deux boutons, un bouton consulter et un autre ajouter comment je peux faire pour ouvrir le formulaire de façon à se l'utilisateur ne puisse pas modifier les données s'il a cliquer sur le bouton consulter sans crée plusieurs formulaires

Est ce possible ?

Merci pour vos réponses

PS : désolé si m'est questions vos parresse énervantes !

[argyronet]

Bonjour,

donc j'ai un menu avec deux boutons, un bouton consulter et un autre ajouter comment je peux faire pour ouvrir le formulaire de façon à se l'utilisateur ne puisse pas modifier les données s'il a cliquer sur le bouton consulter sans crée plusieurs formulaires

Mmmmmmmmmm...

Et comment détermines-tu qu'il a le droit à un moment donné de le faire ?
Là est toute la question car s'il n'a jamais le droit, tu changes les propriétés du formulaire au niveau de l'ajout, de la modification, de la suppression ou la création de données...

Argy

P.S. Merci de changer ton titre qui n'est pas du tout circonstantiel au sujet levé...