wincc用戶歸檔VB腳本與SQL使用說明

1、報表建立本次項目要求： 所有測量變量在一個工作周期結(jié)束后進行存儲，也就是事件觸發(fā)，不同與以往的周期觸發(fā)。要求能存儲字符串類型的數(shù)據(jù)，所以本次報表使用用戶歸檔來實現(xiàn)，因為變量記錄工具是不能存儲字符串類型數(shù)據(jù)的。而且用戶歸檔控件的事件觸發(fā)比變量記錄要靈活的多。要求可以將數(shù)據(jù)導出到EXCEL表格中。實現(xiàn)對數(shù)據(jù)的編輯。具體實現(xiàn)方法如下： 第1項不用過多在意，了解一下即可，從第2項起為主要內(nèi)容。第1項的作用就是講解怎樣觸發(fā)用戶歸檔存儲數(shù)據(jù)的。在建立報表前首先要新建兩個系統(tǒng)變量，用于日期和時間的存儲。在WINCC組態(tài)環(huán)境內(nèi)右擊變量管理單擊添加新的驅(qū)動程序找到System Info.chn單擊打開如下圖建立

2、兩個變量分別為riqi 和 shijian作為日期和時間的存儲變量。再建立兩個控制變量，此變量需要與下位機程序進行連接。分別為A_ID、A_JOP在下位機程序里進行編寫，當自控程序運行完一邊后將這兩個變量分別賦值-1、6賦值結(jié)束后再將0賦給這兩個變量。程序如下圖此目的是用于用戶歸檔數(shù)據(jù)存儲時事件觸發(fā)條件，在后面用戶歸檔建立會詳細描寫。建立用戶歸檔WINCC在第一次安裝完后是沒有用戶歸檔控件的，需要再次將光盤插入重新安裝一次，在選項中將用戶歸檔添加進行安裝。單擊下一步先點擊創(chuàng)建，在創(chuàng)建變量完成后，將上面建立的兩個變量A_ID/A_JOP分別添加到ID和指令內(nèi)，方法：單擊選擇按鈕瀏覽變量添加即可。

3、此項是用于數(shù)據(jù)存儲觸發(fā)的。也就是當ID和指令分別為-1和6時用戶歸檔存儲一次數(shù)據(jù)。詳細如下圖單擊完成實現(xiàn)對用戶歸檔的創(chuàng)建。創(chuàng)建VB腳本動作，是用于用戶歸檔事件觸發(fā)的動作，沒有此動作用戶歸檔將無法存儲數(shù)據(jù)。方法：打開VB腳本單擊文件新建動作。然后將下面程序?qū)懭爰纯伞unction actionDim xiaoshiDim riqiDim flagSet flag = HMIRuntime.Tags(flag)flag.Read If flag.Value =1 Thenriqi=CStr(Year(Now)&-&CStr(Month(Now)&-&CStr(Day(Now)Dim A_IDSe

4、t A_ID = HMIRuntime.Tags(A_ID)Dim A_JOPSet A_JOP = HMIRuntime.Tags(A_JOP)A_ID.Read A_ID.Write -1A_JOP.ReadA_JOP.Write 6End If輸入完之后將其保存。命名為write。注意：一般剛激活WINCC時會觸發(fā)一次變量變化，為了避免寫入無效數(shù)據(jù)，此處添加里一個flag變量用于判斷是否激活WINCC產(chǎn)生的事件，在全局腳本中再添加一個VB動作，通過flag自身的變化事件把flag置位。程序如下：Function actionDim flagSet flag = HMIRuntime.Ta

5、gs(flag)flag.Read If flag.Value =0 Thenflag.Write 1End If保存后命名為flag創(chuàng)建域（也就是存儲的數(shù)據(jù)變量）單擊剛創(chuàng)建的用戶歸檔，在右邊空白處右擊選擇插入新域， 在彈出的對話框中進行設(shè)置。如下圖此處為數(shù)據(jù)類型，必須與變量數(shù)一致此處為輸入備注輸入名稱，最好與變量名一致此處為數(shù)據(jù)類型，必須與變量數(shù)一致此處為輸入備注輸入名稱，最好與變量名一致單擊下一步單擊此處進行變量連接單擊此處進行變量連接單擊完成按鈕就完成了一個變量數(shù)據(jù)的建立，以此類推。當把所有的數(shù)據(jù)變量都建立完后單擊工具欄中的保存按鈕。在WINCC圖形編輯器中插入一個用戶歸檔表格，并建立于

6、連接。方法：在WINCC圖形編輯器找到對象選項板控件選擇用戶歸檔表格在左側(cè)進行添加。如下圖：此處為用戶歸檔表格此處為用戶歸檔表格添加完表格后雙擊在彈出的對話框中進行連接和設(shè)置單擊此處選擇剛剛建立的用戶歸檔，來進行鏈接單擊此處選擇剛剛建立的用戶歸檔，來進行鏈接單擊確認完成連接。以上就是用戶歸檔的建立。這時候再打開SQL就會發(fā)現(xiàn)多了一個數(shù)據(jù)CC_GYDX_XM_14_06_05_16_19_30R，此數(shù)據(jù)庫就是用戶歸檔的存儲數(shù)據(jù)庫，在其表格中會有自動生成一個供用戶存儲數(shù)據(jù)的表格UA#test。如下圖，記住數(shù)據(jù)庫名稱和表格名稱用于報表的導出。數(shù)據(jù)報表導出數(shù)據(jù)的導出應該是在WINCC上做按鈕寫VB腳本

7、來實現(xiàn)。本項目使用的是利用EXCEL宏來實現(xiàn)。方法就是用EXCEL中的開發(fā)工具中的VBA程序編輯器來實現(xiàn)。打開EXCEL在工具欄右擊自定義快速訪問工具欄在彈出的對話框中選擇常規(guī)將開發(fā)工具選上確認單擊工具欄的開發(fā)工具單擊Visual Basic打開編輯器進行程序編輯。單擊插入模塊輸入以下程序Sub 使用Execute方法產(chǎn)生記錄集() Dim cn As ADODB.Connection Dim rs As ADODB.Recordset Dim sql As String, cnstring As String Set cn = New Connection cnstring = driver

8、=SQL Server;server=MICROSOF-E50F33WINCC;database=CC_GYDX_XM_14_06_05_16_19_30R; cn.ConnectionString = cnstring cn.Open sql = select * from UA#test Set rs = cn.Execute(sql) a2.CopyFromRecordset rs End Sub應該注意的是MICROSOF-E50F33WINCC為服務器名稱CC_GYDX_XM_14_06_05_16_19_30R為數(shù)據(jù)庫名稱UA#test為表格名稱，主要記住這3個名稱，用于訪問數(shù)據(jù)庫

9、表格的語句。此數(shù)據(jù)的連接還需要引用ADO，方法：單擊工具欄中的工具點擊引用找到到ADO2.8打上對號確認引用成功，如下圖單擊保存會彈出一個對話框單擊否選擇保存文件類型為啟用宏的工作簿單擊保存結(jié)束操作。保存后，宏信息可能會被禁用，也就是宏自身的安全保護會讓宏配置無法運行，單擊開發(fā)工具選擇宏安全性將啟用所有宏和信任對VBA工程對象模型的訪問這兩項選中即可。如下圖導出報表的操作為：單擊工具欄中的開發(fā)工具點擊宏單擊執(zhí)行即可將數(shù)據(jù)導出。如下圖總結(jié)本次項目有一個缺點，就是報表的實現(xiàn)還存在著一些問題，首先是不能按指定的日期和時間來進行查詢也就是不能輸入條件查詢，查詢結(jié)果沒有求和，也就是在查詢過程中不能計算。本次項目的一些注意事項：WINCC6.2在安裝完用戶歸檔后的語言是德文的，在雙擊用戶歸檔時會彈出一個對話框警告，意思是說打開的語言錯誤，不用在意此警告，用戶歸檔同樣可以正常使用，如果想解決只要將WINCC工具內(nèi)的語言改為英文