Deutsches Application Express Forum (ApEx) -- Installation , Engine / SQL , Anwendungen
CREATE OR REPLACE FUNCTION FK_AUTH_ADUSER( P_USERNAME IN VARCHAR2, P_PASSWORD IN VARCHAR2) RETURN BOOLEAN IS L_USER VARCHAR2(256); L_LDAP_SERVER VARCHAR2(256) := 'IP des Domain-Controllers'; L_DOMAIN VARCHAR2(256) := 'Domain'; L_LDAP_PORT NUMBER := 389; L_RETVAL PLS_INTEGER; L_SESSION DBMS_LDAP.SESSION; L_CNT NUMBER; BEGIN L_USER := P_USERNAME||'@'||L_DOMAIN; L_SESSION := DBMS_LDAP.INIT( L_LDAP_SERVER, L_LDAP_PORT ); -- START SESSION L_RETVAL := DBMS_LDAP.SIMPLE_BIND_S( L_SESSION, L_USER, P_PASSWORD ); -- AUTH AS USER L_RETVAL := DBMS_LDAP.UNBIND_S( L_SESSION ); -- UNBIND RETURN TRUE; EXCEPTION WHEN OTHERS THEN L_RETVAL := DBMS_LDAP.UNBIND_S( L_SESSION ); RETURN FALSE; END;
Thema | Neugierige | geschrieben von | geschrieben |
---|---|---|---|
Auth gegen AD | 2677 | ajung | |
Re: Auth gegen AD | 1552 | mozart | |
Re: Auth gegen AD | 1740 | cc13 |