累计流量的查询

刘玉蓉发布于2014-10-30 17:51 384 0 标签：

1.如果已知了瞬时流量，怎么查询任意二个时间之内的累计流量？
2.变量a==变量b/10，要在输入输出域中显示a，怎么才能让a显示出变量b/10的值？

问题补充：
mugui 我已经把总的累计流量这个变量归档了，我现在的思路是先查询到二个时刻对应的那二个累计流量的值，（时间段的选择，我是用二个dtpikder控件来选择二个时刻的，时间选好后就要查询这二个时刻对应的二个累计流量值），然后将这二个时刻的累计流量相减，赋给另一个变量，这个变量的值就是二个时刻的累计流量的相减值，这个程序要怎么写类？

佳答案

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_testarchive_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就可以了。