十年网站开发经验 + 多家企业客户 + 靠谱的建站团队
量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决
----权限设置 grant execute on DBMS_CRYPTO to username; ---------加密 create or replace function encrypt256(v_input varchar2) return raw is v_result raw(1999); c_key char(32) := '1q2wa3es4rz5tx6ycD*UF8tif9ogjen2'; begin v_result := sys.DBMS_CRYPTO.ENCRYPT( UTL_I18N.STRING_TO_RAW(v_input, 'AL32UTF8'), sys.DBMS_CRYPTO.ENCRYPT_AES256+sys.DBMS_CRYPTO.CHAIN_CBC+sys.DBMS_CRYPTO.PAD_PKCS5, UTL_I18N.STRING_TO_RAW(c_key, 'AL32UTF8')); return v_result; end; -----------解密 create or replace function decrypt256(v_input raw) return varchar2 is v_result raw(1999); c_key char(32) := '1q2wa3es4rz5tx6ycD*UF8tif9ogjen2'; begin v_result := SYS.DBMS_CRYPTO.DECRYPT( v_input, SYS.DBMS_CRYPTO.ENCRYPT_AES256+SYS.DBMS_CRYPTO.CHAIN_CBC+SYS.DBMS_CRYPTO.PAD_PKCS5, UTL_I18N.STRING_TO_RAW(c_key, 'AL32UTF8')); return UTL_I18N.RAW_TO_CHAR(v_result, 'AL32UTF8'); end; ----MD5加密 CREATE OR REPLACE FUNCTION MD5(passwd IN VARCHAR2) RETURN VARCHAR2 IS retval varchar2(32); BEGIN retval := utl_raw.cast_to_raw(DBMS_OBFUSCATION_TOOLKIT.MD5(INPUT_STRING => passwd)); RETURN retval; END;