I am not sure if you are serious or not. Foxtouch() will change that date anyways (or could) so I would not trust that.
I never recommend to apply a copy protection of any kind, If there is a concern, consider changing your market.

>I see you know system very well. I remembered there is a developer talked about "Reading create date of recylcle bin is good for copy protecting". I have two questions for you:
>1-Do you think like him?
>2-If you contribute him how can I read recycle bin's create date?
>
>>>i would like the bios serial number ?
>>

lcComputer = "."
>>loWMIService = Getobject("winmgmts:" ;
>>	+ "{impersonationLevel=impersonate}!\\" + lcComputer + "\root\cimv2")
>>colBIOS = loWMIService.ExecQuery ;
>>	("Select * from Win32_BIOS")
>>For Each loBIOS In colBIOS
>>	?"Build Number: " + loBIOS.BuildNumber
>>	?"Current Language: " + loBIOS.CurrentLanguage
>>	?"Installable Languages: " + TRANSFORM(loBIOS.InstallableLanguages)
>>	?"Manufacturer: " + loBIOS.Manufacturer
>>	?"Name: " + loBIOS.Name
>>	?"Primary BIOS: " + TRANSFORM(loBIOS.PrimaryBIOS)
>>	?"Release Date: " + TRANSFORM(loBIOS.ReleaseDate)
>>	?"Serial Number: " + loBIOS.SerialNumber
>>	?"SMBIOS Version: " + loBIOS.SMBIOSBIOSVersion
>>	?"SMBIOS Major Version: " + transf(loBIOS.SMBIOSMajorVersion)
>>	?"SMBIOS Minor Version: " + TRANSFORM((loBIOS.SMBIOSMinorVersion))
>>	?"SMBIOS Present: " + TRANSFORM(loBIOS.SMBIOSPresent)
>>	?"Status: " + loBIOS.Status
>>	?"Version: " + loBIOS.Version
>>	For i = 0 To 100
>>		?"BIOS Characteristics: " + ;
>>			TRANSFORM(loBIOS.BiosCharacteristics(i))
>>	Next
>>Next