在下拉列表框里显示datastore里的服务内容

//用于在列表框里显示datastore里的服务内容

string  ls_serve_kind

long  ll_row, ll_row_count

datastore  ds_vipserve         //声明Datastore变量

tab_1.tabpage_3.lb_1.reset( )    //先清空列表框1

ds_vipserve = create datastore   //将Datastore实例化

ds_vipserve.dataobject = "dwo_serve"   //为datastore分配数据窗口对象

ds_vipserve.settransobject(sqlca)   //指定连接实例

ds_vipserve.retrieve()   //提取dwo_serve数据对象中数据

 

ll_row_count = ds_vipserve.rowcount()   //将所取数据的行数存储在ll_row_count变量中

for ll_row = 1 to ll_row_count   //创建循环语句进行取值

    ls_serve_kind = ds_vipserve.getitemstring(ll_row,"serve_kinds")    //取当前行的serve_kinds字段对应的值

    tab_1.tabpage_3.lb_1.additem(ls_serve_kind)   //将取到的当前行的值添加到下拉列表中

next       //取下一条记录

destroy ds_vipserve   //释放datastore