Message de bienvenue (info du jour) qui peut etre supprimer

Soyez le premier à donner votre avis sur cette source.

Vue 5 606 fois - Téléchargée 392 fois

Description

Aucune description n'est fournie pour ce projet

Codes Sources

A voir également

Ajouter un commentaire Commentaires
Messages postés
270
Date d'inscription
samedi 29 novembre 2003
Statut
Membre
Dernière intervention
11 juillet 2007

oui oui, je sais pour le registre...
c clair que c'est mieux, mais c'était le coter astuces du code que je voulait mettre en avant, je suis sur que personne n'a pensser a renommer un fichier pour faire un "autorun" de logiciel !!

C'est sur que si quelqu'un voulait utiliser ce code pour un programme "commerciale" vaut mieux qu'il le passe dans le registre, mais bon...
Messages postés
41
Date d'inscription
lundi 23 février 2004
Statut
Membre
Dernière intervention
12 août 2008

En fait c'est tout simple

pour inscrire une clé qui dit que ton messge doit s'afficher:

SaveSetting App.ProductName, "Bienvenu", "Vérif", "Vrai"
ou pas s'afficher:

SaveSetting App.ProductName, "Bienvenu", "Vérif", "Faux"

et pour tester:

If GetSetting(App.ProductName, "Bienvenu", "Vérif") = Vrai Then
. . .
End If

c'est vraiment une fonction pratique sans risque d'erreur et plus pro :-)... essai ça en vaux la peine :-)

A Peluche.
Messages postés
1467
Date d'inscription
samedi 13 mars 2004
Statut
Membre
Dernière intervention
5 mai 2010
3
En plus, moi j'ais vb5, et ya une option toute prête pour créer un truc du genre automatiquement... Sans erreur, et avec SaveSettings...
Messages postés
270
Date d'inscription
samedi 29 novembre 2003
Statut
Membre
Dernière intervention
11 juillet 2007

Je sais que vaut mieux mettre dans le base de registre, mais c'est tellement plus simple (et exclusif) de mettre sa par détection de fichier, que je n'ai pu résister.

Pour ce qui est de la geston d'erreur, j'ai essayer de faire un truc vraiment tout simple.
Au début j'en avais mis pour bloquer les erreurs mais je les ai supprimer quand g vu que sa fonctionnant très bien sans.
Messages postés
41
Date d'inscription
lundi 23 février 2004
Statut
Membre
Dernière intervention
12 août 2008

Honnêtement moi, pour des petit trucs comme ça j'utiliserait SaveSetting() et GetSetting() qui créer une clé de ton prog dans la base de registre.
Pour le reste? fait attention à la gestion d'erreur :

- Si ton fichier n'existe pas.
- S'il est en lecture seul.
- ?

un simple :

On Error GoTo Err_TXT
If Dir(App.Path & "/info.txt") = "info.txt" Then
?

Résoud ce problême

A+
Afficher les 7 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.