JZGKCHINA
工控技术分享平台
在 IFix 使用过程中经常会使用到调度功能来实现定时报告，事件触发类的脚本，那么后台调度的进程也会出现被操作人员等意外关闭的情况。那么就会造成我们的定时报告，脚本等无法正常运行。
那么如何保证在后台调度被异常关闭后可以自动启动呢？那么下面就介绍一种方法。
思路：在一个一直被打开的画面（比如导航栏画面）中放一个定时器，循环检测调度是否启动，如果调度没启动就自动启动调度。防止别人关闭了后台任务窗口。如果调度设置为后台运行，那么任务中的 FixBackgroundServer.EXE 也必须设置为后台运行。
具体步骤如下：
1）在 SCU中检查 FixBackgroundServer.EXE 为后台方式，并查看调度是否也是后台方式运行。如下图：
SCU 后台任务
2）在导航栏添加一个定时器，设置定时器的名称：diaodu，以及定时器的时间间隔: 1000毫秒。
定时器设置
3）编写定时器的脚本。首先定义一个 “Function” , 然后编写定时器的脚本。
Private Function CheckSchedulerIsRun(exeName As String) As Boolean
On Error GoTo Err
Dim WMI
Dim Obj
Dim Objs
CheckExeIsRun = False
Set WMI = GetObject("WinMgmts:") Set Objs = WMI.InstancesOf("Win32_Process")For Each Obj In Objs
If (InStr(UCase(exeName), UCase(Obj.Description)) <> 0) Then
CheckExeIsRun = True
If Not Objs Is Nothing Then Set Objs = Nothing
If Not WMI Is Nothing Then Set WMI = Nothing
Exit Function
End If
Next
If Not Objs Is Nothing Then Set Objs = Nothing
If Not WMI Is Nothing Then Set WMI = Nothing
Exit Function
Err:
If Not Objs Is Nothing Then Set Objs = Nothing
If Not WMI Is Nothing Then Set WMI = Nothing
End Function
定时器脚本程序如下：
Private Sub diaodu(ByVal lTimerId As Long)
If CheckSchedulerIsRun("FIXBACKGROUNDSERVER.EXE") = False Then Shell System.FixPath(Base_Path) & "\FIXBACKGROUNDSERVER.EXE"end if
End Sub
脚本程序
至此所有设置完成，运行 IFix 后，关闭后台任务后，观测后台任务是否又自动启动。
后台任务
那么今天关于 IFix 调度异常关闭再次自动启动的方法就介绍到这里。
以上代码可以直接复制使用。工程中测试过。
往期回顾
IFIX 一个不得不介绍的强大功能
IFIX 如何实现与S7-200的OPC通讯
Python 连接数据库的多种方法
PCS7调试之我见
OPC 通讯不得不说的强大软件
Kepware 如何实现与PLC的通讯
MYSQL 与上位机组态软件之间数据交换的秘密
西门子S7-1500的OPC通讯组态
SQL Server 数据库设计--SELECT语句
。。。。。。
姿势已摆好
就等你点啦
作者简介
剑控老罗
具有10年工业自动化领域SCADA，DCS，PLC等项目实施经验，熟悉石化行业，油田数字化行业，熟悉多个品牌PLC，HMI，SCADA，数据库等。
