Implement Dropdownlistbox and database bindings in PB (cursor use)

Implementing Dropdownlistbox and Database bindings in PB

String ls_tempdeclare readdate dynamic cursor for sqlsa;string ls_sql= "select ROLENAME from t_role" Prepare Sqlsa From:ls_ Sql;open Dynamic Readdate;do while Sqlca.sqlcode=0fetch readdate into:ls_temp;if sqlca.sqlcode=0 then tab_1.tabpage_1.d Dlb_1.additem (ls_temp) End Iflooptab_1.tabpage_1.ddlb_1.SelectItem (2) Close readdate;

Description: This is an advanced application of PB Midstream, which iterates through a row of data in a dataset by defining a cursor and then joins the data AddItem () into the dropdownlistbox.

This article is from the "Share" blog, make sure to keep this source http://harman.blog.51cto.com/1155829/1438970