關于A900GOT網關功能的應用

分類：解決方案日期：2009-08-17 09:02:16 來源：廠商



當在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中文版軟件的工作區窗口中雙擊“公共設置”/“郵件”，在彈出的對話框中進行如下設置：在“公共設置/報警記錄”中的設定如下圖所示。其中“郵件發送”項有不發送、發生、恢復和發生/恢復四種選擇。這里選擇發生/恢復，即在報警發生時和恢復時均發送郵件。郵件的內容即在下圖中所設定的注釋信息。下圖是利用郵件服務器收到E-Mail的情形：