累计流量的查询

1) 首先把瞬时流量做归档，然后通过脚本把两个时间内的值相加：
Dim temp   
Dim cnn As String
   cnn = "provider=WinCCOLEDBProvider.1;catalog=CC_test_09_07_14_14_54_22R;data source=计算机名\WinCC"
   Set cc1 = CreateObject("adodb.connection")
       cc1.ConnectionString = cnn
       cc1.CursorLocation = 3
       cc1.Open
   Dim rst As Object
   Set rst = CreateObject("adodb.recordset")
   Dim ssql As String
       ssql = "Tag:R,'archive_test\archive_test1','" & "2009-8-19 10:00:00.000','" & "2009-8-19 10:59:59.999'"
       rst.Open ssql, cc1
    If rst.RecordCount = 0 Then
       MsgBox "查无结果"
    Else
      rst.MoveFirst
      Do While Not rst.EOF
         temp=temp+rst.Fields(2).Value
         rst.MoveNext
       Loop
       cc1.Close
   Set cc1 = Nothing
   Set rst = Nothing
这样temp的值就是两个时间内的累计流量，把temp的值写到变量中就可以显示了。
2) 在输出域--属性--变量--小灯泡点右键--动态对话框，把连接方式选择“直接”，然后在表达式中输入：变量b/10就可以了。