Hi Viv,

Thanks for your code.

KM


>Hi,
>
>Here's some sample code from Xitech. It's for VFP8 so you may need a couple of minor tweaks if you're using an earlier version
>
>

>* use of Cryptor 4.0 DLL from VFP 8.0
>
>DECLARE INTEGER CRYIni_InitializeEx	IN XiCrCore.dll INTEGER Mode, INTEGER Module, STRING Exclusions
>DECLARE INTEGER CRYIni_UnInitialize	IN XiCrCore.dll
>DECLARE INTEGER CRYUtl_Version		IN XiCrCore.dll
>DECLARE INTEGER CRYMan_Register		IN XiCrCore.dll STRING strFilename, STRING strPassword, INTEGER dwFlags, INTEGER dwMethod
>DECLARE INTEGER CRYMan_Unregister	IN XiCrCore.dll STRING strFilename
>DECLARE INTEGER CRYUtl_Encode		IN XiCrCore.dll STRING strFilename, STRING strPassword, STRING strBackUpExt, INTEGER lKeepBackup, INTEGER dwMethod
>DECLARE INTEGER CRYUtl_DeCode 		IN XiCrCore.dll STRING strFilename, STRING strPassword, STRING strBackUpExt, INTEGER lKeepBackup, INTEGER dwMethod
>
>
>* names are case sensitive
>DECLARE Integer GetModuleHandle in win32api String Modulename
>
>IF VERSION(2)=0 && runtime
>	HookModule = GetModuleHandle("VFP8R.DLL")
>	if HookModule # 0
>		Result = CRYIni_InitializeEx( 2, HookModule, ";" )
>		if Result # 0
>			Wait Wind "1 Cryptor failed to initialize."
>		endif
>	else	
>		Wait Wind "Failed to get module handle."
>	endif
>ELSE
>	* command line environment
>	Result = CRYIni_InitializeEx( 2, 0, ";" )
>	if Result # 0
>		Wait Wind "2 Cryptor failed to initialize."
>	endif
>	ENDIF
>
>
>* example registration
>= CRYMan_Register("TEST.DBF","TEST_PW",0,8)
>
>*USE TEST
>*BROWSE
>
>*USE
>
>
>
>= CRYIni_UnInitialize()
>
>

>HTH,
>Viv