GESTION DES STAGIAIRES

Commentaire de marm0tte le 09/11/2004 23:44:20

Bon je n ais pas encore regardé le code, mais déjà en voyant "module1" "projet1" "form1"... C'est pas très professionnel tout ca ^^

Commentaire de keke4483 le 10/11/2004 21:14:02

Salut j'ai observé ton code, et j'ai quelques obrservations.
Attention tout ce que je dis ci-dessous n'est pas fait pour critiquer ta méthode de programmation
mais pour te proposer d'autre solution qui sur le moment m'ony semblées plus efficace.

- La première remarque concerne les différents control que tu as placé :
Presque aucun des contrôles présent sur tes feuilles n'ont été renommé, rien ne vaut un bon NAME parlant, l'habitude veut
qu'ils soient préfixé de trois lettres et qu'ils aient un nom parlant.
Exemple pour un CommandButton : cmdValider, une Textbox : txtNom ...
Actuellement rien ne me dis que le Command4 est le bouton Modifier, alors que cmdModifier est très parlant.

- J'ai vu que dans ton module tu as créé une fonction pour faire ta connexion à ta BDD, excellent. Mais si la base est défectueuse
tu ne sais pas d'ou viens le problème l'appli se ferme violemment. Une gestion d'erreur aurait été nécessaire :
Tu transforme ta sub en function booléenne
"Public function connectionbd() as boolean
connectionbd = false
On error goto GESTIONERROR
    connection.Provider = "microsoft.jet.oledb.4.0;"
    connection.Open "provider=microsoft.jet.oledb.4.0;" & "data source=" & App.Path & "\" & "mlr1.mdb;"
    
    commande.ActiveConnection = connection
    
    record.CursorLocation = adUseClient
    record.CursorType = adOpenDynamic
    record.LockType = adLockOptimistic
    connectionbd = true
    exit function
GESTIONERROR:
    connectionbd = false
    MsgBox Err.Description
End Sub"

Et la tu sais si ta connexion s'est bien passée. Nhésite pas aussi à faire une fonction de déconnexion.
Parce que avec Acces par exemple si ton appli se faire violemment, il est possible que ta base reste ouvert, et là
c'est terminé ta base est morte.

- Dans le load de ta fenetre principale, tu écris Module1.connectionbd. L'extension Module1 n'est pas nécessaire

Pour la suite j'ai parcouru les fenetres les une apres les autres.

"ajouter" --> personnellement je préfère mettre frmAjouter

- Ici "ajouter.Command2.Caption" ajouter est inutile car tu es déjà dans "ajouter"
- Dans la sub "Command2_Click", le problème de renommage de control est très visible : a quoi correspond tel TextBox ?
- Pour l'insertion de données l'update de record n'est pas conseillé, mieux vaut un bon INSERT SQL.
commande.CommandText = "INSERT INTO stagiaire (NOMSTAGIAIRE, PRENOMSTAGIAIRE,....) VALUES ('TOTO','TATA',....)"
- De plus apparamment tu sais que tel TextBox sert pour tel requete alors fais des contrôles indexés pour ainsi faire des
  boucles :
   for i = 1 to 16
   txtSalarie(i) = Record.Fields(i)
   next i
-Pour finir sur la form "ajouter", n'hésite pas à encadrer tes insertions par une transaction (ca évite de mettre en l'air
ta base quand seulement la moitié des actions se font suite à une erreur).

"infoetab", "infomaitre", "infostagiaire"

- Ne charge pas les informations à partir de la fenêtre appelante, crée des sub de chargement dans chaque fenetre, et passe
l'identifiant de la personne traité par le module "Public intIdentPersonne as integer"

"main"

- La première chose que j'ai fais, c'est de saisir du texte dans la combo et de cliquer sur Modifier....
Plantage, il faudra rajouter un petit control sur la validité de la saisie ou tout simplement l'empeché.
- J'ai remarqué aussi que tu faisais des "select * from ..." évite, précise les champs ramenés, parce que si tu rajoutes
le champs PSEUDOSALARIE dans ta table entre le nom et le prenom, tout tes "select" deviennent bancales.
- L'appel de ta fenetre "ajouter" n'est pas modal je peux donc ouvrir deux fenêtres de modification en même temps.

Voila j'en ai terminé pour les solutions possibles.

Je te souhaite une bonne continuation et bonne prog.

Commentaire de afaf067710928 le 12/11/2004 11:35:56

SALUT TOUS LE MONDE JE SUIS NOUVELLE A LA PROGRAMMATION J'AI un projet de jeu couleur je quelqu'un pour m'aider