>Anyone have a native VFP encryption/decryption class I can have?

This crude, but it gets the job done.

*-- Encrypt
lcStr = Crypt("Hello world", .t.)
*-- Decrypt
? Crypt(lcStr)

PROCEDURE Crypt
	LPARAMETERS tcStr, tlEncrypt
	LOCAL lcAlpha AS STRING, lcKey AS STRING, lcStr AS STRING

	lcAlpha = [abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789.-_]
	lcKey	= [HzABV782NECbKLUM3ISTFxP96tuXiDfyeYghjkawpZ-01oqJnGOscvl45_m.WdQRr]
	IF tlEncrypt
		lcStr = CHRTRAN(tcStr, lcAlpha, lcKey )
	ELSE
		lcStr = CHRTRAN(tcStr, lcKey, lcAlpha )
	ENDIF
	RETURN lcStr
ENDPROC