ifix冗余时主节点服务器如何切换到维护模式,IFIX冗余时切换回主节点代码

IFIX冗余时切换回主节点代码_GE_FANUC百度首页 | 百度空间 | 登录 GE_FANUC相互学习，共同进步！ 主页博客相册|个人档案

查看文章

IFIX冗余时切换回主节点代码2007-02-28

11:38IFIX冗余时，当主节点停机，客户端将自动切换到备份节点。但此后即使主节点恢复正常，iFIX也不会从备份节点切换回主节点，直到备份节点停机才切换回主节点。可以运用如下代码将IFIX直接切换回主节点。

此段代码可以加到 调度、定时器、按钮等。

添加步骤：

1. 打开VBA，在Project_User中插入一个新的模块。

2. 将代码加到模块中。

3. 在合适的地方添加调用的代码

――――――――――――――――模块中代码――――――――――――――――――

Public Function GetLocalNode() As String

On Error Resume Next

Dim strMyName As String * 9

Dim iErr As Integer

Dim lngLength As Long

iErr = eda_get_my_physical_name(strMyName)

lngLength = InStr(1, strMyName, Chr(0)) – 1

If lngLength > 0 Then

strMyName = Left(strMyName, lngLength)

GetLocalNode = Trim(strMyName)

End If

End Function

Public Sub FailOverToPr