IFIX问题处理

IFIX冗余服务器配置

IFIX冗余服务器配置 (2)

IFIX冗余服务器数据源的切换 (5)

历史报警的查询（这里只做出来在客户机上生成的） (7)

历史数据时间保存一年。 (12)

冗余服务器历史数据同步。 (12)

当服务器切换时，客户机的历史趋势仍然能切换。 (12)

计算机启动时IFIX自动运行。 (12)

IFIX冗余服务器配置

首先配置—网络如图所示添加远程节点名，然后点击配置见如图所示。

然后配置-SCADA组态，如图所示，SCADA邻居为SER02

然后配置—本地启动，见如图所示，本地节点名为SER01,本地逻辑节点名为IFIX

最后更改C:\WINDOWS\system32\drivers\etc目录下的hosts文件

用记事本打开更改如下图所示

其中圈里面的东西为增加的地方，包含两个冗余服务器，五个客户机。

至此主服务器的配置就完成了。备服务器配置更改与主服务器类似。只是需要注意SCADA 邻居为SER01,本地节点名需为SER02。其他不需要更改。

客户机的配置

禁用SCADA支持

本地启动需更改为如图所示，本地节点名和本地逻辑节点名均为CL4（以客户机4为例）

其他配置和服务器一样，包括网络配置和更高hosts文件。

到这里IFIX冗余服务器的系统配置完成。

IFIX冗余服务器数据源的切换

当客户机与主服务器连接丢失时，系统会自动切换到备用的服务器，达到自动切换的效果，果然主服务器这时候恢复正常，不会自动切换回主服务器（可以自动切换不推荐），此时如果需要切换回去，能够在操作站画面上手动的方式切换。

效果图如上图所示，代表此时连接的是SER01的数据源，SER01与SER02都正常。

点击中间的按钮可以实现SER01和SER02的手动切换。当主服务器故障时，系统会自动切换到SER02，如图所示

此时代表SER01与该客户机通信故障，接收的是SER02的数据源。当主服务器恢复后不会自动切换回（可以自动切换，但是不推荐，因为IFIX如果是服务器与PLC通信故障是不会达到切换的效果的，此时需要手动切换）

手动切换方法：

新建一个如图所示的画面（参见系统自带画面LocalAsPrimary.GRF、但是在客户机上需更改）

更改的部分为原画面中所有的标签后缀_0更改为_1，且脚本的也要进行相应的修改。

这里就解决了冗余服务器手动选择数据源和显示当前连接的服务器的名称的问题历史报警的查询（这里只做出来在客户机上生成的）

如图所示效果图

步骤：

A、ODBC服务的连接

在D:\CMIFIX\HTRDATA目录下新建一个Access取名为hisdata.mdb

开始-设置-控制面板-管理工具-数据源ODBC

选用户DNS-添加-选

数据源名:hisdata

选数据库名:hisdata.mdb, 文件类型:Access,连接池-禁止

B、系统SCU的配置

SCU-IFIX-配置-报警-报警ODBC服务,启动-修改-配置：数据库类型：Access 数据库标识符：hisdata

现在创建表：FIXALARMS（默认表名）

其它默认-确定

C、控件的引用

新建画面画面名为ifix_alarm_history

1.日期时间控件

典型装VB6.0后, 双击选Microsoft date and time picker控件（需注册控件

方法为：将该文件拷贝到C:\WINDOWS\system32目录下，

然后运行该代码为

regsvr32.exe MSCOMCT2.OCX）

2个日期控件-属性-格式:1-dtpShortDate,有效前不打勾。其它默认,

2个时间控件-属性-格式:2-dtpTime, 有效前不打勾。其它默认

2．vxData控件(数据管道)

IFIX4.0工具箱底部vxData图标

右键-属性vxData对象-

提供者：Microsoft OLE DB Provider for ODBC Drivers

数据库：DNS名：Myalarm，用户名密码选项均空---测试连接-测试连接成功-确定记录源：命令类型：SQL命令

应用-确定

3．vxGrid控件(显示)

工具箱底部vxGrid图标

选控件 vxGrid1-右键-动画-高级-高级动画配置-行为-ADORecords-动画打勾数据源：ifix_alarm_history.vxData1.ADORecords

数据转换：对象

D、VBA脚本：

'初始化设置

Private Sub CFixPicture_Initialize()

'设定默认开始时间

Me.DTPFromDate = DateAdd("d", -1, Now)

Me.DTPFromTime = ("00:00:00")

'设默认结束时间

Me.DTPEndDate = Now

Me.DTPEndTime = Now

End Sub

Private Sub CFixPicture_KeyDown(ByVal KeyCode As Long, ByVal Shift As Long, ContinueProcessing As Boolean)

End Sub

‘查询按钮脚本

Private Sub CmbSearch_Click()

'连接自动刷新

Me.vxData1.AutoRefresh = True

'Format函数用于设定时间格式

vxData1.QP1 = Format(Me.DTPFromDate.Value, "yyyy-MM-DD") & " " & Format(Me.DTPFromTime.Value, "HH:MM:SS")

vxData1.QP2 = Format(Me.DTPEndDate.Value, "yyyy-MM-DD") & " " &