1:先在向导中把历史记录双击拿出来,放到一个合适的位置,创建完成后,双击打开,记住控件名AlmDbViewCtrl1
2:添加控件DTPicker,点击特别 --->配置---->向导安装,(控件名字可能对不上,找不到就全部安装,就能显示)
3:点击向导,点击ActiveX Controls,在右边找到DTPicker,双击拉出来创建。创建完成之后双击
打开,记住控件名,等会需要用到开始时间和结束时间上面的记录的开始时间和结束时间赋值。
4:完成大概布局,组过滤的下拉框在向导的windows控件中,记住控件名和标记名,控件名等会要在窗口脚本上添加下拉选项,标记名需要用判断。
5:创建一个按钮,命名查询,双击打开,选择动作,添加如下脚本
#AlmDbViewCtrl1是历史记录控件名,#DTPicker2是开始时间控件名, ComboBox_1是下拉框标记名,ALL是查询时不根据组过滤,全查,machine是我自己创建的一个报警组,box是创建的一个内存消息标记名。根据自己的控件名和标记名,修改一下就行。
#AlmDbViewCtrl1.StartTime = Text(#DTPicker2.month,"00") + "/" + Text(#DTPicker2.day,"00") + "/" + Text(#DTPicker2.year,"0000")+ " " + Text(0,"00") + ":" + Text(0,"00") + ":" + Text(0,"00");
#AlmDbViewCtrl1.EndTime = Text(#DTPicker3.month,"00") + "/" + Text(#DTPicker3.day,"00") + "/" + Text(#DTPicker3.year,"0000")+ " " + Text(23,"00") + ":" + Text(59,"00") + ":" + Text(59,"00");
#AlmDbViewCtrl1.SpecificTime = 1;
IF ComboBox_1=="ALL" OR ComboBox_1 =="" THEN
box=" ";
ELSE
IF ComboBox_1=="machine" THEN
box="machine";
ENDIF;
ENDIF;
#AlmDbViewCtrl1.GroupName(box);
#AlmDbViewCtrl1.Refresh();
6:在当前窗口脚本中添加以下代码,ComboBox是下拉框的控件名,这是在给下拉框添加组过滤的条件,这个是根据你的组报警的名字来添加的。
wcAddItem("ComboBox", "ALL");
wcAddItem("ComboBox", "machine");
7:组过滤
ALL就是在当前时间查询所有的,就相当于查询所有的报警组,(自己添加的组都是在$system组下)
8:根据时间查询