Gestion des anniversaires/fêtes

Soyez le premier à donner votre avis sur cette source.

Vue 11 031 fois - Téléchargée 1 545 fois

Description

Ce programme gère les anniversaires, et vous prévient 3 jours avant chaque anniversaire/fête par une fenêtre. Lorsqu'on rentre les dates, elles doivent être au format jj/mm/aaaa.

Source / Exemple :


zip

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

Messages postés
19
Date d'inscription
lundi 27 juin 2005
Statut
Membre
Dernière intervention
7 octobre 2008

Excuse mais programme plante même après plusieurs essais le résultat est identique
plantage intempestif.
Messages postés
301
Date d'inscription
lundi 27 février 2006
Statut
Membre
Dernière intervention
17 décembre 2017

Après avoir utilisé "On error Resume next", avant de deréutiliser un gestionnaire d'erreur juste après comme "on Error Go To" (module BDD), il faut remettre l'erreur à 0 avec "Err.Clear".
D'autre part, la form1 ne s'affiche pas car tu lui as mis la propriété visible=false dans la phase conception, et pourquoi utiliser l'API "SetWindowPos" pour la positionner?
De +, elle se met tout à fait en haut de l'écran si bien qu'on ne peut plus la fermer...
Je n'ai pas été plus loin, mais je pense qu'il y a un tas d'erreurs dans ce code.
Messages postés
142
Date d'inscription
jeudi 10 juillet 2003
Statut
Membre
Dernière intervention
10 novembre 2007

si rsado est déja fermé, on ne peut pas la fermer. j'ai peu etre un peu mal codé. j'aurai du mettre des .close a la fin des fonctions, et non au début. comme ça a l'appel de la fonction, rsado est fermé.
Messages postés
301
Date d'inscription
lundi 27 février 2006
Statut
Membre
Dernière intervention
17 décembre 2017

Ton programme est peut-être pas mal, mais il se plante chez moi à l'ouverture sur l'instruction "rsADO.Close" (dans la fonction ListRappels du module BDD)...
Peux-tu m'expliquer ceci?
Merci d'avance.
Messages postés
17286
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
23 décembre 2019
66
Right(Date, 4) - Right(rsADO!naissance, 4)

la fonction Year est là pour ca, Right(Date, 4) ne represente pas toujours l'année.


regarde la source
http://www.vbfrance.com/codes/LB_SETTABSTOPS-COLONNES-DANS-LISTBOX_20841.aspx

pourrais t'aider pour afficher tes données
Afficher les 6 commentaires

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.