WINCC用VBS生成报表统计

1.语言VBS
2.wincc7.5版本
3.wincc根据变量=1生成报表，报表上记录时间，变量=0不记录报表，变量类型BOOL

以下是生成报表统计的VBS代码：

[code]'获取WinCC项目对象
Set objProj = CreateObject("WinCCRuntime-Project")
'获取当前激活的WinCC Runtime窗口
Set objWin = objProj.ActiveWindow

'获取变量对象
Set objVar = objProj.Tags("VariableName")

'如果变量值为1，则记录时间到报表中
If objVar.Read <> 0 Then
    '获取当前时间
    strTime = FormatDateTime(Now, vbShortDate) & " " & FormatDateTime(Now, vbShortTime)
   
    '获取报表对象
    Set objReport = objWin.Reports("ReportName")
   
    '向报表添加一条记录
    Set objRecord = objReport.Data.Add()
    objRecord.Fields("Time") = strTime
End If[/code]

需要注意的是，代码中的"VariableName"和"ReportName"需要根据实际情况进行修改。此外，需要将代码放在WinCC Runtime窗口对象所在的VBS脚本文件中，并在WinCC中进行相应配置后方可生效。