WinCC 通过以太网短信猫 推送报警消息

• 方法2：通过以太网口短信猫

（以西门子路由器M874-3为例，其支持联通的3G 卡，以及移动和联通的2G 卡。据悉此硬件不支持中文短信，所以若需中文，那就考虑第三方硬件，方法类似。）

A. 激活M874-3设置中的“SMS Relay Outgoing”功能。

B. 在WinCC图形编辑器中选择“对象选项板”的“控件”选项卡，选择“添加/删除”，在“选择OCX控件”对话框中选择“Microsoft WinSock Control, version 6.0”进行注册。然后在WinCC画面中添加WinSock 控件；

C. 在GMsgFunction( )全局函数中，置位一个内部变量Alarm_Coming，这个变量作为一个全局动作触发器：建立TCP/IP连接。

D. 在Socket控件的connect事件中发送报警消息

代码如下：

• 邮件推送报警消息

通过VBS代码控制outlook 发送邮件

（个人推荐此方式，省钱; 另外，很多邮箱都可以绑定手机，邮件到达有实时短信提醒）

前提：这台电脑有outlook并能正常发送邮件（已设置好SMTP/POP3服务器, 用户账号等）。WinCC的VBS编程环境中要使能Microsoft Outlook对象库的引用

邮件功能的核心代码如下：

Dim OutlookObj As Object

Dim OutlookNewMail As Object

Set OutlookObj = CreateObject("Outlook.Application")

'创建Outlook应用对象

SetOutlookNewMail = OutlookObj.CreateItem(olMailItem)

'创建Outlook邮件对象

OutlookNewMail.To = To_Addr

'收件人地址

OutlookNewMail.cc = Cc_Addr

'抄送人地址

OutlookNewMail.Body = BodyText

'邮件内容：报警消息文本，嵌入至此

OutlookNewMail.Send

'执行发送动作

采用此方式发送邮件，Outlook会出现“有一个程序正试图以您的名义发送电子邮件”提示，则需对Outlook进行设置： '"工具" -> "信任中心" -> "编程访问" -> 选择"从不向我发出可疑活动警告"