基于MX组件的上位计算机与三菱PLC通信
日期：2007-6-12 0:42:35 来源：本站整理
点击： 作者：未知
点击： 作者：未知
点击【 大 中 小 】放大字体.
根据微软权威的软件开发指南MSDN（Microsoft Developer Network）的定义，ActiveX是Micrsoft适应组件对象模型（Component Object Model,COM）开发技术提出的。核心COM允许应用程序之间互相通信和使用彼此的功能，组件对象模型起源于面向对象的编程（Object- oriented programming,OOP）的概念，并把这个模型延伸到操作系统，从而方便任何COM程序对象与其他需要的接口的COM对象通讯。
目前，在工业控制FA领域，实现人机交互和数据备份的一般选择工业计算机及组态软件。笔者在南京虹梅居住区中水处理项目管理计算机中，选用了Visal Basic6.0作为开发工具，结合三菱电机发布的MX-Component 控件，方便的实现了计算机与三菱PLC的通讯。由于采用三菱MX-Component 控件方面的文献资料比较少，笔者茁文，希望大家指正。
SW3D5C-ACT-E软件目前版本3.0,支持OS有98，2000，XP等。平台支持VB，VC，VB.NET，VC.NET ，LABVIEW，BC等开发工具。经过安装SW3D5C-ACT-E，系统OCX控件列表内就有相应的驱动OCX：
一 系统组成构架：
中水处理系统组成
系统描述：由上位计算机，1号从站，2号从站。计算机和PLC之间通过RS-232通讯，直接在PLC编程口读取数据。
1号站配置：
电源模块： Q61P-A2
主基板： Q38B
CPU模块： Q01CPU
CCLINK主站：QJ61BT11
本地输入模块：QX40
本地输出模块：QY40
模拟量模块： Q68ADI 采集PH，浊度等信号
模拟量输出： Q64DA 控制压滤机，风机，提升泵
2号站配置：
电源模块： Q61P-A2
主基板： Q35B
CPU模块： Q01CPU
CCLINK主站：QJ61BT11
本地输入模块：QX40
本地输出模块：QY40
模拟量模块： Q68ADI
3-12号站
远程输入输出：AJ65SBTB1-16D，AJ65SBTB1-16T
分别采集远程水泵运行状态和监视设备。
系统运行登陆画面
编写登陆程序。
标准语法：Open (Communication line opening)
(1) Applicable ACT controls
This function is available for all ACT controls.
(2) Feature
Opens the communication line.
(3) Format
R R
Visual Basic , Visual C++ ,VBA : lRet = object.Open()
LonglRetReturned valueOutput
VBScript : varRet = object.Open()
VARIANTvarRetReturned value (LONG type)Output
(4) Explanation
The line is connected on the basis of the value set to the property for Open
method.
(5) Returned value
Normal termination: 0 is returned.
Abnormal termination: A value other than 0 is returned.
(Refer to Chapter 6 ERROR CODES.)
编写程序：
Dim fLogin As New frmLogin
fLogin.Show vbModal
If Not fLogin.OK Then
'登录失败，退出应用程序
End
End If
Unload fLogin
frmSplash.Show
'//////////////////////////
Open App.Path & "\wecom.txt" For Append As #1
Print #1, Format(Date) + " " + Format(Time) + "系统开启"
'//////////////////////////
frmSplash.Refresh
Load frmMain
IRet = frmMain.Q1.Open
'/////////////////////////
Print #1, Format(Date) + " " + Format(Time) + "准备与PLC通信"
'/////////////////////////////
If IRet <> 0 Then
Print #1, Format(Date) + " " + Format(Time) + "无法链接到PLC"
Close #1
'////////////////////////////
MsgBox "无法链接到PLC，请检查硬件设置！"
ex: End
End If
'///////////////////////////
' Print #1, Format(Date) + " " + Format(Time) + "与PLC通信成功"
Close #1
' Set db = OpenDatabase(App.Path & "\base.mdb")
' Set res = db.OpenRecordset("xml")
' res.AddNew
' res.Fields(0) = "系统开启时间" + Format(Date) + " " + Format(Time)
' res.Update
Set fMainForm = New frmMain
Load fMainForm
Unload frmSplash
fMainForm.Show
运行界面
数据采集，读取位元件，由于采样上来的16个位元件组成一个字读取的，必须在VB程序编写相应的程序，便于在界面反映每个阀门，泵的运行状态。
——可——编——程——控－制－器－技——术——门——户
目前，在工业控制FA领域，实现人机交互和数据备份的一般选择工业计算机及组态软件。笔者在南京虹梅居住区中水处理项目管理计算机中，选用了Visal Basic6.0作为开发工具，结合三菱电机发布的MX-Component 控件，方便的实现了计算机与三菱PLC的通讯。由于采用三菱MX-Component 控件方面的文献资料比较少，笔者茁文，希望大家指正。
P_L_C_技_术_网——可——编——程——控－制－器－技——术——门——户
SW3D5C-ACT-E软件目前版本3.0,支持OS有98，2000，XP等。平台支持VB，VC，VB.NET，VC.NET ，LABVIEW，BC等开发工具。经过安装SW3D5C-ACT-E，系统OCX控件列表内就有相应的驱动OCX：
WWW※PLCJS_COM－PL＃C－技.术_网(可编※程控※制器技术门户)
WWW.PLCJS.COM——可编程控制器技术门户
P_L_C_技_术_网——可——编——程——控－制－器－技——术——门——户
一 系统组成构架：
WWW※PLCJS_COM－PL＃C－技.术_网(可编※程控※制器技术门户)
——可——编——程——控－制－器－技——术——门——户
中水处理系统组成
WWW_PLC※JS_COM－PmLC－技.术_网
系统描述：由上位计算机，1号从站，2号从站。计算机和PLC之间通过RS-232通讯，直接在PLC编程口读取数据。
P.L.C.技.术.网——可编程控制器技术门户
1号站配置：
P.L.C.技.术.网——可编程控制器技术门户
电源模块： Q61P-A2
WWW_PLCJS_COM－PLC－技.术_网
主基板： Q38B
W1WW_P4LCJS_COM－PLC－技.术_网
CPU模块： Q01CPU
P.L.C.技.术.网——可编程控制器技术门户
CCLINK主站：QJ61BT11
WWcW_PLCJS_COM－PLC－技.术_网
本地输入模块：QX40
WWW_PLC※JS_COM－PLC－技.术_网(可编程控※制器技术门户)
本地输出模块：QY40
WWW_PLCJS※COM－PLC－技×术_网(可编程控※制器技术门户)
模拟量模块： Q68ADI 采集PH，浊度等信号
WWW_P※LCJS_COM－PLC－)技.术_网
模拟量输出： Q64DA 控制压滤机，风机，提升泵
WWW_PLCJS※COM－PLC－技×术_网(可编程控※制器技术门户)
WWW_PLC※JS_COM－PLC－技.术_网(可编程控※制器技术门户)
2号站配置：
WWW_PLCJS_COM－PLC－技.术_网
电源模块： Q61P-A2
WW.W_PLCJS_COM－PLC－技.术_网
主基板： Q35B
P.L.C.技.术.网——可编程控制器技术门户
CPU模块： Q01CPU
WWW_PLCJS※COM－PLC－技×术_网(可编程控※制器技术门户)
CCLINK主站：QJ61BT11
WWW※PLCJS_COM－PL＃C－技.术_网(可编※程控※制器技术门户)
本地输入模块：QX40
WWW.PLCJS.COM——可编程控制器技术门户
本地输出模块：QY40
——可——编——程——控－制－器－技——术——门——户
模拟量模块： Q68ADI
WWW_PLCJS@_COM%－PLC－技.术_网
3-12号站
P.L.C.技.术.网——可编程控制器技术门户
远程输入输出：AJ65SBTB1-16D，AJ65SBTB1-16T
WWcW_PLCJS_COM－PLC－技.术_网
分别采集远程水泵运行状态和监视设备。
WWW_P※LCJS_COM－PLC－)技.术_网
系统运行登陆画面
W1WW_P4LCJS_COM－PLC－技.术_网
WWW_PLCJS_COM－PLC－技.术_网
编写登陆程序。
WWW_P※LCJS_CO※M－PLC－技－.术_网
标准语法：Open (Communication line opening)
P_L_C_技_术_网——可——编——程——控－制－器－技——术——门——户
(1) Applicable ACT controls
W1WW_P4LCJS_COM－PLC－技.术_网
This function is available for all ACT controls.
W1WW_P4LCJS_COM－PLC－技.术_网
(2) Feature
WWW_PLCJ－S_COM－PLC－技.术_网(可－编程控－制器技术－门户)
Opens the communication line.
WWW_PLCJS※COM－PLC－技.术_网(可※编程控※制器技术门户)
(3) Format
WWW_P※LCJS_CO※M－PLC－技－.术_网
R R
WWW_PLC※JS_COM－PmLC－技.术_网
Visual Basic , Visual C++ ,VBA : lRet = object.Open()
WWW_PLC※JS_COM－PLC－技.术_网(可编程控※制器技术门户)
LonglRetReturned valueOutput
P.L.C.技.术.网——可编程控制器技术门户
VBScript : varRet = object.Open()
WWW_PL※CJS_COM－PLC－技.术_网
VARIANTvarRetReturned value (LONG type)Output
WWW_PLCJS_COM－PLC－技.术_网
(4) Explanation
WWW_PLC※JS_COM－PLC－技.术_网(可编程控※制器技术门户)
The line is connected on the basis of the value set to the property for Open
WWcW_PLCJS_COM－PLC－技.术_网
method.
P_L_C_技_术_网——可——编——程——控－制－器－技——术——门——户
(5) Returned value
WW.W_PLCJS_COM－PLC－技.术_网
Normal termination: 0 is returned.
WW.W_PLCJS_COM－PLC－技.术_网
Abnormal termination: A value other than 0 is returned.
WWW.PLCJS.COM——可编程控制器技术门户
(Refer to Chapter 6 ERROR CODES.)
WW.W_PLC※JS_C,OM－PL,C－技.术_网
编写程序：
P_L_C_技_术_网——可——编——程——控－制－器－技——术——门——户
Dim fLogin As New frmLogin
WWW_PLCJS※COM－PLC－技.术_网(可※编程控※制器技术门户)
fLogin.Show vbModal
P_L_C_技_术_网——可——编——程——控－制－器－技——术——门——户
If Not fLogin.OK Then
WWW_P※LCJS_COM－PLC－)技.术_网
'登录失败，退出应用程序
WWW※PLCJS_COM－PL＃C－技.术_网(可编※程控※制器技术门户)
End
WWW※PLCJS_COM－PL＃C－技.术_网(可编※程控※制器技术门户)
End If
——可——编——程——控－制－器－技——术——门——户
Unload fLogin
WW.W_PLCJS_COM－PLC－技.术_网
frmSplash.Show
WW.W_PLC※JS_C,OM－PL,C－技.术_网
'//////////////////////////
plcjs.技.术_网
Open App.Path & "\wecom.txt" For Append As #1
WWW_P※LCJS_COM－PLC－)技.术_网
Print #1, Format(Date) + " " + Format(Time) + "系统开启"
WWW_PLCJS※COM－PLC－技.术_网(可※编程控※制器技术门户)
'//////////////////////////
WWW_PLCJS_COM－PLC－技.术_网
frmSplash.Refresh
WWcW_PLCJS_COM－PLC－技.术_网
Load frmMain
plcjs.技.术_网
IRet = frmMain.Q1.Open
——可——编——程——控－制－器－技——术——门——户
'/////////////////////////
WWW_PLCJS@_COM%－PLC－技.术_网
Print #1, Format(Date) + " " + Format(Time) + "准备与PLC通信"
plcjs.技.术_网
WWW.PLCJS.COM——可编程控制器技术门户
'/////////////////////////////
WWcW_PLCJS_COM－PLC－技.术_网
If IRet <> 0 Then
WWW_PLC※JS_COM－PLC－技.术_网(可编程控※制器技术门户)
Print #1, Format(Date) + " " + Format(Time) + "无法链接到PLC"
P_L_C_技_术_网——可——编——程——控－制－器－技——术——门——户
Close #1
WW.W_PLC※JS_C,OM－PL,C－技.术_网
'////////////////////////////
P_L_C_技_术_网——可——编——程——控－制－器－技——术——门——户
MsgBox "无法链接到PLC，请检查硬件设置！"
WWW_P※LCJS_CO※M－PLC－技－.术_网
ex: End
WW.W_PLC※JS_C,OM－PL,C－技.术_网
End If
WWW_PLCJS_COM－PLC－技.术_网
'///////////////////////////
WWW_PLCJS_COM－PLC－技.术_网
' Print #1, Format(Date) + " " + Format(Time) + "与PLC通信成功"
WW.W_PLCJS_COM－PLC－技.术_网
Close #1
WWW_PLCJS※COM－PLC－技.术_网(可※编程控※制器技术门户)
' Set db = OpenDatabase(App.Path & "\base.mdb")
WW.W_PLCJS_COM－PLC－技.术_网
' Set res = db.OpenRecordset("xml")
WWW_PLCJS※COM－PLC－技×术_网(可编程控※制器技术门户)
' res.AddNew
P_L_C_技_术_网——可——编——程——控－制－器－技——术——门——户
' res.Fields(0) = "系统开启时间" + Format(Date) + " " + Format(Time)
WWW_PLCJS@_COM%－PLC－技.术_网
' res.Update
P_L_C_技_术_网——可——编——程——控－制－器－技——术——门——户
Set fMainForm = New frmMain
WW.W_PLCJS_COM－PLC－技.术_网
Load fMainForm
——可——编——程——控－制－器－技——术——门——户
Unload frmSplash
W1WW_P4LCJS_COM－PLC－技.术_网
fMainForm.Show
WWcW_PLCJS_COM－PLC－技.术_网
WWW_PLCJS※COM－PLC－技.术_网(可※编程控※制器技术门户)
运行界面
WW.W_PLC※JS_C,OM－PL,C－技.术_网
数据采集，读取位元件，由于采样上来的16个位元件组成一个字读取的，必须在VB程序编写相应的程序，便于在界面反映每个阀门，泵的运行状态。
WWW_P※LCJS_CO※M－PLC－技－.术_网
上一篇: 三菱PWM格式文件梯形图编码下一篇: 现场总线技术及其新进展
评论内容
载入中...
载入中...
P
L
C
技
术
网
|
可
编
程
控
制
器
技
术
门
户
|
十
万
P
L
C
工
程
师
的
共
同
选
择
！
L
C
技
术
网
|
可
编
程
控
制
器
技
术
门
户
|
十
万
P
L
C
工
程
师
的
共
同
选
择
！
·最新招聘信息
·最新求职信息
·推荐产品
·推荐厂商
·栏目热门排行
·站内热门排行