Actually there is a better way. You make a boolean variable like Full_Version, you make a bunch of If statements to certain features you want to lock. If Full_Version is True, then it can execute your features. If False, then it'll be disabled.
Put a value in the registry that counts the days down from the day it was first open. There are two ways you can do this. 1) Through API's like these:
VB Code:
ublic Declare Function RegCreateKey Lib "advapi32.dll" Alias "RegCreateKeyA" (ByVal hKey As Long, ByVal lpSubKey As String, phkResult As Long) As Long
Public Declare Function RegOpenKey Lib "advapi32.dll" Alias "RegOpenKeyA" (ByVal hKey As Long, ByVal lpSubKey As String, phkResult As Long) As Long
Public Declare Function RegDeleteKey Lib "advapi32.dll" Alias "RegDeleteKeyA" (ByVal hKey As Long, ByVal lpSubKey As String) As Long
Public Declare Function RegCloseKey Lib "advapi32.dll" Alias "RegCloseKey" (ByVal hKey As Long) As Long
2) Using VBScript to read/write to the registry.