Jump to content
CorePack

Bring Date From intetnet(ExpireData)

Recommended Posts

#include <date.au3>
$expdate = Floor(_DateToDayValue("2019", "04", "25")) ;Julian date since (days since noon 4713 BC January 1)
If (Floor(_DateToDayValue(@YEAR, @MON, @MDAY)) > $expdate) Then
         MsgBox(48, "Expired version", "This is an expired pre-release development version" & @CRLF & _
            "of this program and is not for general use." & @CRLF & @CRLF & _
            "Please email somebody@somewhere.com for further information.")
    Exit
     ;run activation program
     Exit
EndIf

this code is work but if i changed the date manually the program back to work .

so i want to bring the time and date from internet to stop this trick , any help ? :/

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now

×
×
  • Create New...