ifix自定义声音报警（自动执行脚本）

madeINchina2025

已于 2024-06-22 18:33:13 修改

阅读量9.2k

点赞数 3

分类专栏：培训-scada-ifix 文章标签：服务器运维

于 2018-08-01 09:02:19 首次发布

本文链接：https://blog.csdn.net/chinazz2025/article/details/81324102

版权

本文介绍了如何在ifix中创建一个名为Test1的报警标签，设置条件触发事件调度，当Fix32.G1GMS.ALL.F_AREA_UNACK > 0时，每10秒播放指定的WAV文件作为声音报警。通过VB脚本来实现声音播放，并指导如何将脚本设置为随ifix后台自动运行，确保报警功能在系统启动时自动激活。

摘要由CSDN通过智能技术生成

1.新建一个tag,比如叫Test1。使能报警并设置报警组是ALL

2.新建一个调度，并在调度里面新建一个事件调度项，如下图

表示在 Fix32.G1GMS.ALL.F_AREA_UNACK > 0 时（即有未确认的报警），会每隔10秒钟执行一次vb脚本

3.vb脚本里面是如下代码

Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long

Private Sub FixEvent1_WhileTrue()
'定义文件名-字符串类型，返回结果-长整型
Dim filename As String, result As Long
'声音文件路径
filename = "D:\CHOT86\GMS\APP\UNACKALARM2.WAV"
'返回结果
result = sndPlaySound(filename, SND_ASYNC)
En