OVH Cloud OVH Cloud

Merci de votre aide

5 réponses
Avatar
Fred
Bonjour,

Je suis en train de développer un petit logiciel, mais il doit rester
beaucoup de Bugs ou d'améliorations à apporter.
Si vous voulez m'aider à le développer.

Il s'agit d'un logiciel de gestion de budget famillial, en version
OpenSources pour Windows

Tout est ici http://harmonyx.free.fr

Vous pouvez aussi me dire ce que vous pensez de mon site.

Merci d'avance.

5 réponses

Avatar
Ledev
Fred wrote:
Bonjour,

Je suis en train de développer un petit logiciel, mais il doit rester
beaucoup de Bugs ou d'améliorations à apporter.
Si vous voulez m'aider à le développer.

Il s'agit d'un logiciel de gestion de budget famillial, en version
OpenSources pour Windows

Tout est ici http://harmonyx.free.fr

Vous pouvez aussi me dire ce que vous pensez de mon site.

Merci d'avance.



Je vais jettez un oeuil dessus, mais déjà a premiére vue j'aurrai deux
remarque:
-Tu risque de te faire avoir au niveau de la licence quand tu dis:
Ce logiciel est distribué en Freeware, c'est à dire qu'il est complètement
gratuit, et que vous pouvez le recopier et le distribuer autour de vous, le
code source est disponible, vous pouvez donc le modifier ou l'améliorer, à
la seule condition de le laisser sous forme de Freeware et de ne pas en
tirer de bénéfices.
Car rien ne m'empêche par exemple de le modifier, et de le redistribuer
gratuitement mais sans les sources. Tu devrai préciser que les sources
DOIVENT être disponible.
-Et je n'aime pas trop le fait qu'un site me prennent ma barre d'info en
bas d'ie, car lorsque je clique sur un lien, naturellement(par reflexe) je
regarde où sa pointe. Et je doit dire, je sais que se n'est pas justifier
mais c'est comme sa, que je me sens pas en sécurité. Mais même sans sa je
pense que cette bar doit conserver son rôle d'informer.

Mais sinon, je test ton soft et je voie dans la source si je trouve des
bugs.
a+
Avatar
Jonathan
Mais c'est notre créateur de notre Money 2004, lol
Bravo pour la mise à jour de ton site


@+

Jonathan
Avatar
Fr
Bonjour,

Merci beaucoup pour ta réponse très complète, en effet, je vais commenter le
source et mettre des noms plus explicites, ce sera mieux pour moi et pour
tout les autres.

--


Un logiciel Gratuit sur mon site : http://harmonyx.free.fr
Avatar
Fr
Bonjour,

Je pense que mon nouveau site est plus sobre et mieux pensé.

Merci pour ton avis.

--


Un logiciel Gratuit sur mon site : http://harmonyx.free.fr
Avatar
Ledev
wrote:
Bonjour,



Re-bonjour,


Merci beaucoup pour ta réponse très complète, en effet, je vais
commenter le source et mettre des noms plus explicites, ce sera mieux
pour moi et pour tout les autres.





J'ai eu le temps aujourd'hui de reguarder un peu plus profondément, mais je
n'ai pas tous regardais(disons que je me prépare pour la rentrer ;-) ).
Voici la liste que j'en ait déduite(j'ai eu le temps de faire la Form1 et un
peu la Form2, mais j'ai pas regarder le code en détail).
Voici la liste des remarques:

De maniére Général:
-La fonction Crypt et Décrypt est assez peu robuste, et risque de ne pas
fonctionner à tous les coût(notement si c'est un caractére dont le code
ascill+9 est supérieur a 255). Je te conseil d'utiliser XOR, voici les 2
subs réecrites et utilisant XOR pour le cryptage:

Sub decrypt(nom)

Dim Result As String
For a = 1 To Len(nom)
Result = Result & Chr$(Val(Mid$(nom, a, 1)) Xor 125)
Next a
nom = Result


End Sub

Sub crypt(nom)

Dim Result As String
For a = 1 To Len(nom)
Result = Result & Chr$(Val(Mid$(nom, a, 1)) Xor 125)
Next a
nom = Result


End Sub
Sachans qu'il serrai préférable de faire une Function au lieu d'une sub
-Utilisée un dossier du style "c:DataCompte" pour stoquez les donnez
n'est pas recommandez, et ceux pour plusieurs raisons. Déjà parce que
beaucoup d'utilisateur aprécie moyennement qu'une application ne laisse pas
le choix du dossier d'installation, ensuite c: peut être plein, ou
l'utilisateur peut décidée de réservée c: pour le systéme et vouloir mettre
l'appli dans D:. De plus, les utilisateurs de NT/2000/XP n'ont pas forcement
tous les droit, par exemple sous XP par défaut un utilisateur limité aurra
accés a se dossier qu'en lecture seul. Pour obtenir le dossier ou se situe
l'EXE, il suffit de faire app.path(par exemple open
app.path+"monfichier.dat").
-Pourquoi ne pas passez par une base de donnée qui permettrai
d'enregistrer tous les comptes, sa serrai plus souple et plus évolutif pour
les versions Futurs.

Dans Form1(la fenêtre d'acceuil):
-Mettre la propriétée Enabled des deux labels pour la date et l'heure
sur False, affin qu'on ne puisse pas les modifier a la main. Mais le mieux
resterai une bar d'etat.
-Idem pour le label Compte en cour et les labels de la baniéres(le 1er
évite de mettre lock pour cette situation, sa n'empêche pas l'utilisateur de
sélectionner le texte, se qui l'induit en erreur).
-L'icône de calculette n'invite pas a cliquer dessus: pour indiquer à
l'utilisateur qu'il peut se cliquer tu devrai transformer le curseur du
cruseur en autre chose lorsqu'elle passe par dessus, ou bien lui donnez une
forme de bouton. De même il n'est pas bien placez, mettre une barre d'outil
contenant se genre de bouton serrait plus aproprié.
-La function Crypt et Décrypt on une utilité pour tous le projet, le
mieux serrai de les mettres dans un module. Car lorsqu'on cherche la
fonction d'une autre feuille et qu'on ne connais pas le code, on ne vas pas
naturellement la chercher de Form1, ce qui exige une assez lourde recherche
et une perte de temps de la part de ceux qui jetterons un oeuil sur ta
source.
-Et une petite note général pour cette fenêtre: éviter de mettre un
TextBox en gise de label, car leurs effet enfoncer insite tous de suite a
modifier son contenue.
-Il y a un bug assez génant dans Form1_Load():

On Error GoTo Creat
ChDir "C:DataCompte"
GoTo exist
Creat:
MkDir "C:DataCompte"
exist:

version = "version Bêta 1.55"

Ainsi Lorsqu'il passe sur le On error, l'appli prend note qu'en cas d'erreur
elle vas sur Creat. Ensuite, si il n'y a pas eu d'erreur, il vas a Exist,
mais continue de garder Creat pour les erreurs. Ainsi si une erreur aparaît
par la suite de la Sub, il reviendra a Creat et tentera de crée le dossier,
ce qui génèrera égualementu une erreur car le dossier existe déjà. Ainsi
aprés le Exist:, il suffit d'ajoutée:
On error goto 0

-Et à ce niveau là(toujours dans le Form_Load):
Do
If EOF(1) Then Exit Do
Line Input #1, compte
Call Form1.decrypt(compte)
Line Input #1, code
Call Form1.decrypt(code)
If compte <> "" Then

If InStr(compte, ":") Then Mid(compte, InStr(compte, ":"), 1) = "_"
Form2.List1.AddItem (compte)
Form2.List2.AddItem (code)
End If
Loop
On remarque que tu fait une boucle, et que tu vérifie si le fichier arrive a
sa fin. Ce que tu devrai faire, c'est retirer le "if eof(1)..." et remplace
le "Do" par "Do while not eof(1)", ce qui aurra pour effet de lui faire
vérifier au niveau du Do lui même.


Dans Form2(Selection d'un Compte):
-Le champ "Nom de compte à ajouter" n'est pas bien situer, on ne voie pas
son lien avec le bouton Ajoutée. De même que cette feuille à pour principale
rôle de sélectioner un compte, hors ce champ ne serra quasiment jamais
utilisée et surcharge donc, pour la plupart des cas, inutilement la feuille.
Le mieux est de le faire disparaître de là et de demander a l'utilisateur le
nom du compte a ajouter lorsqu'il clique sur le bouton Ajouter.

Voilà, je n'ai rien d'autre pour aujourd'hui ;-).
a+, et bonne chance.