WINCC早期版本实现电子签名的方法

主要内容：

1、要求

2、CCEsigDlg库

3、为操作添加签名确认

在某些重要的场合，如改变设定值、改变某些切换操作、开始一段顺控工艺、开始一个批次等，这些重要的操作需要使用电子签名进行操作确认。通俗的讲就是操作对象或进行控制时要输入用户名及密码进行确认。

WinCC V7.5之前的版本中需要借助SIMATIC Logon提供的电子签名接口来进行编程实现电子签名的功能。下面基于WINCC V7.4.1.0版本说明实现的具体步骤。

1

  要求

安装SIMATIC Logon。

在“用户管理器”中已激活“SIMATIC登录”。

即使用SIMATIC Logon进行集中式和系统级用户管理。相关内容可查看WINCC帮助对应章节。

2

  CCEsigDlg库

SIMATIC Logon提供了一个CCEsigDlg库，来实现电子签名功能。

CCEsigDlg.ESIG对象，包括了属性：forcecomment， 如果forcecomment设置为true，则系统会要求提供带有强制注释的电子签名。

方法：Initialize、ShowDialog、VerifyUser，使用ShowDialog打开电子签名窗口。

long ShowDialog(

                               BSTR bstrUserName,

                               BSTR bstrDisplayName,

                               BSTR bstrDomain,

                               unsigned long dwLanguagID,

                               VARIANT* pvComment);

参数：

返回值：

3

  为操作添加签名确认

如点击按钮设置变量值时，需要不带强制注释的电子签名。按钮点击事件添加如下vbs脚本：

Sub OnClick(ByVal Item)                    Dim esig,usernameDim commentDim retSet esig = CreateObject("CCEsigDlg.ESIG") username=Inputbox("请输入用户名","操作认证","")If username = "" ThenExit SubEnd Ifesig.forcecomment = False ret = esig.showDialog(username,username,"",HMIRuntime.Language,comment)If ret = 1 ThenDim tag1Set tag1 = HMIRuntime.Tags("tag1")tag1.Write 123End IfEnd Sub

注释：

使用Inputbox对话框输入签名的用户名。esig.forcecomment = False设置为不带强制注释。HMIRuntime.Language获得当前的运行语言。如果签名正确执行写入变量。

〔正文结束〕

关注公众号回复“加群”按规则加入『WINCC脚本』技术交流群。关注后在公众号菜单项可查看更多内容。

如果你有与本文相关问题可以留言或后台发消息，欢迎点赞、分享、关注。

免责声明：如果侵犯了您的权益，请联系站长，我们会及时删除侵权内容，谢谢合作！