您所在的位置：首页 > 技术 > 应用案例

关于A900GOT网关功能的应用

信息时间：2006-08-14 信息来源：

一键分享

QQ空间 新浪微博 腾讯微博 人人网

   当在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中文版软件的工作区窗口中双击“公共设置”/“邮件”，在弹出

的对话框中进行如下设置：
    



    在“公共设置/报警记录”中的设定如下图所示。
    其中“邮件发送”项有不发送、发生、恢复和发生/恢复四种选择。这里选择发生/恢复，即在报警发生时和恢复时均发送邮件。邮件的内容即在下图中所设定的注释信息。