Jobs
Author: Warpboy Date Submitted: 11/26/2005 Category: Security Code and Programs Compatibility: VB 6 This code has been accessed 6474 times.
Email Yourself this snippet:
None Join my forums at http://warp3dindustries.com if you want to learn more!
Code
'Timed Termination 'Coded By Warpboy Rem Email: warpboy1@yahoo.com or warpboy@warp3dindustries.com Rem Website: Warp3dIndustries.Com Rem This can be used for trial versions of your program etc... 'You need two TEXTBOXES & a TIMER with and interval of 1000 Private Sub Form_Load() Text2.Text = "11/28/2005" 'Date on which to terminate Application Text1.Text = Date If Text1.Text = Text2.Text Then End Else MsgBox ("Timed Termination") 'Put what you want in here End If End Sub Private Sub Timer1_Timer() Text1.Text = "Date" End Sub