投稿
  1. 找知识-找PLC首页
  2. 自动化系统
  3. SIMATIC WinCC

wincc的变量数据定时导出怎样做可以实现

• SIMATIC WinCC

我想问到的是怎样做能使wincc中的变量数据能够定时导出到exce或者Access中，越详细越好？

最佳答案

用全局脚本每5分钟往里面写数据
 Dim fso,myfilep,daystr,dstr,fname
Set fso = CreateObject("scripting.FileSystemObject")
dstr = FormatDateTime(Date,2)
fname="e:\baobiao\" + dstr + ".xls"
Dim ObjExcelApp
Set objExcelApp = CreateObject("Excel.Application")
objExcelApp.Workbooks.Open fname
objExcelApp.worksheets ("sheet1").Cells(i, 2).VAlue = HMIRuntime.Tags("tag1").read
objExcelApp.worksheets ("sheet1").Cells(i, 3).VAlue = HMIRuntime.Tags("tag2").read
objExcelApp.worksheets ("sheet1").Cells(i, 4).VAlue = HMIRuntime.Tags("tag3").read
objExcelApp.worksheets ("sheet1").Cells(i, 1).VAlue =Now
objExcelApp.ActiveWorkbook.Save
objExcelApp.Workbooks.ClosE
objExcelApp.QuiT
Set ObjEXceLapp = Nothing

提问者对于答案的评价：
谢谢你们的回答！

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

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

相关推荐