回复:wincc月报表脚本问题

迷失的梨

  • 帖子

    232
  • 精华

    3
  • 被关注

    21

论坛等级:奇侠

注册时间:2010-03-26

黄金 黄金 如何晋级?

发布于 2017-12-26 17:28:26

6楼

展开查看
以下是引用城外之人在2017-12-26 08:44:45的发言 >5楼

接上面的脚本

Dim dBeginTime,dEndTime

   ' Local Time

   dBeginTime = CDate(sBeginTime)

   dEndTime = CDate(sEndTime)

   

   ' Convert to UTC

   dBeginTime = DateAdd("h", -8, dBeginTime)

   dEndTime = DateAdd("h", -8, dEndTime)

   

   sBeginTime = CStr(Year(dBeginTime)) _

              & "-" & Right("00" & CStr(Month(dBeginTime)),2) _

              & "-" & Right("00" & CStr(Day(dBeginTime)),2) _

              & " " & Right("00" & CStr(Hour(dBeginTime)),2) _

              & ":" & Right("00" & CStr(Minute(dBeginTime)),2) _

              & ":" & Right("00" & CStr(Second(dBeginTime)),2)

   sEndTime = CStr(Year(dEndTime)) _

            & "-" & Right("00" & CStr(Month(dEndTime)),2) _

            & "-" & Right("00" & CStr(Day(dEndTime)),2) _

            & " " & Right("00" & CStr(Hour(dEndTime)),2) _

            & ":" & Right("00" & CStr(Minute(dEndTime)),2) _

            & ":" & Right("00" & CStr(Second(dEndTime)),2)


谢谢斑竹的指导,小弟打算下个月在试验脚本,现在没有一个月的数据,都是通过改系统时间做的假数据,打算运行一个月产生真实数据在看下之前的脚本哪里有问题,同时测试斑竹的脚本,后续再附上测试结果

有志者事竟成~~~
评论
编辑推荐: 关闭

请填写推广理由:

本版热门话题

SIMATIC WinCC / Panel

共有32767条技术帖

相关推荐

热门标签

相关帖子推荐

guzhang

恭喜,你发布的帖子

评为精华帖!

快扫描右侧二维码晒一晒吧!

再发帖或跟帖交流2条,就能晋升VIP啦!开启更多专属权限!

  • 分享

  • 只看
    楼主

top
X 图片
您收到0封站内信:
×
×
信息提示
很抱歉!您所访问的页面不存在,或网址发生了变化,请稍后再试。