Salut,
Je voudrais que chaque formulaire de mon appli Access soit capable de retourner sur demande sa Version.
Ainsi, dans le module de chaque formulaire, j'ai une procédure publique :
Code :
- Public Sub currentVersion
- GetVersion = currentVersion
- End Sub
|
Maintenant, j'aimerais savoir si il est possible à travers un autre formulaire ou module quelconque d'accéder à toutes les méthodes currentVersionet ainsi de récupérer les versions de chacun de mes formulaires, par exemple avec un code du type :
Code :
- Private Sub Command1_Click()
- Dim tmpForm As AccessObject
- For Each tmpForm In CurrentProject.AllForms
- MsgBox tmpForm.Currentversion
- Next tmpForm
- End Sub
|
Mais je sais bien sur que ca ne marchera pas, car CurrentVersion n'est pas une méthode de AccessObject...
Avez vous une idée de comment je pourrais faire ou alors comment récupérer une telle info d'une autre manière?
Merci.
FORUM HardWare.fr
