30 days expiry

[pratip]

Hello,

How to add 30 days expiry in a vb.net application ?
Pls give me the code.

Thanks,
Pratip

[xtab]

There are several ways of doing this. Some more secure than others . Here is a simple way which will work in basic circumstances but is not secure enough for a commercial app.

Create an Application Setting via Project - Properties - Settings. Name it StartDate, give it Application scope and set it to today's date.

In your code put this in the Load event of the startup form:

Dim d As Date = Today
        Dim d2 As Date = My.Settings.StartDate
        If d.Subtract(d2).TotalDays > 30 Then
            MessageBox.Show("Expired")
            Application.Exit()
        End If
 
'  OR
        ' Shorter version:
        If Today.Subtract(My.Settings.StartDate).TotalDays > 30 Then
            MessageBox.Show("Expired")
            Application.Exit()
        End If