采集输入\输出域的数据到自带SQL表中

利用全局脚本周期性的写入数据库,
脚本代码C与VB的都行!

最佳答案

在Wincc自带的数据库Databases下建立一个新的数据库dbuser,新建表tab001;界面的输入/输出域变量为tag0,可参考以下VB脚本:
Dim cnn As String
cnn = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=dbuser;Data Source=computername\wincc"
Set cc1 = CreateObject("adodb.connection")
cc1.ConnectionString = cnn
cc1.CursorLocation = 3
cc1.Open
dim tag0
set tag0=hmiruntime.tags("tag0").read
Dim strsql
    strsql = "insert into tab001 values(" & tag0.value & ")"
  cc1.execute strsql
  cc1.close  
set cc1=nothing
set tag0=nothing
数据库只有一列,如果有多列,修改strsql字符串就可以!

提问者对于答案的评价:
现在改用 用户归档解决此问题了!
不过还是谢谢你的回答。

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

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2019年6月11日
下一篇 2019年6月11日

相关推荐