把数据库里一段时间的数据赋值给变量,用VBS编历史动画

我已经会把数据库里的一个某一时间点所对应的数值赋给wincc变量,现在想做,把一段时间内的数值按时间顺序依次赋给wincc变量。以下是我吧某一时间点所对应的值赋给wincc的程序。
’连接数据库并选取某一时间
Dim conn
Set conn = CreateObject("ADODB.Connection")
conn.open "Provider=SQLOLEDB.1;Password=yanshandaxue;Persist Security Info=True;User ID=sa_mcgs;Initial Catalog=GpsData;Data Source=Z-78419B075B964\WINCC"
Dim sSql
sSql="SELECT * FROM GpsRtime=’ 2014/12/22 9:11:58’”
Dim oRs
Dim oCom
Set oRs = CreateObject("ADODB.Recordset")
Set oCom = CreateObject("ADODB.Command")
Set oCom.ActiveConnection = conn
oCom.CommandType = 1
oCom.CommandText = sSql
Set oRs = oCom.Execute
‘给wincc变量赋值
Dim data1,data2,data3
Set data1 = HMIRuntime.Tags("S1xzwz")
data1.Write oRs.Fields("S1X").Value
Set data2 = HMIRuntime.Tags("S2xzwz")
data2.Write oRs.Fields("S2X").Value
Set data3 = HMIRuntime.Tags("S3xzwz")
data3.Write oRs.Fields("S3X").Value
Set oRs = Nothing
conn.Close
Set conn=Nothing

问题补充:
上面的程序没问题是对的,它是取数据库中''2014/12/22 9:11:58''一行的内容进行读取并赋值给WinCC的变量,程序是对的。我现在想取比如2014/12/22 9:11:00-------2014/12/22 9:14:18这一段时间内的数据,加一定的延时,按时间排序,一条一条的把数据库里的所对应的数据(历史记录)赋值给wincc里面的变量,从而达到 查看历史动画的效果。下边附上数据图的table表

图片说明:

把数据库里一段时间的数据赋值给变量,用VBS编历史动画   

最佳答案

?????什么意思?你让我们帮你找错还是分享????如果脚本有问题你可以参考:http://www.52plc.net/read.php?tid=4268

数据取出来了,什么时候用就什么时候再从table中读出来呀!不需要在脚本延时的。

提问者对于答案的评价:
我弄出来了,呵呵。我说的延时,是播放历史动画的速度,不管怎么说还是谢谢了

专家置评

已阅,最佳答案正确。

原创文章,作者:more0621,如若转载,请注明出处:https://www.zhaoplc.com/plc204365.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2017年11月1日 下午7:46
下一篇 2017年11月1日 下午7:47

相关推荐

  • PLC掉电后WINCC的显示问题

    我在做一个项目时,当PLC停电后,wincc上的开关量的状态(DI)一直保持显示PLC掉电瞬间的状态,而不是像模拟量一样消失。请问这是为什么?谢谢! 最佳答案 跟PLC没有任何关系…

    SIMATIC WinCC 2019年6月11日
  • wincc通道检测错误D801

    wincc通道检测错误D801代表是什么问题,怎么解决,wincc画面输出域窗口现在一直显示黄感叹 图片说明:    最佳答案 D801: 至少有一个…

    2021年7月5日
  • WINCC 和 IE

    我的系统是XP和ie7.0,安装WICC6.0时他要求是IE6.0,如何在IE7.0中安装WINN6.0或以上 最佳答案 IE7.0(向下兼容)应该可以的,我的电脑就是IE7.0,…

    SIMATIC WinCC 2019年6月11日
  • wincc从字中取其中某一位的值

    各位,我opc里面的变量是modbus读上来的,只能是32位,64位的类型,我想从32位的字里面,得到其中某一位的状态,请问脚本该怎么写? 最佳答案 根据BCD码的特点,不管是哪一…

    SIMATIC WinCC 2017年12月2日
  • 点击阀门,弹出画面

    我在画面上插入WINCC库中的阀门图标,我想做一个点击这个阀门,弹出一个对话框进行阀门的操作,请高手赐予C或VB语言程序帮忙 问题补充:我知道做画面窗口,可是画面上阀门太多了,有上…

    SIMATIC WinCC 2019年6月11日
  • PLC内的变量触发WINCC内的用VB编写的小动画

    怎样使用PLC内部的变量来触发WINCC内用VB编写的小动画,即当PLC内一数字点为1时,动画动作,数字点为0时,动画停止? 最佳答案 不知道你的动画是什么样的,你可以用脚本调用v…

    SIMATIC WinCC 2021年7月5日
  • WINCC运行时弹出Generic Host Process for Win32 Services后点击调试或者关闭都自动退出WINCC

    WINCC运行时弹出Generic Host Process for Win32 Services后点击调试或者关闭都自动退出WI…

    SIMATIC WinCC 2019年6月11日
  • wincc Function Table报表打印问题

    在Function table中设定的时间范围内查询到7条数据记录,如图1,通过Function table工具条的打印功能,打印出来只有一条数据,如图2,在报…

    2021年7月5日
  • wincc最新版

    谁有wincc最新中文版啊,麻烦发个地址过来1058105295@qq.com一定要好用啊,曾经安装的版本费了很大的事才安装上 最佳答案 我建议你在分享网(电驴)上找,那里有好多的…

    SIMATIC WinCC 2019年6月11日
  • Wincc 6.0通讯中断

    我wincc装在工控机里面,用5611卡和S7-300通讯,变量建在MPI下面,通讯速率187.5,工控机离S7-300有30米左右,现在有时画面会突然变暗,然后又好了,我想可能是…

    SIMATIC WinCC 2020年11月1日