di event constructor ddlb lu copy aja script ini :
STRING ls_id, ls_desc
DECLARE CURSOR_DEPT CURSOR FOR
select id_vssl, nm_vssl from t_vssl;
OPEN CURSOR_DEPT;
FETCH CURSOR_DEPT INTO :ls_id, :ls_desc;
while sqlca.sqlcode = 0
//kalo yg pgn ditampilin id_vssl pke ini
ddlb_dept.additem(ls_id)
//kalo yg pgn ditampilin nm_vssl pke ini
ddlb_dept.additem(ls_desc)
//kalo yg pgn ditampilin id_vssl + nm_vssl pke ini
ddlb_dept.additem(ls_id + ' ' + nm_vssl)
FETCH CURSOR_DEPT INTO :ls_id, :ls_desc;
LOOP
CLOSE CURSOR_DEPT;
[EMAIL PROTECTED] wrote: Iki lho contone cursor :
STRING ls_id, ls_desc
DECLARE CURSOR_DEPT CURSOR FOR
SELECT "department"."dept_id",
"department"."dept_name"
FROM "department" ;
OPEN CURSOR_DEPT;
DO
FETCH CURSOR_DEPT INTO :ls_id, :ls_desc;
IF sqlca.sqlnrows > 0 THEN
ddlb_dept.additem(ls_id + ":" + ls_desc)
END IF
LOOP WHILE sqlca.sqlcode <> 100
CLOSE CURSOR_DEPT;
Regards,
Nurhamid Abdulbasith
Milis
Sent by: [email protected]
06/01/2006 08:36 AM
Please respond to indopb
To: [email protected]
cc:
Subject: Re[2]: [indopb] Menampilkan hasil query di
DropDown menu
Pak Noerabbas,
kalau boleh tahu ada contoh nya nggak pak? soal nya bener2 ngak ngerti
cara memakai cursor tsb,
link atau sample scri[t juga gpp
--
Tks & Best regards,
Andi EP
IT Engineer
mailto:[EMAIL PROTECTED]
Friday, January 6, 2006, 7:57:44 AM, you wrote:
> Bisa dg dua cara :
> pakai CURSOR
> pakai datawindow
> nilai setiap row dari CURSOR atau datawindow dimasukkan ke ddlb tadi.
> Regards,
> Nurhamid Abdulbasith
> Milis
> Sent by: [email protected]
> 05/01/2006 05:20 PM
> Please respond to indopb
> To: [email protected]
> cc:
> Subject: [indopb] Menampilkan hasil query di DropDown
menu
> Dear Miliser,
> sorry nih ada pertanyaan lagi, kalau saya mau menampilkan sebuah query
> di dropdown listbox itu bagaimana ya ?
> misalkan saya punya query ini
> select id_vssl, nm_vssl from t_vssl using sqlca;
> saya mau menampilkan semua record dari table t_vssl itu lewat
> dropdownlistbox
> Terima kasih atas bantuan dan pencerahan nya
-----------------------------------------------
IndoPB - Indonesia PB User Group
To Post a message, send it to: [EMAIL PROTECTED]
To Unsubscribe,send a blank message to: [EMAIL PROTECTED]
Yahoo! Groups Links
[Non-text portions of this message have been removed]
-----------------------------------------------
IndoPB - Indonesia PB User Group
To Post a message, send it to: [EMAIL PROTECTED]
To Unsubscribe,send a blank message to: [EMAIL PROTECTED]
Yahoo! Groups Links
Send instant messages to your online friends http://uk.messenger.yahoo.com
[Non-text portions of this message have been removed]
-----------------------------------------------
IndoPB - Indonesia PB User Group
To Post a message, send it to: [EMAIL PROTECTED]
To Unsubscribe,send a blank message to: [EMAIL PROTECTED]
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/indopb/
<*> 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/
