99久久国产综合精品女不卡-99久久好看一级毛片-99久久精品99999久久-99久久精品费精品国产-99久久精品费精品国产一区二

zichen8716
我行,我行,我行行行!!!
級(jí)別: 家園常客
精華主題: 0
發(fā)帖數(shù)量: 266 個(gè)
工控威望: 527 點(diǎn)
下載積分: 4363 分
在線時(shí)間: 59(小時(shí))
注冊(cè)時(shí)間: 2010-03-25
最后登錄: 2022-12-28
查看zichen8716的 主題 / 回貼
樓主  發(fā)表于: 2014-03-28 09:49
1、Wincc online trend控件實(shí)現(xiàn)多條曲線查詢

項(xiàng)目要求,查詢?nèi)我鈺r(shí)段內(nèi)的兩條曲線的歷史數(shù)據(jù)
首先在變量記錄中設(shè)置需要記錄的變量,如果需要在一個(gè)控件內(nèi)顯示兩條曲線,做數(shù)據(jù)歸檔時(shí),歸檔屬性最好是一致的,歸檔屬性不一樣是否會(huì)出現(xiàn)問題,這個(gè)沒測(cè)試,有興趣的可以測(cè)試一下。
數(shù)據(jù)記錄設(shè)置OK后,新建畫面插入online trend控件,我的項(xiàng)目需要把趨勢(shì)打印出來(lái),所以把控件的工具欄全部隱藏。
雙擊online trend控件,添加需要顯示的歸檔變量。選擇公共X,Y軸等參數(shù)。坐標(biāo)顯示根據(jù)自己使用選擇,基本上不用設(shè)置太多參數(shù)。
添加需要顯示的歷史歸檔變量后,就需要寫腳本了,西門子工控網(wǎng)論壇有實(shí)例,實(shí)例提示針對(duì)于一條曲線時(shí)使用,咨詢西門子技術(shù)支持,如果需要同時(shí)顯示兩條曲線時(shí),需要對(duì)兩條曲線分別進(jìn)行設(shè)置屬性“控件.index=0,1”,但是測(cè)試其實(shí)只設(shè)置index=0的起始及結(jié)束時(shí)間就OK,就是論壇給的實(shí)例不是只針對(duì)于一條曲線,兩條曲線時(shí)同樣適用,再多的曲線就沒測(cè)試了。
西門子默認(rèn)的時(shí)間格式為“MM-DD-YYYY HH-MM-SS”格式,所以在設(shè)置趨勢(shì)起始及結(jié)束時(shí)間時(shí)需要注意。
注:導(dǎo)入歸檔數(shù)據(jù)需要一定的時(shí)間,建議按鈕觸發(fā)。嘗試在畫面打開時(shí)觸發(fā)腳本,有的時(shí)候會(huì)出現(xiàn)歷史數(shù)據(jù)加載不上來(lái)。
腳本如下,僅供參考
Dim objConnection  
Dim strConnectionString

Dim strSQL  
Dim objrs
Dim chaxun

'定義曲線控件
Dim TREND
Dim strval_1
Dim strval_2
Dim strval_t1
Dim strval_t2

'初始化程序,省略N行。。。。。。。。。。。。。。。。。。。。。。。。。。。。

'初始化程序,省略N行。。。。。。。。。。。。。。。。。。。。。。。。。。。。

chaxun=HMIRuntime.Tags("管號(hào)查詢輸入").Read
strConnectionString = "Provider=MSDASQL;DSN=REPORT;UID=;PWD=;"
  strSQL = "select * from report where guanhao='"&chaxun&"';"
   Set objConnection = CreateObject("ADODB.Connection")
   objConnection.ConnectionString = strConnectionString
objConnection.Open
   Set objrs = CreateObject("ADODB.RecordSet")
  objrs.open  strSQL,objConnection
/賦值程序,省略,,,,,,,,,,,,,,,,,,,,,,/

/賦值程序,省略,,,,,,,,,,,,,,,,,,,,,,/

objrs.close
Set objrs = Nothing
  objConnection.Close
   Set objConnection = Nothing  
'趨勢(shì)時(shí)間設(shè)定
Set trend = ScreenItems("控件1")
strval_r=HMIRuntime.Tags("測(cè)試日期_read").Read
strval_t1=HMIRuntime.Tags("開始時(shí)間_read").Read
strval_t2=HMIRuntime.Tags("測(cè)試時(shí)間_read").Read

strval_1=strval_r+" "+strval_t1
strval_2=strval_r+" "+strval_t2

trend.Index=0
trend.Online=False
trend.TimeRange=False
trend.BeginTime=strval_1
trend.EndTime=strval_2
trend.Command="Reload"
失敗并不意味你浪費(fèi)了時(shí)間和生命。失敗表明你有理由重新開始

主站蜘蛛池模板: 日本在线毛片视频免费看| www.av在线免费观看| 免费一级国产大片| 国产精品亚洲第一区在线28石 | 国产aⅴ一区二区三区| 奇米中文字幕| 亚洲欧洲日产国码天堂| 一级做性色a爰片久久毛片| 午夜看一级特黄a大片黑| 免费一级特黄特色黄大任片| 国产亚洲精品aaa大片| 日韩中文字幕视频在线观看| 97菊爱网| 亚洲经典一区| 免费自拍视频| 国产一区二区高清视频| 国产精品亚洲欧美日韩区| 黄视频日本| 草草免费| 国产精品久久久久9999小说| 久久精品国产精品亚洲精品| 青青青免费视频精品99| 亚洲狠狠婷婷综合久久蜜桃| 最爽的乱淫片免费| 99久久伊人| 一级免费| 久久99国产精品久久99无号码 | 成人午夜小视频| 国产网站在线免费观看| 久碰香蕉精品视频在线观看 | 国产福利一区视频| 日本亚州视频在线八a| 人人舔人人插| 不卡的毛片| 日本一级成人毛片免费观看| 日韩激情中文字幕一区二区| 亚洲一片| 毛片一区二区三区| 中国美女做爰视频高清| 亚洲色图欧美一区| 亚洲精品日本一区二区在线|