wincc用户归档VB脚本与SQL使用说明.docxVIP

wincc用户归档VB脚本与SQL使用说明

建立用户归档

WINCC在第一次安装完后是没有用户归档控件的，需要再次将光盘插入重新安装一次，在选项中将用户归档添加进行安装。

单击下一步

先点击创建，在创建变量完成后，将上面建立的两个变量A_ID/A_JOP分别添加到ID和指令内，方法：单击选择按钮——浏览变量添加即可。

此项是用于数据存储触发的。也就是当ID和指令分别为-1和6时用户归档存储一次数据。

详细如下图

单击完成实现对用户归档的创建。

创建VB脚本动作，是用于用户归档事件触发的动作，没有此动作用户归档将无法存储数据。

方法：打开VB脚本——单击文件——新建——动作。然后将下面程序写入即可。

Functionaction

Dimxiaoshi

Dimriqi

Dimflag

Setflag=HMIRuntime.Tags(flag)

flag.Read

Ifflag.Value=1Then

riqi=CStr(Year(Now))-CStr(Month(Now))-CStr(Day(Now))

DimA_ID

SetA_ID=HMIRuntime.Tags(A_ID)

DimA_JOP

SetA_JOP=HMIRuntime.Tags(A_JOP)

A_ID.Read

A_ID.Write-1

A_JOP.Read

A_JOP.Write6

EndIf

输入完之后将其保存。命名为write。注意：一般刚激活WINCC时会触发一次变量变化，为了避免写入无效数据，此处添加里一个flag变量用于判断是否激活WINCC产生的事件，在全局脚本中再添加一个VB动作，通过flag自身的变化事件把flag置位。

程序如下：

Functionaction

Dimflag

Setflag=HMIRuntime.Tags(flag)

flag.Read

Ifflag.Value=0Then

flag.Write1

EndIf

保存后命名为flag

创建域（也就是存储的数据变量）

单击刚创建的用户归档，在右边空白处右击——选择插入新域，

在弹出的对话框中进行设置。如下图

此处为数据类型，必须与变量数一致此处为输入备注输入名称，最好与变量名一致

此处为数据类型，必须与变量数一致

此处为输入备注

输入名称，最好与变量名一致

单击下一步

单击此处进行变量连接

单击此处进行变量连接

单击完成按钮就完成了一个变量数据的建立，以此类推。

当把所有的数据变量都建立完后单击工具栏中的保存按钮。

在WINCC图形编辑器中插入一个用户归档表格，并建立于连接。

方法：

在WINCC图形编辑器找到——对象选项板——控件——选择用户归档表格——在左侧进行添加。

如下图：

此处为用户归档表格

此处为用户归档表格

添加完表格后双击——在弹出的对话框中进行连接和设置

单击此处选择刚刚建立的用户归档，来进行链接

单击此处选择刚刚建立的用户归档，来进行链接

单击确认完成连接。

以上就是用户归档的建立。

这时候再打开SQL就会发现多了一个数据CC_GYDX_XM_14_06_05_16_19_30R，此数据库就是用户归档的存储数据库，在其表格中会有自动生成一个供用户存储数据的表格UA#test。如下图，记住数据库名称和表格名称用于报表的导出。

数据报表导出

数据的导出应该是在WINCC上做按钮写VB脚本来实现。本项目使用的是利用EXCEL宏来实现。

方法就是用EXCEL中的开发工具中的VBA程序编辑器来实现。

打开EXCEL在工具栏右击——自定义快速访问工具栏——在弹出的对话框中选择常规——将开发工具选上——确认

单击工具栏的开发工具——单击VisualBasic——打开编辑器进行程序编辑。

单击插入模块输入以下程序

Sub使用Execute方法产生记录集()

DimcnAsADODB.Connection

DimrsAsADODB.Recordset

DimsqlAsString,cnstringAsString

Setcn=NewConnection

cnstring=driver={SQLServer};server=MICROSOF-E50F33\WINCC;database=CC_GYDX_XM_14_06_05_16_19_30R;

cn.ConnectionString=cnstring

cn.Open

sql=select*fromUA#test

Setrs=cn.Execute(sql)

[a2].CopyFromRecordsetrs