999久久久精品国产消防器材,国产成人久久综合77777,√最新版天堂资源网在线,精品久久久久区二区8888,卡一卡二卡三乱码视频

累計(jì)流量的查詢

劉玉蓉發(fā)布于2014-10-30 17:51 384 0 標(biāo)簽：

1.如果已知了瞬時(shí)流量，怎么查詢?nèi)我舛€(gè)時(shí)間之內(nèi)的累計(jì)流量？
2.變量a==變量b/10，要在輸入輸出域中顯示a，怎么才能讓a顯示出變量b/10的值？

問(wèn)題補(bǔ)充：
mugui 我已經(jīng)把總的累計(jì)流量這個(gè)變量歸檔了，我現(xiàn)在的思路是先查詢到二個(gè)時(shí)刻對(duì)應(yīng)的那二個(gè)累計(jì)流量的值，（時(shí)間段的選擇，我是用二個(gè)dtpikder控件來(lái)選擇二個(gè)時(shí)刻的，時(shí)間選好后就要查詢這二個(gè)時(shí)刻對(duì)應(yīng)的二個(gè)累計(jì)流量值），然后將這二個(gè)時(shí)刻的累計(jì)流量相減，賦給另一個(gè)變量，這個(gè)變量的值就是二個(gè)時(shí)刻的累計(jì)流量的相減值，這個(gè)程序要怎么寫類？

佳答案

1) 首先把瞬時(shí)流量做歸檔，然后通過(guò)腳本把兩個(gè)時(shí)間內(nèi)的值相加：
Dim temp
Dim cnn As String
   cnn = "provider=WinCCOLEDBProvider.1;catalog=CC_test_09_07_14_14_54_22R;data source=計(jì)算機(jī)名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 "查無(wú)結(jié)果"
    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的值就是兩個(gè)時(shí)間內(nèi)的累計(jì)流量，把temp的值寫到變量中就可以顯示了。
2) 在輸出域--屬性--變量--小燈泡點(diǎn)右鍵--動(dòng)態(tài)對(duì)話框，把連接方式選擇“直接”，然后在表達(dá)式中輸入：變量b/10就可以了。