Newest functions Upload a function Leave a tip My account

There are 2,522 functions in this library.

EncryptDate ( TheDate )

Converts a date in a pseudo activation code format

  Average rating: 4.4 (30 votes) Log in to vote

Ibrahim Bittar Torres - Show more from this author Eikonsys, S.A. de C.V. http://www.eikonsys.com

  Function definition: (Copy & paste into FileMaker's Edit Custom Function window)

Let ( [ Number = GetAsText ( GetAsNumber ( TheDate ) ) ; Seed = "ertyuiopasdfghj1234567890klzxcvbnmqwertyui1234567890opasdfghjklzxcvbnmqwertyuiopasdf1234567890ghjklzxcvbnmqwertyuiopasdfghjklzxcvbnmqwertyuiop1234567890asdfghjklzxcvbnm1234567890wertyuiopasdfghjklzxcvbnmqwe1234567890rtyuiopa" ; Word 01 = Middle ( Seed ; Random * 100 ; 1 ) & Middle ( Seed ; Random * 100 ; 1 ) & Middle ( Seed ; Random * 100 ; 1 ) & Middle ( Seed ; Random * 100 ; 1 ) ; Word 02 = Middle ( Seed ; Random * 100 ; 1 ) & Middle ( Seed ; Random * 100 ; 1 ) & Middle ( Seed ; Random * 100 ; 1 ) & Middle ( Seed ; Random * 100 ; 1 ) ; Word 03 = Middle ( Seed ; Random * 100 ; 1 ) & Middle ( Seed ; Random * 100 ; 1 ) & Middle ( Seed ; Random * 100 ; 1 ) & Middle ( Seed ; Random * 100 ; 1 ) ; Word 04 = Middle ( Seed ; Random * 100 ; 1 ) & Middle ( Seed ; Random * 100 ; 1 ) & Middle ( Seed ; Random * 100 ; 1 ) & Middle ( Seed ; Random * 100 ; 1 ) ; Word 05 = Middle ( Seed ; Random * 100 ; 1 ) & Middle ( Seed ; Random * 100 ; 1 ) & Middle ( Seed ; Random * 100 ; 1 ) & Middle ( Seed ; Random * 100 ; 1 ) ; Word 06 = Middle ( Seed ; Random * 100 ; 1 ) & Middle ( Seed ; Random * 100 ; 1 ) & Middle ( Seed ; Random * 100 ; 1 ) & Middle ( Seed ; Random * 100 ; 1 ) ; Num 01 = Middle ( Number ; 1 ; 1 ) ; Num 02 = Middle ( Number ; 2 ; 1 ) ; Num 03 = Middle ( Number ; 3 ; 1 ) ; Num 04 = Middle ( Number ; 4 ; 1 ) ; Num 05 = Middle ( Number ; 5 ; 1 ) ; Num 06 = Middle ( Number ; 6 ; 1 ) ] ; Word 01 & Num 01 & "-" & Word 02 & Num 02 & "-" & Word 03 & Num 03 & "-" & Word 04 & Num 04 & "-" & Word 05 & Num 05 & "-" & Word 06 & Num 06 ) Click to copy

This simple custom function converts a date into its number equivalent, i.e.: 02/04/2007 = 732711, and creates six groups of characters separated by dashes, where the last digit is the corresponding date number and the rest are random characters or numbers.

In this example check this out:
2qly7 -> 7
ru6g3 -> 3
s3p62 -> 2
twox7 -> 7
518h1 -> 1
3g821 -> 1

This CF does not pretend to be a "security feature" but for an end user who is not a FileMaker experienced programmer it can be very hard to guess what it means, so you can use it in low risk situations.

To get the date back just take the last digit of each group and then place them in a calculation with date result.

Have fun!!!

 

Comments

Log in to post comments.

 

Note: these functions are not guaranteed or supported by BrianDunning.com. Please contact the individual developer with any questions or problems.

Support this website.

This library has been a free commmunity resource for FileMaker users and developers for 20 years. It receives no funding and has no advertisements. If it has helped you out, I'd really appreciate it if you could contribute whatever you think it's worth: