Terima kasih bang Ferry atas jawabannya.
Setelah membaca jawaban anda dan sedikit modifikasi sesuai kebutuhan
saya, maka akhirnya keinginan saya tercapai sudah.
Ternyata kekurangan saya dahulu tidak memasang form level trigger ->
ON-LOGON selain function LOGON(); Sehingga proses koneksi tidak sukses.

Sekali lagi terima kasih.

-----Original Message-----
From: [email protected] [mailto:[EMAIL PROTECTED]
On Behalf Of Ferry
Sent: Tuesday, May 17, 2005 8:21 AM
To: [email protected]
Subject: Re: [indo-oracle] Dev 6i : Cara verifikasi user..


1. Buat modul form utk logon.
2. Pada level modul, gunakan ON-LOGON trigger dgn perintah:
   LOGON(:logon_block.username,
:logon_block.password||'@'||:logon_block.connect, FALSE); 3. Pada tombol
misalnya LOGIN, buat trigger when-button-pressed dan isi ... IF
IS_logon_OK  THEN
  NEW_FOWM('menu_utama.fmx');
ELSE
....
END IF;

4. Buat Program Unit      IS_logon_OK

FUNCTION IS_logon_OK RETURN BOOLEAN IS
vconstr VARCHAR2(50);

 BEGIN
    LOGOUT;
    vconstr:= :logon_block.password||'@'||:logon_block.connect;
    BEGIN
       LOGON(:logon_block.username, vconstr, FALSE);
       IF FORM_SUCCESS THEN
           RETURN TRUE;
       END IF;
       LOGOUT;
       RETURN FALSE;
   EXCEPTION
     WHEN OTHERS THEN
         message('Login tidak berhasil');
         message('Login tidak berhasil');
         RAISE FORM_TRIGGER_FAILURE;
    END;
END;

semoga membantu,
ferry




--
-----------I.N.D.O - O.R.A.C.L.E---------------
Keluar: [EMAIL PROTECTED]
Website: http://indo-oracle.blogspot.com
-----------------------------------------------

Bergabung dengan Indonesia Thin Client User Groups, 
Terminal Server, Citrix, New Moon Caneveral, di:
http://indo-thin.vze.com 
Yahoo! Groups Links

<*> To visit your group on the web, go to:
    http://groups.yahoo.com/group/indo-oracle/

<*> To unsubscribe from this group, send an email to:
    [EMAIL PROTECTED]

<*> Your use of Yahoo! Groups is subject to:
    http://docs.yahoo.com/info/terms/
 


Kirim email ke