Advertisement
ASP_Volume3 Miscellaneous #44702

Disable program after 100 times used

This code will disable your program after a certain number of runs of the program. more info: worm@thepentagon.com

AI

AI Summary: This codebase represents a historical implementation of the logic described in the metadata. Our preservation engine analyzes the structure to provide context for modern developers.

Source Code
original-source
'put in form_load
retvalue = GetSetting("A", "0", "Runcount")
Worm$ = Val(retvalue) + 1
SaveSetting "A", "0", "RunCount", Worm$
If Worm$ > 99 Then 'put one number lower then it says....you can only run the program 200 times.
MsgBox "This is the end of the trial run",16,"Sorry"
Unload me
End If
Upload
Upload
Original Comments (3)
Recovered from Wayback Machine