wincc用戶歸檔VB腳本與SQL使用說(shuō)明

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

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

3、此項(xiàng)是用于數(shù)據(jù)存儲(chǔ)觸發(fā)的。也就是當(dāng)ID和指令分別為-1和6時(shí)用戶歸檔存儲(chǔ)一次數(shù)據(jù)。詳細(xì)如下圖單擊完成實(shí)現(xiàn)對(duì)用戶歸檔的創(chuàng)建。創(chuàng)建VB腳本動(dòng)作，是用于用戶歸檔事件觸發(fā)的動(dòng)作，沒(méi)有此動(dòng)作用戶歸檔將無(wú)法存儲(chǔ)數(shù)據(jù)。方法：打開(kāi)VB腳本單擊文件新建動(dòng)作。然后將下面程序?qū)懭爰纯?。Function 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時(shí)會(huì)觸發(fā)一次變量變化，為了避免寫(xiě)入無(wú)效數(shù)據(jù)，此處添加里一個(gè)flag變量用于判斷是否激活WINCC產(chǎn)生的事件，在全局腳本中再添加一個(gè)VB動(dòng)作，通過(guò)flag自身的變化事件把flag置位。程序如下：Function actionDim flagSet flag = HMIRuntime.Ta

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

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

7、來(lái)實(shí)現(xiàn)。本項(xiàng)目使用的是利用EXCEL宏來(lái)實(shí)現(xiàn)。方法就是用EXCEL中的開(kāi)發(fā)工具中的VBA程序編輯器來(lái)實(shí)現(xiàn)。打開(kāi)EXCEL在工具欄右擊自定義快速訪問(wèn)工具欄在彈出的對(duì)話框中選擇常規(guī)將開(kāi)發(fā)工具選上確認(rèn)單擊工具欄的開(kāi)發(fā)工具單擊Visual Basic打開(kāi)編輯器進(jìn)行程序編輯。單擊插入模塊輸入以下程序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應(yīng)該注意的是MICROSOF-E50F33WINCC為服務(wù)器名稱CC_GYDX_XM_14_06_05_16_19_30R為數(shù)據(jù)庫(kù)名稱UA#test為表格名稱，主要記住這3個(gè)名稱，用于訪問(wèn)數(shù)據(jù)庫(kù)

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