PB源码：查询日期范围内的数据

川长思鸟来 2022-08-25 12:48 410阅读 0赞

以下内容是PowerBuilder源码：根据开始时间和结束时间，查询历史信息。

第一步：建立数据库

第二步：建立ODBC数据源

第三步：连接PB

> （以上三步可以参照：许恕的文章[《PowerBuilder初试》][PowerBuilder]）

第四步：设置界面

> 1、  新建一个窗体Window，Title为“查询历史记录”：
> 
> new——Workspace——Window
> 
> 2、  新建一个数据窗口
> 
> New——DataWindow——Grid——QuickSelect 
> 
> 图1

> > ![SouthEast][]

> > 图2

> > ![SouthEast 1][]

> 3、选择需要显示信息的表中的字段名称：（如下图蓝色标记所示）

> > 图3

> > ![SouthEast 2][]

> > 图4

> > ![SouthEast 3][]

> > 图5

> > ![SouthEast 4][]

> > 保存DataWindow为d\_query.

> 4、把“数据窗口d\_query”直接拖到Window窗体中。

> > 图6

> > ![SouthEast 5][]

> 5、  把“数据窗口d\_query”直接拖到Window窗体中。

> > 图7

> > ![SouthEast 6][]

> 6、  找到我们所需要的控件，并在窗体中摆好位置。

> > 图8

> > ![SouthEast 7][]

> > Create  StateText  Control:创建静态文本
> 
> > Create EditMask Control：控件限制输入范围：
> 
> > （设置日期显示格式时，Mask：yyyy-mm-dd,MaskDataType:datamask!）
> 
> > 图9

> > ![SouthEast 8][]

> > 图10

> > ![SouthEast 9][]

> 第五步：编写代码

> > > 声明：实例变量
> 
> > > 图12

> > ![SouthEast 10][]

> （1）DeclareInstance Variables——Declare ——Instance Variables

//声明实例变量
    string is_sql

> （2）窗体加载事件：w\_query——open()事件中

//数据窗口dw设置连接事务sqlca
    dw_query.settransobject(sqlca)
    //让数据窗口控件从库中提取数据
    //dw_query.retrieve()
    //得到原始语法，为检索做准备
    is_sql = dw_query.getsqlselect()

> （3）查询cb\_query——Clicked()事件：

string ls_start,ls_end ,ls_select
    string ls_left ,ls_right
    
    //得到开始和结束时间
    ls_start = em_start.text
    ls_end   = em_end.text
    ls_select = ''
    // 开始时间
    if not isnull(ls_start) and ls_start <> "" and lower(ls_start) <> 'none' then
    		ls_select = ls_select + "  convert(char(10),抵店时间,120) >= '" + ls_start + "'"
    end if
    // 结束时间
    if not isnull(ls_end) and ls_end <> "" and lower(ls_end) <> 'none' then
    	if ls_select = "" then
    		ls_select = " convert(char(10),抵店时间,120) <= '" + ls_end + "'"
    	else
    		ls_select = ls_select + " AND  convert(char(10),抵店时间,120) <= '" + ls_end + "'  "
    	end if
    end if
    
    拼SQL语句
    ls_select = is_sql + ' where ' + ls_select
    if ls_select <> '' then
    	//赋值SQL语句
    	dw_query.setsqlselect(ls_select)
    end if
    dw_query.retrieve() //检索数据

>   
> 
> 
> 8、成功查询‘抵店时间’在2000-00-00至2006-00-00内的历史记录。

> > ![SouthEast 11][]

>                总结：做项目时，首先要明确一个目标“你想要实现什么功能？”，然后去找要实现此功能需要的控件是什么？在VB中，我们可以使用‘日期控件‘对日期进行选择，而PB中我们选择了EditMask控件，通过控制时间格式，来达到相同的效果。
> 
>      就像大张伟在《倍儿爽》歌中唱的那样“天空飘来五个字儿,那都不是事,是事儿也就烦一会儿,一会儿就完事儿”O(∩\_∩)O~

[PowerBuilder]: http://blog.csdn.net/xvshu/article/details/19173461
[SouthEast]: /images/20220824/460f306890ea49359a45cbb63f8638cc.png
[SouthEast 1]: /images/20220824/6629b89d36be49ba8e4f763684ccf1e5.png
[SouthEast 2]: /images/20220824/4b22e81fa0084a389263144ea70923c8.png
[SouthEast 3]: /images/20220824/d9203332037e4201b2ae8d5917076709.png
[SouthEast 4]: /images/20220824/a08b9df09dc846a392e07bf5e51e0f96.png
[SouthEast 5]: /images/20220824/945aa7d0f27946389d6fe11987aaded5.png
[SouthEast 6]: /images/20220824/89e29ad48c8c4749a8b891405c158681.png
[SouthEast 7]: /images/20220824/60852c677e28443fa02f470d795f5be8.png
[SouthEast 8]: /images/20220824/ac49c2e76b544f67b8bb71829f909e55.png
[SouthEast 9]: /images/20220824/91a0280e8f514fea992b642405fa4161.png
[SouthEast 10]: /images/20220824/e54545f453cc4299992b7c9ddc85cc3f.png
[SouthEast 11]: /images/20220824/49c6529ba0be462cbbe2425cb48cf560.png