copy please
hgoldstein@dslextreme.com
DECLARE EncryptTables CURSOR as
SELECT *
FROM System.Tables
WHERE table_encryption = 0;
OPEN EncryptTables;
WHILE FETCH EncryptTables DO
EXECUTE PROCEDURE sp_ModifyTableProperty([EncryptTables].[Name],'TABLE_ENCRYPTION','TRUE','APPEND_FAIL',NULL);
END WHILE;
CLOSE EncryptTables;
( cAlias )->( AdsEnableEncryption( "EncryptionPassword" ) )
( cAlias )->( AdsEncryptTable() )
Return to FiveWin for Harbour/xHarbour
Users browsing this forum: No registered users and 44 guests