關于A900GOT網關功能的應用

三菱電機自動化（上海）有限公司 巢曉陽

當在A900GOT上使用以太網通訊模塊(A9GT-J71E71-T，硬件版本E或以上)時可以實現網關服務器功能、網關客戶端功能、FTP服務器功能和E-Mail發送功能。由于這些功能都屬于擴展功能，所以需要安裝對應的擴展功能OS【Gateway(Server,Client,Mail,FTP)】并加裝A9GT-(Q)FNB(*M)功能擴展板。
注意：當與串行通訊板一同使用時，串行通訊板還是安裝在原來的位置，而當與總線通訊板一同使用時，總線通訊板要裝在以太網通訊模塊的插槽上(如下圖所示)。

㈠　有關網關服務器功能的應用:
　　網關服務器功能提供了上位機（利用MX　Component）通過以太網訪問GOT的網關元件（利用GT　Designer(2)指定）來間接訪問PLC（可以是三菱或第三方產品）中元件的功能。系統構成如下圖所示：

　　具體的實現步驟如下：
1．GOT的設置：
這里以GT　Designer2中文版軟件為例說明在軟件中的相關設置。在工程工作區窗口中對“公共設置”中的“網關服務器”設置如下：

其中的EG即網關軟元件，這里的設置將EG0,EG1與PLC中的D10,D11進行了關聯，將EG2和EG3與PLC中的M0到M15,M16到M31進行了關聯。從而上位機可以通過訪問EG來實現間接訪問PLC的功能。
在GOT實用菜單的“SETUP”項中對GOT的IP地址等項進行如下設置：


2．上位機監控程序的開發：
這里利用Visual　Basic　6.0和MX　Component來開發上位監控程序。MX　Component是支持從PC到PLC多種通訊方式的ActiveX控件庫，它可以無須知道協議的具體格式即輕松地實現各種形式的通訊。當安裝了MX　Component以后，就可以在Visual　Basic，Visual　C++等開發環境中使用對應的通訊控件很方便地進行通訊程序的開發，這里我們要使用到的是一個名為ActGOT的控件。
首先啟動Visual　Basic并選擇“工程”/“部件”，在“部件”對話框中我們可以看到很多與三菱產品進行通訊的控件，這里我們勾選“MITSUBISHI　ActGOT　Controls　Ver3.0”項。

然后將工具箱中名為ActGOT的控件（如上圖所示）添加到窗體中，在屬性窗口中對GOT的IP地址（ActHostAddress）以及端口號（ActPortNumber）進行如下設置：


程序代碼如下：
Private　Sub　Command1_Click()　'打開端口
IRet　=　ActGOT1.Open()
End　Sub

Private　Sub　Command2_Click()　'關閉端口
IRet　=　ActGOT1.Close()
End　Sub

Private　Sub　Command3_Click()　'讀取GOT型號
Dim　szCpuName　As　String
Dim　ICpuType　As　Long
IRet　=　ActGOT1.GetCpuType(szCpuName,　ICpuType)
Text1.Text　=　szCpuName　　　　　　　'顯示GOT的產品型號
Text2.Text　=　Hex(ICpuType)　　　'顯示GOT的型號代碼（固定為E340H）
End　Sub

Private　Sub　Command4_Click()　'D0數值讀取
Dim　szDevice　As　String
Dim　IData　As　Long
szDevice　=　'EG0'
IRet　=　ActGOT1.GetDevice(szDevice,　IData)
Text3.Text　=　IData
End　Sub

Private　Sub　Command5_Click()　'D0數值設定
Dim　szDevice　As　String
Dim　IData　As　Long
szDevice　=　'EG0'
If　Text4.Text　=　''　Then
MsgBox　'請輸入數值!',　vbExclamation,　'警告'
Else
IData　=　Text4.Text
IRet　=　ActGOT1.SetDevice(szDevice,　IData)
End　If
End　Sub

Private　Sub　Command6_Click()　'M0置位
Dim　szDevice　As　String
Dim　IData　As　Long
szDevice　=　'EG2'
IData　=　'1'
IRet　=　ActGOT1.SetDevice(szDevice,　IData)
End　Sub

Private　Sub　Command7_Click()　'M0復位
Dim　szDevice　As　String
Dim　IData　As　Long
szDevice　=　'EG2'
IData　=　'0'
IRet　=　ActGOT1.SetDevice(szDevice,　IData)
End　Sub

Private　Sub　Command8_Click()　'M0狀態讀取
Dim　szDevice　As　String
Dim　IData　As　Long
szDevice　=　'EG2'
IRet　=　ActGOT1.GetDevice(szDevice,　IData)
If　IData　=　1　Then
Shape1.FillColor　=　RGB(255,　0,　0)　　　　　'當M0=ON時，顯示紅色
ElseIf　IData　=　0　Then
Shape1.FillColor　=　RGB(255,　255,　255)　'當M0=OFF時，顯示白色
End　If
End　Sub
㈡　有關FTP服務器功能的應用：
　FTP服務器功能可以利用FTP客戶端軟件在電腦上通過以太網對保存在GOT的PC卡中的數據（比如配方,報警記錄,硬拷貝圖像等）進行讀寫操作。系統構成如下圖所示：

首先在GT　Designer2中文版軟件的工程工作區窗口中雙擊“公共設置”/“FTP”，在彈出的對話框中進行如下設置：

可以先利用PING指令進行線路測試，然后進行FTP服務器的登錄：

上面操作中使用的　quote　gtwr命令用于將FTP服務器功能的模式由查詢模式轉為寫模式，否則將無法對PC卡進行寫入刪除等項操作。

㈢　有關E-Mail發送功能的應用：
該項功能可以在報警發生時或恢復時向指定的對象發送郵件（報警發生和恢復的信息）。系統構成如下圖所示：

首先在GT　Designer2中文版軟件的工作區窗口中雙擊“公共設置”/“郵件”，在彈出的對話框中進行如下設置：

在“公共設置/報警記錄”中的設定如下圖所示。
其中“郵件發送”項有不發送、發生、恢復和發生/恢復四種選擇。這里選擇發生/恢復，即在報警發生時和恢復時均發送郵件。郵件的內容即在下圖中所設定的注釋信息。