wincc中数据归档和查询问题

大师们,你好!刚接触wincc,我在sql里面新建了数据库,然后想用全局脚本写入一个动作把wincc的变量信息归档到新建的数据库,因为变量信息不是每刻都需要归档,所以我我用一个变量来触发全局脚本的动作,从而把变量信息归档。以下是全局脚本的编程
 
Dim sCon 
Dim sSql 
Dim oRs 
Dim conn 
Dim oCom
Dim Con

Dim Data1, Data2, Data3,Data4,Data5,Data6,Data7,Data8
Data1=HMIRuntime.tags("序号").read
Data2=HMIRuntime.tags("编号").read
Data3=HMIRuntime.tags("管长").read
Data4=HMIRuntime.tags("管重").read
Data5=HMIRuntime.tags("规格").read
Data6=HMIRuntime.tags("内径").read
Data7=HMIRuntime.tags("外径").read
Con="Provider=MSDASQL;DSN=铸管;UID=zxl;PWD=123"
Set conn = CreateObject("ADODB.Connection")
 conn.ConnectionString = Con
conn.CursorLocation = 3
 conn.Open
sSql="insert into 铸管 VALUES('" & Data1 & "','" & Data2&"','"&Data3&"','"&Data4&"','"&Data5&"','"&Data6&"','"&Data7&"');"
 Set oRs = CreateObject("ADODB.Recordset")
 Set oCom = CreateObject("ADODB.Command")
 Set oCom.ActiveConnection = conn
 oCom.CommandType = 1
 oCom.CommandText = sSql
 Set oRs = oCom.Execute
 Set oRs = Nothing
 conn.Close
 Set conn = Nothing
不知道思路有没有问题,程序有没有问题啊?

最佳答案

此问题可以参考:《WINCC归档数据的查询 》
http://www.ad.siemens.com.cn/service/answer/solution.aspx?Q_ID=*499&cid=1032

提问者对于答案的评价:
ok

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

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2018年12月14日 下午12:28
下一篇 2018年12月14日 下午2:54

相关推荐