Limité un Exe dans le temps?

Question: j'ai un executable effectif en 3 etapes.

Chaques etapes doient etre executé 1 fois, une fois executé le bouton ETAPE 1 doient se grisé ect jusqua letape 3 qui une fois effectué se grise


Consequence: lexecutable ne peut plus servir puisque les 3 bouton sont grisés.

Je sais qu'il faut faire un fichier TXT

Seul Hic je n'ai jamais pratiqué la limitation d'utilisation d'un document donc je ne sais pas comment cela fonctionne

Si qqun pourrait m'aider ce serait sympas parceque decidement jai que d pb avec VB lol pourtant jaime bien

Ben a la fin de l'etape 1 tu fais :

bouton1.enabled = false
bouton2.enabled = true

voila @+

Non je ne peux pas faire ca car l'executable va etre fermé et reouvert 2 3 4 jours plus tard donc ce qui a été mit en memoir va etre effacé et letape 1 va etre realisable cela auré été bon si il resté ouvert

Dans ton fichier texte tu spécifie l'etape en cours ou l'étape à executer au lancement de ton appli, ainsi que certain parametre.
Ca te permet de conserver en dur ce qui a été déja fait.

Et dans le chargement de ta form, tu ouvres le fichier et le lis en fonction de ce que tu trouverais, tu enchaine un action.

tu peux aussi le faire avec un csv séparé par des points virgule avec les valeurs que tu veux , que tu modifies à chaque fin d'étape :

ex , ton fichier :
tu en est à l'etape 2

False;True;False;
(étape1;étape2;etape3)


dans ton formload :

---

Dim Fso
Dim Ficparam
Dim Ligneparam
Dim PtFichierTexte
Dim Tabparam(3)
const ForReading = 1

'Préparation du fichier contenant les parametres
Set Fso = CreateObject("Scripting.FileSystemObject")
Ficparam    = "c:\parametre.txt"

Set PtFichierTexte = Fso.OpenTextFile(Ficparam, ForReading, False)

' ** Lit la ligne puis seplace devant la ligne précédente
Ligneparam  = PtFichierTexte.ReadLine
 
' ** Place dans un tableau les différentes parties lues dans la ligne
Tabparam = Split(Ligneparam, ";")
               
' ** utilisation des variables avec les valeurs lues dans la ligne
bouton1.enabled   = Tabparam(0)
bouton2.enabled   = Tabparam(1)
bouton3.enabled   = Tabparam(2)

---

C'est du Vbscript que j'avais utilisé adapté à la volée 
mais ca devrai pouvoir etre facile à mettre, ptet quelque trucs à modifier.

salut

est ce qu'il s'agit d'une sécurité poru éviter que qq'un fasse des betises par inadvertance, ou est ce pour eviter que quelqu'un puisse eviter de réutiliser ton programme ?

si c'est jute pour éviter les erreurs de manip, tu peux ecrire soit dans un fichier, soit dans la base de registre.

si c'est pour eviter du piratage, idem, mais en criptant tes valeurs.

il y a des sources sur le site pour lire/ecrire dans un fichier ou dans la base de registre
il y a également des sources pour cripter et decripter

Voir tout les messages du forum parlant de sauvegarder le contenu de contrôles (textbox, combo, etc.)

En effet, il faut utiliser un fichier txt, mais on ne va pas répéter à chaque fois ce qu'il faut faire alors qu'une simple recherche sur le forum suffit à trouver la réponse !

c'est une question de securité.
Parceque les personnes qui vont utiliser cette appli sont novice et limité ignar en info
alors pour eviter quil copie colle d fichier bd 150000 fois on limite lutilisation de lappli a 3 etape

Datk sidou je sais bien quil fo recherché ce que jai fé mais la recherche est longue et c pour ce soir maximum jai pri vachement de retard sur la livraison
c pour ca que je me permets de poser la question
Car  je programme pas en VB dhabitude dc je nen ai pas la connaissance parfaite
Je connais je suis capable de monter un truc qui tiens mais rien a voir avec dautre langage ou je suis a laise

Donc je mexcuse aupres dautre dev qui pensent que la question est rebarbatif.

ps: saez merci *
Mais la ou je bug c la creation du fichier TXT. j'ai du mal en comprendre la construction

Dans ton fichier, tu mets tes valeurs séparées par des virgules, le "Tabparam = Split(Ligneparam, ";")" permet de placer les valeurs entre les virgules dans le tableau Tabparam.

Voila.