我参考A0296资料,用WINCC的用户归档做了一个报表,脚本如下:
Sub OnClick(Byval Item)
Dim s
Set s = HMIRuntime.Tags("sqlriqijiu")
Dim sqljiua
Set sqljiua = HMIRuntime.Tags("sqljiua")
Dim sqljiu
Set sqljiu = HMIRuntime.Tags("sqljiu")
sqljiu.Write "是否生成报表"
s.Read
sqljiua.Read
sqljiua.Write"selectriqijiu1,shijianjiu,var1,var2,var3,var4,var5,var6,var7,var8,var9,var10 from UA#DailyReport where riqijiu1 like '"&s.Value&"%' and shijianjiu between 8 and 19 order by shijianjiu"
MsgBox sqljiu.Value
End Sub
输入查询日期,运行没问题,将8点到19点的白班数据可以全部显示,但怎么查找20点到第二天早上7点的夜班数据呀,因为是两个班的报表
问题补充:
我想到一个方法,是用两个ODBC数据库拼在一起,第一个数据库写:sqljiua.Write"selectriqijiu1,shijianjiu,var1,var2,var3,var4,var5,var6,var7,var8,var9,var10 from UA#DailyReport where riqijiu1 like ''"&s.Value&"%'' and shijianjiu between 20 and 23 order by shijianjiu" 只读取20点到23点的数据,然后
第二个数据库写第二天的0点到7点,但问题是我怎么把 ''"&s.Value&"%''中的日期变为输入日期加一天呀?用dateadd()吗?求详细转换过程。
最佳答案
看你那意思可能是每个小时归档一次的,如果是这样,可以这样想,查询某个时间开始的48条数据,也就是2天的,然后从这48条里筛选出你需要的那几条。是个思路,没测试。要不你就做两个控件,分别输入今天和第二天的日期就行了啊,2606352062,欢迎交流
提问者对于答案的评价:
谢谢,我最后还是做了两个控件拼凑在一起实现的,
原创文章,作者:ximenziask,如若转载,请注明出处:https://www.zhaoplc.com/plc364229.html