Message de bienvenue (info du jour) qui peut etre supprimer
Soyez le premier à donner votre avis sur cette source.
Vue 5 773 fois - Téléchargée 459 fois
Description
Codes Sources
A voir également
- Message de bienvenue (info du jour) qui peut etre supprimer
- Delphi / Pascal : Message de bienvenu - CodeS SourceS - Guide
- Javascript : Empêcher l'ouverture d'un message de bienvenue à chaque fois que le visite - Guide
- Javascript : Message de bienvenue en dhtml super cool - CodeS SourceS - Guide
- Javascript : On brasse les lettres, et un message du bienvenue s'affiche... - CodeS SourceS - Guide
- C / C++ / C++.NET : Message de bienvenue(pour debutant) - CodeS SourceS - Guide
14 juil. 2004 à 23:05
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...
13 juil. 2004 à 20:20
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
413 juil. 2004 à 17:12
12 juil. 2004 à 11:49
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.
12 juil. 2004 à 10:21
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+
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.