【PB】使用参数指定的SQL语句向指定的下拉列表框中添加数据

最新推荐文章于 2019-03-14 09:06:00 发布

原创最新推荐文章于 2019-03-14 09:06:00 发布 · 3.6k 阅读

3 ·

CC 4.0 BY-SA版权

文章标签：

#sql #string

pb实例专栏收录该内容

91 篇文章

订阅专栏

本文介绍了一个使用SQL语句向指定下拉列表框添加数据的函数，详细阐述了函数的参数、返回值及核心功能。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////

//函数名称wf_AddItem(dropdownlistbox fo_obj,string fs_SQL)

//参数：fo_obj为下拉列表框，fs_SQL为SQL语句

//返回值：无

//功能：使用参数指定的SQL语句向指定的下拉列表框中添加数据

////////////////////////////////////////////////////////////////////////////////////////////////////////////////////

String ls_item

 

Declare item_cur Dynamic Cursor For SQLSA;        //定义动态光标

Prepare SQLSA From :fs_SQL Using SQLCA;

Open Dynamic item_cur;               //打开动态光标

Fetch item_cur InTo :ls_item;                  //取数据

 

fo_obj.SetRedraw(False)                //禁止下拉列表框刷新

 

Do While SQLCA.SQLcode = 0

                  fo_obj.AddItem(ls_item)                //向下拉列表框中添加项目

         Fetch item_cur inTo :ls_item;

Loop

 

fo_obj.SetRedraw(True)                 //刷新下拉列表框

 

Close item_cur;            //关闭动态光标