|
| 商家信息 |
 |
代理商链结
北京工控进步科技有限公司 |
|
| 三菱A900GOT触摸屏网关功能的应用 |
|
|
|
|
|
|
| 相关品牌: 三菱 |
| 相关产品: 人机界面 |
| 更新时间: 2007-6-1 15:40:57 |
| 点击次数: 72 |
|
|
|
|
| |
当在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的情形：
|
|
