(2006-09-06 16:01:13) 友情水(26321626)
//取得操作类型
String ls_czlx
DECLARE cur_user Cursor For SELECT xtsz.sm From xtsz where bz='czlx' ;
OPEN cur_user;
FETCH cur_user Into:ls_czlx;
Do While sqlca.SQLCode = 0
ddlb_czlx.AddItem(ls_czlx)
FETCH cur_user Into:ls_czlx;
Loop
CLOSE cur_user;