我在wincc 6.2中编写了wincc vbs脚本程序,能够每日生成报表。但是我把项目移植到wincc 7.0.2后脚本没有运行,不能自动生成报表。脚本程序如下:
Function settag(tagname,tagvalue)
Dim a
Set a=HMIRuntime.Tags(tagname)
a.Write(tagvalue)
End Function
Function gettag(tagname)
Dim a
Set a=HMIRuntime.Tags(tagname)
a.read
gettag=a.Value
End Function
Function gettagreal(tagname)
Dim a
Set a=HMIRuntime.Tags(tagname)
a.read(1)
gettagreal=a.Value
End Function
Option Explicit
Function action
Dim objExcelApp,a
'MsgBox("begin")
a=gettag("date")
'MsgBox(a)
Set objExceLApp = CreateObject("Excel.Application")
objExcelApp.Visible = false
objExcelApp.Workbooks.Open "C:\DATAS\date.xlsx"
objExcelApp.ActiveWorkbook.SaveAs "C:\DATAHIS\"+a+".xlsx"
objExcelApp.ActiveWorkbook.Save
objExcelApp.ActiveWorkbook.close
objexcelapp.Quit
'settag "leijia",0
End Function
触发设置为时间有变化时,
我想问一下大家,如何在wincc 查看脚本有无运行。。如何进行调试