大师们，你好！刚接触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
微信扫一扫 
支付宝扫一扫 