基于ADO的IFIX历史数据报表

合集下载

报表控件应用-iFix

报表控件应用-iFix

报表控件应用-iFix第一部分数据存储[1] 运行iFix演示程序,添加数字量输出块(DO)DataLogTrig、DataLogEnable。

[2] 工作台开发环境中新建画面DataLog,右键点击选择编辑脚本添加程序:Fix32.Fix.DataLogEnabled.F_CV = 1[3] 菜单中选择插入〉OLE对象,对象类型列表中选择hmiReportDataLog.CtrlX插入到换面中,点击控件右键菜单中选择动画〉配置〉杂项,将控件的属性DataLogEnabled链接数据块DATALOGENABLED ,属性DataLogTrig 链接数据块 DATALOGTRIG,数据转换选择”对象”。

可将控件参数TagValue001- T agValue120链接模拟量数据块的实时值(Fix32.FIX.IFIX1_BATCH_BULKFLOW.F_CV)作为采样点,控件参数TagDesc001- T agDesc120链接模拟量数据块的描述信息(Fix32.FIX.IFIX1_BATCH_BULKFLOW.A_DESC),数据块的描述信息不能为空,不能以数字开头,不能包含运算符号。

[4] 点击控件右键菜单中选择属性,将控件属性DataLogInterval 设为1-7的整数值将控制控件的采样周期为5秒钟至1小时,设为8时停止自动采样。

画面中添加一个按钮[触发手动存储]按钮,按下时将数据块DATALOGTRIG 置1,释放时置0。

[5] 保存画面并切换至运行状态,选中[显示数据]可见设置的数据点名称和iFix传入的变量数据,按控件中[创建数据表]按钮,再按[存储数据]按钮,可在数据库中建立一个名为hmiDataLog的数据表并存储一行数据。

自动状态下控件按照选定的采样周期存储数据。

画面中按[触发手动存储]按钮触发一次数据存储,可实现由外部状态控制数据存储。

[6] 报表软件程序组中打开“数据检索”工具,选择数据表名hmiDataLog,可选字段中选择时标字段TSTAMP 和其它的数据点字段,按[数据检索]按钮可从数据库查询出已存入的历史数据。

IFIX历史趋势制作步骤和历史趋势错误排查方法

IFIX历史趋势制作步骤和历史趋势错误排查方法

IFIX历史趋势制作步骤和历史趋势错误排查方法IFIX(Intelligent Fixing System)是一种用于制作历史趋势和进行错误排查的软件工具,可以帮助用户分析数据,并找出其中的问题和模式。

下面是IFIX历史趋势制作步骤和历史趋势错误排查的方法。

步骤1:收集数据首先,需要收集所需的数据。

这可以通过传感器、设备或其他系统来完成。

确保数据的准确性和完整性,以便最终的历史趋势分析能够提供有用的信息。

步骤2:导入数据将收集到的数据导入到IFIX软件中。

IFIX支持多种数据格式,包括CSV、Excel、数据库等。

确保数据被正确地导入到正确的位置,以便后续的分析和可视化。

步骤3:配置数据点步骤4:制作历史趋势在IFIX中,使用历史趋势工具创建需要的图表。

可以选择不同的图表类型,如折线图、柱状图、饼图等。

根据需要选择合适的图表类型,并设置图表的样式和布局。

步骤5:分析趋势对制作的历史趋势进行分析。

通过观察数据的变化和趋势,可以得出一些有用的结论和洞察。

可能会发现一些异常,如数据点的突然变化、周期性波动等。

步骤6:保存和共享历史趋势将分析后的历史趋势保存到IFIX软件中,以便将来查看和审查。

也可以将历史趋势导出为常见的图像文件格式(如PNG、JPEG)或PDF文件,以便与他人共享和演示。

历史趋势错误排查方法:方法1:检查数据源首先,检查数据源的准确性和完整性。

确保数据被正确地导入到IFIX软件中,并且没有丢失或损坏的数据。

可以对比原始数据和导入后的数据,以验证它们的一致性。

方法2:检查数据配置方法3:观察图表仔细观察历史趋势图表,寻找任何异常或异常的模式。

注意突然的数据变化、不连续的趋势、异常的波动等。

这些都可能是数据错误或配置问题的迹象。

方法4:对比其他数据源。

iFIX报表制作

iFIX报表制作
“ 电 网监 控 系 统 ” 将 数 据 库 中 “ lr 表 的 信 息 导 人 到 E c l 配 , aam” xe
Байду номын сангаас
地 满 足 设 计 要 求 。 通 过 iX 集 成 的 V A 语 言 对 E c l 象 编 F I B x e对
程, 合A 结 DO 技 术 对 数 据 库 进 行 操 作 , 通 过 iI 内部 D A 并 FX r
这 里 通 过 一 个 简 单 的例 子 ,阐 明 如 何 在 iI 中 使 用 E c l F X xe 对 象 和 AD 技 术 实 现 报 表 的制 作 。在 iI 开 发 一 套 配 电 网 O FX上 监 控 系统 ,采 用 S ev r 为 历 史 数 据 库 。数 据 库 名 称 为 QL S re 作
K y r siI . B E c l O e wo d : X V A,x e , F AD
由于 iI 自带 的 报 表 在应 用 中 比较 烦 琐 而 且 存 在一 定 的局 FX 限 性 ,在 实 际 的 工程 应 用 中 i! 般 的报 表 制 作 方 法 不 能 较 好 FX一
2 具 体 实 现 步 骤
控 件 完 成 报 表数 据显 示 , 增 强报 表功 能 , 高 灵 活性 。 可 提
1 相 关 技 术 简 介
表 格 ,aam ” 的各 字 段 名 如 下 : “ lr 表
日期 线路 名称
11V A与 E c l 合 编 程 . B x e联 V A( iu IB s o pi t n ) 内 嵌 在 iI 中 的 B Vs a a i frAp lai s 是 c c o FX
FX报 表 制作 I
iI FX报表制作

iFix中采用ODBC制作报表

iFix中采用ODBC制作报表

在iFix中采用ODBC制作历史报表具体步骤如下:Step 1: 打开SCU中的Task Configuration,增加HTC.EXE和WSQLODC.EXE两个任务,并将它们设置成为后台运行状态;Step 2: 启动iFix,点击工具栏上的按钮打开Historical Assign,添加所需监控的数据点,并设置历史数据的采样速度。

Step 3: 打开任务控制,查看是否已经启动HTC。

Step 4: 在Globals\User下面添加三个字符型(vtString)变量,分别命名为strStartTime, strEndTime 和Interval。

新建一幅画面,如图如示,在画面上布置3个DATALINK分别指向strStartTime, strEndTime 和Interval,并设置成In place(即允许修改)。

strStartTimestrEndTimeIntervalStep 5:为画面上的各个按钮写代码,最好先将各按钮注册——即将鼠标移到按钮上方,按右键弹出菜单,选择Edit Script。

在VB Editor的工具菜单中的Reference(引用)中选中Microsoft Excel 9.0 Object Library和Microsoft ActiveX Data Objects,如下图所示。

然后在各按钮的处理程序中添加相应代码。

内容如下(可将下列代码直接COPY到你的VB编辑器中,覆盖因为注册产生的空代码):‘运行状态画面初始化Private Sub CFixPicture_Initialize()CommandButton1_ClickCommandButton2_Clickuser.Interval.CurrentValue = "00:00:30"End Sub‘组态状态画面初始化Private Sub CFixPicture_InitializeConfigure()user.strEndTime.CurrentV alue = "报表结束时间"user.strStartTime.CurrentValue = "报表开始时间"End Sub'设当前时间为报表开始时间Private Sub CommandButton1_Click()Dim curTime As StringcurTime = NowDim curmonth, curday, curhour, curminute, cursecond As Stringcurmonth = IIf(Month(curTime) < 10, "0" & Month(curTime), Month(curTime)) curday = IIf(Day(curTime) < 10, "0" & Day(curTime), Day(curTime))curhour = IIf(Hour(curTime) < 10, "0" & Hour(curTime), Hour(curTime))curminute = IIf(Minute(curTime) < 10, "0" & Minute(curTime), Minute(curTime)) cursecond = IIf(Second(curTime) < 10, "0" & Second(curTime), Second(curTime)) user.strStartTime.CurrentValue = Year(curTime) & "-" & curmonth & "-" & curday _& " " & curhour & ":" & curminute & ":" & cursecond End Sub'设当前时间为报表结束时间Private Sub CommandButton2_Click()Dim curTime As StringcurTime = NowDim curmonth, curday, curhour, curminute, cursecond As Stringcurmonth = IIf(Month(curTime) < 10, "0" & Month(curTime), Month(curTime))curday = IIf(Day(curTime) < 10, "0" & Day(curTime), Day(curTime))curhour = IIf(Hour(curTime) < 10, "0" & Hour(curTime), Hour(curTime))curminute = IIf(Minute(curTime) < 10, "0" & Minute(curTime), Minute(curTime)) cursecond = IIf(Second(curTime) < 10, "0" & Second(curTime), Second(curTime)) user.strEndTime.CurrentV alue = Year(curTime) & "-" & curmonth & "-" & curday & " " _& curhour & ":" & curminute & ":" & cursecondEnd Sub'打印此前10分钟历史报表,只是设置时间值,打印仍要调用打印程序Private Sub CommandButton3_Click()Dim curTime As StringcurTime = NowDim curmonth, curday, curhour, curminute, cursecond As Stringcurmonth = IIf(Month(curTime) < 10, "0" & Month(curTime), Month(curTime))curday = IIf(Day(curTime) < 10, "0" & Day(curTime), Day(curTime))curhour = IIf(Hour(curTime) < 10, "0" & Hour(curTime), Hour(curTime))curminute = IIf(Minute(DateAdd("n", -10, curTime)) < 10, "0" & _Minute(DateAdd("n", -10, curTime)), Minute(DateAdd("n", -10, curTime))) cursecond = IIf(Second(curTime) < 10, "0" & Second(curTime), Second(curTime)) user.strStartTime.CurrentValue = Year(curTime) & "-" & curmonth & "-" & curday & _" " & curhour & ":" & curminute & ":" & cursecond curminute = IIf(Minute(curTime) < 10, "0" & Minute(curTime), Minute(curTime)) user.strEndTime.CurrentV alue = Year(curTime) & "-" & curmonth & "-" & curday & _" " & curhour & ":" & curminute & ":" & cursecond End Sub'打印当天报表,只是设置时间值,打印仍要调用打印程序Private Sub CommandButton4_Click()Dim curTime As StringcurTime = NowDim curmonth, curday, curhour, curminute, cursecond As Stringcurmonth = IIf(Month(curTime) < 10, "0" & Month(curTime), Month(curTime))curday = IIf(Day(curTime) < 10, "0" & Day(curTime), Day(curTime))user.strStartTime.CurrentValue = Year(curTime) & "-" & curmonth & "-" & curday _& " " & "00:00:00"user.strEndTime.CurrentV alue = Year(curTime) & "-" & curmonth & "-" & curday _& " " & "23:59:59"End Sub'打印当月报表,只是设置时间值,打印仍要调用打印程序Private Sub CommandButton5_Click()Dim curTime As StringcurTime = NowDim curmonth, BeginofMonth, EndofMonth As Stringcurmonth = IIf(Month(curTime) < 10, "0" & Month(curTime), Month(curTime)) BeginofMonth = Year(curTime) & "-" & curmonth & "-01" & " " & "00:00:00"user.strStartTime.CurrentValue = BeginofMonthEndofMonth = Day(DateAdd("s", -1, DateAdd("m", 1, CDate(BeginofMonth))))user.strEndTime.CurrentV alue = Year(curTime) & "-" & curmonth & "-" _& EndofMonth & " " & "23:59:59"End Sub‘根据输入条件,保存/打印报表到文件Private Sub CommandButton6_Click()'运行EXCEL,打开报表模板文件Dim msexcel As Excel.ApplicationSet msexcel = CreateObject("Excel.Application")With msexcel.Visible = True ‘如为FALSE,则不显示EXCEL。

ADO技术在iFIX报表中的应用

ADO技术在iFIX报表中的应用

图#
温度记录报表
!
利用有 YHZE 接口的 H[9[ 控件显示数据。 J) ,>HG0G; 控 件 提 供 Y\? HZ 数 据 源 之 间 的 通 讯 接口和工作区间的对象。HG0G 控件能通过 YHZE 驱 动与安装在本地的任意 Y\? HZ 数据通讯。 双击控件 出现属性对话框如图 !, 你能快速的创建数据连接, 即 选择驱动引擎和要访问的数据库, 在纪录源标号, 能生 成一个 I]\ 查询或使用保存程序来获得返回的数据 库数据。以温度表为例, 生成一个 I]\ 查询:
摘 要 工控软件 %!"# 自带的报表实现方法存在一定的局限性。 通过结合 &’( 技 &’( 技术是一种较先进数据库对象模型, 可以实现在不增加其他外部组件情况下, 增强了 %!"# 报表制作的功能, 提高其灵活性。 术和其 ’&5& 控件完成报表, 关键词: 工控软件, 报表制作 %!"# , &’( 技术,
S’/0-,GB5- T"TU T./>#!)./>)0GL!).MEVT S’/0-,GB5- T"TU T./>#!)./>)0GL#).MEVT ?;@ 12 D 关闭表 ’()EB+(D 关闭数据库 @W)EB+(最后, 在 IEO 的启动程序对话框中需要加 ?;@ I5W 入 ./>WGNXL’+5;@)->- 保证调度程序的运行
《 工业控制计算机》 !""# 年 $% 卷第 & 期
!Q
温度 )炉尾温度 U 温度 )二段东上 U 温度 )二段西上 U 温度 )二段东下 U 温度 )二段西下 U 温度 )一段东上 U 温度 )一段西上 U 温度 )一段东下 U 温度 )一段西下 U 温度 )均热段东上 U 温度 )均热段西上 U 温度 )均热段东下 U 温度 )均热段西下

IFIX历史报警数据存储与查询

IFIX历史报警数据存储与查询

关于IFIX历史报警数据存储与查询实例一.ODBC服务的连接开始-设置-控制面板-管理工具-数据源ODBC选用户DNS-添加-选Microsoft Access Driver(*.mdb)数据源名:Myalarm选(或创建)数据库名:Alarm.mdb, 文件类型:Access,驱动器D:连接池-禁止二.系统SCU的配置SCU-IFIX-配置-报警-报警ODBC服务,启动-修改-区域(A):从报警区域数据库中选择- CLQS-ALM-增加-确定配置:数据库类型:Access数据库标识符:Myalarm列配置:选9项现在创建表:FIXALARMS(默认表名)其它默认-确定保存退出三.控件的引用1.日期时间控件典型装VB6.0后,项目工具栏文件----工具栏----插入OLE对象双击选Microsoft date and time picker控件日期控件-属性-格式:1-dtpShortDate,有效前不打勾。

其它默认,时间控件-属性-格式:2-dtpTime, 有效前不打勾。

其它默认2.vxData控件(数据管道)IFIX4.0工具箱底部vxData图标右键-属性vxData对象----PROPERTIES VISICONXDATA VXDATA对象提供者:Microsoft OLE DB Provider for ODBC Drivers数据库:DNS名:Myalarm,用户名密码选项均空---测试连接-测试连接成功-确定记录源:命令类型:SQL命令应用-确定3.vxGrid控件(显示)工具箱底部vxGrid图标选控件vxGrid1-右键-动画-高级-高级动画配置-行为-ADORecords-动画打勾数据源:报警记录一览表.vxData1.ADORecords数据转换:对象四.VBA脚本的编写1.初始化脚本代码'初始化设置Private Sub CFixPicture_Initialize()'设定默认开始时间Me.DTPFromDate = DateAdd("d", -1, Now)Me.DTPFromTime = ("00:00:00")'设默认结束时间Me.DTPEndDate = NowMe.DTPEndTime = Now'设置时间'vxData1.QP1 = Format(Me.DTPFromDate.Value, "yyyy-MM-DD") & " " & Format(Me.DTPFromTime.Value, "HH:MM:SS")'vxData1.QP2 = Format(Me.DTPEndDate.Value, "yyyy-MM-DD") & " " & F ormat(Me.DTPEndTime.Value, "HH:MM:SS")End Sub2. 查询按扭CmbSearch代码如下:'开始查询Private Sub CmbSearch_Click()'连接自动刷新Me.vxData1.AutoRefresh = True'Format函数用于设定时间格式vxData1.QP1 = Format(Me.DTPFromDate.Value, "yyyy-MM-DD") & " " & Format(Me.DTPFromTime.Value, "HH:MM:SS")vxData1.QP2 = Format(Me.DTPEndDate.Value, "yyyy-MM-DD") & " " & F ormat(Me.DTPEndTime.Value, "HH:MM:SS")'设定查询内容'从数据库中查询符合时间段的数据Me.vxData1.SQLCommand = "SELECT *FROM FIXALARMS WHERE" & _ "(FIXALARMS.ALM_NATIVETIMEIN >= {ts 'QP1'})AND(FIXALARMS.ALM_NAT IVETIMELAST <= {ts 'QP2'})"'刷新数据Me.vxData1.RefreshMe.vxGrid1.RefreshEnd Sub3. 完整的VBA按扭代码如下:'初始化设置Private Sub CFixPicture_Initialize()'设定默认开始时间Me.DTPFromDate = DateAdd("d", -1, Now)Me.DTPFromTime = ("00:00:00")'设默认结束时间Me.DTPEndDate = NowMe.DTPEndTime = Now'设置时间'vxData1.QP1 = Format(Me.DTPFromDate.Value, "yyyy-MM-DD") & " " & Format(Me.DTPFromTime.Value, "HH:MM:SS")'vxData1.QP2 = Format(Me.DTPEndDate.Value, "yyyy-MM-DD") & " " & F ormat(Me.DTPEndTime.Value, "HH:MM:SS")End SubPrivate Sub CFixPicture_KeyDown(ByVal KeyCode As Long, ByVal Shift As Long, ContinueProcessing As Boolean)End Sub'开始查询Private Sub CmbSearch_Click()'连接自动刷新Me.vxData1.AutoRefresh = True'Format函数用于设定时间格式vxData1.QP1 = Format(Me.DTPFromDate.Value, "yyyy-MM-DD") & " " & Format(Me.DTPFromTime.Value, "HH:MM:SS")vxData1.QP2 = Format(Me.DTPEndDate.Value, "yyyy-MM-DD") & " " & F ormat(Me.DTPEndTime.Value, "HH:MM:SS")'设定查询内容'从数据库中查询符合时间段的数据Me.vxData1.SQLCommand = "SELECT *FROM FIXALARMS WHERE" & _ "(FIXALARMS.ALM_NATIVETIMEIN >= {ts 'QP1'})AND(FIXALARMS.ALM_NAT IVETIMELAST <= {ts 'QP2'})"'刷新数据Me.vxData1.RefreshMe.vxGrid1.RefreshEnd Sub以上工作结束后保存,退出。

有关iFIX软件报表生成的说明

有关iFIX软件报表生成的说明

有关iFIX软件报表生成的说明 iFIX软件可以通过内置的VBA借助EXCEL,ACCESS,Crystal Roport等软件生成报表。

本文通过 VBA+ADO+EXCEL 做一个具体的介绍。

1.V BA(Visual Basic for Application)VBA是iFIX完全内置的一个强有力的编程工具,可以使用户快速方便的生成自动的操作任务和过程自动化的解决方案。

IFIX的VBA工具包括以下特性:可操作所有列出的iFIX对象的属性,方法和事件支持多种数据源,包括iFIX过程数据库,任何OPC服务器,任何对象的属性和SQL数据库ODBC支持ActiveX控件支持VBA脚本生成向导及IFIX命令可以帮助你为常用任务自动生成程序代码第三方控件的安全容器下面的程序代码就是在iFIX中建立一个新的EXCEL应用程序并打开报表模版。

Dim msexcel As Excel.ApplicationSet msexcel = CreateObject("Excel.Application")With msexcel.Visible = True.Workbooks.Open "e:\histdemo\FixReports.xls", ,False.ActiveWorkbook.ActiveSheet.Select.DisplayAlerts = False.Wait (Now() + 0.00002)End With2.A DO (ActiveX Data Object)ADO 是微软推出的最新的数据库访问方式。

它综合了微软早期推出的DAO及RDO的特性并取代了DAO及RDO。

ADO可以访问更多类型的数据库,并且可以通过ODBC(Open DataBase Connectivity)访问数据,但它的结构是建立在OLE DB Providers上。

IFIX软件安装完毕以后,在控制面板的ODBC数据源中会增加两个系统DSN:FIX Dynamics Historical Data iFIX历史数据源FIX Dynamics Real Time Data iFIX实时数据源ADO可以通过访问这两个数据源来直接操作iFIX历史数据库和实时数据库。

iFIX历史库数据查询

iFIX历史库数据查询

历史库数据查询1. VisiconXGrid.vxData(1)从iFIX工作台的菜单栏中单击“插入\OLE对象”。

(2)从“插入对象”对话框的对象类型列表中点击选择“VisiconXGrid.vxData”控件。

单击“确定”按钮插入该控件。

(3)从画面中单击选择控件后,点击右键选择“属性(R) VisiconXData.vxData对象(O)”,打开“VisiconXData.vxData属性”对话框。

(4)在“提供者”选项卡中,单击选择“Microsoft OLE DB Provider for ODBC Drivers”。

(5)在“数据库”选项卡DSN名中,单击选择“FIX Dynamics Historical Data”。

(6)在“记录源”选项卡中,写入SQL命令:SELECT*FROMFIX(7)单击“确定”关闭对话框,完成vxData控件的设置。

注:以上SQL命令的查询结果仅显示当天的数据。

如果需要查询以前的数据,需要指定时间段,如:SELECT*FROMFIXWHERE(FIX.DATETIME > {ts '2011-12-18 08:25:00'})AND(FIX.DATETIME < {ts '2011-12-19 10:54:00'})时间段通过在画面中插入两个DTPicker控件作为起始时间和结束时间,用户可以更改vxData控件的QP值或编写脚本来实现时间赋值。

2. VisiconXGrid.vxGrid(1)从iFIX工作台的菜单栏中单击“插入\OLE对象”。

(2)从“插入对象”对话框的对象类型列表中点击选择“VisiconXGrid.vxGrid”控件。

单击“确定”按钮插入该控件。

注:vxData1控件和vxGrid1控件是iFIX的VX控件,要配合使用。

(3)从画面中单击选择控件后,点击右键选择“动画”,打开“vxGrid1动画”对话框。

ifix历史数据库检索数据

ifix历史数据库检索数据

从ifix历史数据库检索数据ifix ado vb'该函数用于月度统计柱状图的数据准备,并得到流量计累积的最大值,用于柱状图的VerticalFillPercentage属性设置'Description属性设置的值时当天四个流量计的累积值Private Sub searchDataBase()Dim Sql As StringDim dat As IntegerDim max As DoubleDim floatData(30) As DoubleDim time As StringDim i As IntegerDim str_value(3) As String '变量值暂存Dim str_time(3) As StringDim v_1() As String '变量值数组暂存Dim v_2() As StringDim v_3() As StringDim v_4() As StringDim StartTime, EndTime As Stringdat = Format(Now, "dd")On Error Resume Next'得到今天是几号,得到所需要的起始时间StartTime = Format(DateAdd("d", -dat, Now), "yyyy-mm-dd 08:00:00") '起始时间早上八点EndTime = Format(Now, "yyyy-mm-dd 08:00:00") '截止时间(今天早上)八点Sql = "SELECT datetime,tag,value FROM xxxx WHERE INTERVAL='23:59:59' AND " & _"DATETIME<={ts '" & EndTime & "'} " & _"AND DATETIME>={ts '" & StartTime & "'}"'---------------------连接并读取数据库--------------------Dim cnADO As ADODB.ConnectionDim rsADO As RecordsetSet cnADO = New ADODB.ConnectionSet rsADO = New ADODB.RecordsetcnADO.ConnectionString = "Provider = Microsoft OLE DB Provider " & _ "for ODBC Drivers;DSN=fixhis;UID =;PWD =;" cnADO.OpenrsADO.CursorLocation = adUseClientrsADO.Open Sql, cnADO, adOpenDynamic, adLockUnspecified, -1If Not rsADO.BOF Then'找到当月每天八点的累积流量,存储至字符串数组Do While Not rsADO.EOFIf rsADO.Fields("tag") = "MZ_F5001AI-2" Thenstr_value(0) = str_value(0) & rsADO.Fields("value") & " "End IfIf rsADO.Fields("tag") = "MZ_F5002AI-2" Thenstr_value(1) = str_value(1) & rsADO.Fields("value") & " "End IfIf rsADO.Fields("tag") = "MZ_F5003AI-2" Thenstr_value(2) = str_value(2) & rsADO.Fields("value") & " "End IfIf rsADO.Fields("tag") = "MZ_F5004AI-2" Thenstr_value(3) = str_value(3) & rsADO.Fields("value") & " "End IfrsADO.MoveNextLoopEnd IfrsADO.ClosecnADO.Close'得到累积流量的数组v_1 = Split(str_value(0), " ")v_2 = Split(str_value(1), " ")v_3 = Split(str_value(2), " ")v_4 = Split(str_value(3), " ")'得到该月所有天数的流量计累积量,然后找出最大值,用于柱状图的比例显示For i = 0 To UBound(v_1)floatData(i) = v_1(i) + v_2(i) + v_3(i) + v_4(i)If i > 0 ThenIf floatData(i) > floatData(i - 1) Then '找出最大值max = floatData(i)End IfEnd IfNextEnd Sub。

IFIX报表

IFIX报表

IFIX报表编辑整理:尊敬的读者朋友们:这里是精品文档编辑中心,本文档内容是由我和我的同事精心编辑整理后发布的,发布之前我们对文中内容进行仔细校对,但是难免会有疏漏的地方,但是任然希望(IFIX报表)的内容能够给您的工作和学习带来便利。

同时也真诚的希望收到您的建议和反馈,这将是我们进步的源泉,前进的动力。

本文可编辑可修改,如果觉得对您有帮助请收藏以便随时查阅,最后祝您生活愉快业绩进步,以下为IFIX报表的全部内容。

IFIX报表IFIX报表常规的做法是采用IFIX内嵌的VBA语言,借助于OFFICE自带的ACCESS和EXCEL 来做的。

例如我们要在IFIX画面上通过点击一按钮来察看某一天的数据,假如这有三个模拟量如tag1,tag2,tag3,数据间隔一小时归一次档,它主要分为四步:一、创建一个ACCESS数据库如ReportDataBase。

mdb,用来存放报表所需的数据。

然后就在这个数据库中建立一个表如ReporData,这样IFIX 就能以一定的时间间隔将数据写入此数据库刚才创建的表中。

ReportData的结构如下:字段名类型日期日期/时间tag1 数值tag2 数值tag3 数值二、创建ODBC数据源,用于IFIX与上步已建立的数据库和表进行联系。

方法:控制面板->管理工具->ODBC数据源,打开ODBC数据源管理器,建立一个“系统DSN",点击“添加”,双击“Microsoft Access Drivers (*.mdb)”,出现“ODBC Microsoft Access 安装"对话框。

数据源名:MyReport 注:此名是任意的字符组合,但不能与数据库重名。

数据库: ReportDataBase。

mdb,点击‘选择‘按钮选择第一步创建的Access 数据库。

点击“完成”,退出控制面板三、在IFIX 中创建一个“基于时间的调度",如图名称:任意合法的字符组合触发信息:连续间隔:1小时详细代码如下:点击“VB编辑器“进入VB编辑器在“工具”菜单—〉引用“Microsoft ActiveX Data Objects x.x Library"Private Sub FixTimer3_OnTimeOut(ByVal lTimerId As Long)Dim cn As ADODB。

iFIX历史数据报表使用经验总结

iFIX历史数据报表使用经验总结

f i c a t i o n c a n b e p o r t e d t o o t h e r p r o j e c t s .
Ke ywor ds : i FI X, h i s t or i c al da t a。 Re po ̄, ADO, VBA
i F I X软 件 没 有 提 供 针 对 历 史 数 据报 表 的 通 用 组 件 ,通 常 实 现报 表 的方法 只能是单 独 购买使 用第三 方组 件 ( 比如 水 晶 报 表) , 因其封装功能较多 , 编程不够灵活 , 难 以 实 现 比较 复 杂 的 报 表功能 。 在 自动 化 工 程 软 件 开 发 实 际 应 用 中 , 因 不 同项 目对 历史 数 据 报 表 要 求 不 尽 相 同 ,利 用 i F I X 现有 组件 或第 三方 组 件 均 难 以 达 到 满 意 的效 果 。
史数 据 库 , 利用 E x c e I 生成 报 表 模 板 , 根 据 不 同的 选 择 条 件 查 询 数 据 生 成 报 表 。采 用介 绍 的 方 法 设 计 的 报 表 应 用 程 序 具 有
普遍性 , 通 过 简单 修 改 可 移 植 到 其 它工 程 中 。 关键词 : i F I X , 历 史数 据 , 报表 , A D O, VCo mb i n e d wi t h y e a r s o f a u t o ma t i c mo n i t o r i n g c o n f i g u r a t i o n s o f t wa r e d e v e l o p me n t e x p e r i e n c e , i F I X t o t h e p r o j e c t t o d e —

在iFix中采用ODBC制作历史报表

在iFix中采用ODBC制作历史报表

在iFix中采用ODBC制作历史报表1.生成历史数据库打开系统配置点击,添加HTC.EXE ,启动方式选择后台方式启动历史定义定义历史数据库启动任务控制器,启动HTC2.ifix历史数据库介绍打开ODBC数据源管理器,大家可以看到IFIX实时和历史数据库,历史数据库一般存放在HTRDATA文件夹中3.配置调度定义引用引用:Microsoft Excel 5.0 Object Library和Microsoft ActiveX Data Objects 2.7 编辑脚本Dim ReportArray(15) As String '定义变量数组Dim curTime As String '定义当前时间Dim strStartTime As String '报表查询的时间范围Dim strEndTime As String '报表查询的时间范围Dim Interval As String '报表查询的间隔时间Dim msexcel As Excel.Application '定义引用Dim rsADO As New ADODB.RecordsetDim cnADO As New ADODB.ConnectionDim SQL0, SQL1 As StringDim reportfile As String '存储文件名Private Sub FixTimer4_OnTimeOut(ByVal lTimerId As Long)curTime = Now '取得当前时间Dim curmonth, curday, curhour, curminute, cursecond As Stringcurmonth = IIf(Month(curTime) < 10, "0" & Month(curTime), Month(curTime)) curday = IIf(Day(curTime) < 10, "0" & Day(curTime), Day(curTime))strStartTime = Year(curTime) & "-" & curmonth & "-" & curday _& " " & "00:00:00"strEndTime = Year(curTime) & "-" & curmonth & "-" & curday _& " " & "23:59:59"Interval = "01:00:00" '时间间隔reportfile = Year(curTime) & "-" & curmonth & "-" & curdayreportfile = "e:\" & reportfile & ".xls"ReportArray(0) = "O0ERB01CTO01" '定义报表变量ReportArray(1) = "O0ERB01CTO02"ReportArray(2) = "O0ERB01CTO03"ReportArray(3) = "O0ERB01CTO04"ReportArray(4) = "O0ERB01CTO05"ReportArray(5) = "O0ERB01CTO06"ReportArray(6) = "O0ERB01CTO07"ReportArray(7) = "O0ERB01CL301"ReportArray(8) = "O0ERB02CTO01"ReportArray(9) = "O0ERB02CTO02"ReportArray(10) = "O0ERB02CTO03"ReportArray(11) = "O0ERB02CTO04"ReportArray(12) = "O0ERB02CTO05"ReportArray(13) = "O0ERB02CTO06"ReportArray(14) = "O0ERB02CTO07"ReportArray(15) = "O0ERB02CL301"On Error GoTo ErrorSet msexcel = CreateObject("Excel.Application")With msexcel.Visible = True '如为FALSE,则不显示EXCEL。

IFIX,历史报警报表制作

IFIX,历史报警报表制作

前面已经将历史报警信息保存到了报警历史数据库中下面需要从数据库中显示出报警信息
在工具箱中含有
数据控件
此控件相当于管道起连接作用
使用网格控件,类似于水杯设置刚才的管道
在打开的对话框中选择提供者ODBC
选择数据库,为刚才创建的数据库,点击测试连接,可以弹出对话框
选择记录源,设置从数据库中读哪一部分内容点击向导按钮
选择SQL Select
选择并增加报警数据库表,点击下一步
可用列中显示了ALARM报警数据库中的可用列,如下:选择所用列并点击下一步
确定后运行ifix
此时不能显示报警信息,因为到此步骤,只是设置了水库的出水口部分,而水杯的入水口部分还没有完成设置。

下面配置水杯侧
选择动画…点击配置….
在行为栏中含有ADORecords项,此项和刚才的管道连接器连接,勾选动画选择对象,点击数据源后面的小方块
选择画面中的vxData1,此项为刚才创建的
类似于VXDATA1中的缓存点击确定返回。

运行IFIX后显示如下:
regsvr32 c:\winnt\system32\mscomct2.ocx 当然你必须把那个文件拷过来了。

ifix 报表

ifix 报表

Private Sub CommandButton1_Click()'×¢ÊÍ: 1¡£¸Ã³ÌÐòÐèÒª°²×°ADO 2.0Ä¿±ê¿â²¢ÔÚ±¾»ú×¢²á' 2¡£Microsoft ActiveX Data Objects 2.1 Library ±ØÐë±»ÒýÓà (Office 2000)' 3¡£Microsoft Excel 9.0 object libraries ±ØÐë±»ÒýÓà (Office 2000)' 4¡£»®===´¦¿É¸ù¾Ý¾ßÌ屨±íÐÞ¸ÄDim strQueryAvg As StringDim c As IntegerDim r As IntegerDim Intyexcel As Excel.ApplicationDim MyDate, MyMonth, MyDay, MyHour, MyMinute, MySecondDim StartTime, EndTime, Duration, DisplayDay, DisplayMonth As String'++=============================================================== ===='±¨±íÖÐµÄ TAGDim Tag1, Tag2, Tag3, Tag4, Tag5, Tag6, Tag7, Tag8 As StringDim Items As IntegerTag1 = "TEST"Tag2 = "TEST1"Tag3 = " "Tag4 = " "Tag5 = " "Tag6 = " "Tag7 = " "Tag8 = " "'´ÓÀúÊ·¿âÖÐÈ¡µÃÓòÏ 2 - DATATIME, VALUE, TAG ¹²ÈýÏîItems = 2'--=============================================================== =====MyDate = Format (Now() - 1, "yyyy-mm-dd")StartTime = & MyDate & " " & "00:00:00"EndTime = & MyDate & " " & "23:00:00"'++=============================================================== ==========='²éѯ£¬¸ù¾Ý±¨±íÐÞ¸ÄstrQueryAvg = "Select DATETIME, VALUE, TAG FROM FIX " & _"WHERE MODE = 'AVERAGE' and (TAG='" & Tag1 & "' or TAG='" & Tag2 & "'" & _" or TAG='" & Tag3 & "' or TAG='" & Tag4 & "' or TAG='" & Tag5 & "'" & _" or TAG='" & Tag6 & "' or TAG='" & Tag7 & "' or TAG='" & Tag8 & "')" & _"and INTERVAL = '01:00:00' and " & _"(DATETIME >= {ts '" & StartTime & "'} and " & _"DATETIME <= {ts '" & EndTime & "'})"'--=============================================================== ============Dim cnADO As New ADODB.ConnectionDim rsADO As RecordsetSet cnADO = New ADODB.ConnectioncnADO.ConnectionString = "DSN = FIX Dynamics Historical Data; UID = sa; PWD = ;"cnADO.Open "FIX Dynamics Historical Data", "sa", ""Set rsADO = New ADODB.RecordsetrsADO.Open strQueryAvg, cnADO, adOpenForwardOnly, adLockBatchOptimisticr = 1Set Intyexcel = New Excel.ApplicationIntyexcel.Visible = False'++=============================================================== ============='´ò¿ªµÄ±¨±íÎļþÃûDim OutReportFile As StringDim InReportFile As StringInReportFile = "C:\Dynamics\App\HIST1"Intyexcel.Workbooks.Open InReportFile & ".XLS"Intyexcel.Sheets("Sheet2").SelectIntyexcel.Columns("A:Z").SelectIntyexcel.Selection.ClearContentsIntyexcel.Range("A1").SelectWhile rsADO.EOF <> TrueWith Intyexcel.Worksheets(2)For c = 0 To ItemsIf rsADO(c) <> "" Then .Cells(r, c + 1).Value = rsADO(c)Next cr = r + 1rsADO.MoveNextEnd WithWendIntyexcel.Sheets("Sheet1").Select' Intyexcel.ActiveSheet.PageSetup.Orientation = xlPortrait 'xlLandscape' Intyexcel.ActiveSheet.PageSetup.PaperSize = xlPaperA4Intyexcel.ActiveSheet.PrintOutIntyexcel.DisplayAlerts = FalseIntyexcel.ActiveWorkbook.SaveOutReportFile = InReportFile & "_00" & MyMonth & MyDayIntyexcel.ActiveWorkbook.SaveAs OutReportFileIntyexcel.QuitIntyexcel.DisplayAlerts = TrueSet Intyexcel = NothingSet cnADO = NothingEnd Sub。

iFIX历史库数据查询

iFIX历史库数据查询

iFIX历史库数据查询历史库数据查询1. VisiconXGrid.vxData(1)从iFIX工作台的菜单栏中单击“插入\OLE对象”。

(2)从“插入对象”对话框的对象类型列表中点击选择“VisiconXGrid.vxData”控件。

单击“确定”按钮插入该控件。

(3)从画面中单击选择控件后,点击右键选择“属性(R) VisiconXData.vxData对象(O)”,打开“VisiconXData.vxData属性”对话框。

(4)在“提供者”选项卡中,单击选择“Microsoft OLE DB Provider for ODBC Drivers”。

(5)在“数据库”选项卡DSN名中,单击选择“FIX Dynamics Historical Data”。

(6)在“记录源”选项卡中,写入SQL命令:SELECT*FROMFIX(7)单击“确定”关闭对话框,完成vxData控件的设置。

注:以上SQL命令的查询结果仅显示当天的数据。

如果需要查询以前的数据,需要指定时间段,如:SELECT*FROMFIXWHERE(FIX.DATETIME > {ts '2011-12-18 08:25:00'})AND(FIX.DATETIME < {ts '2011-12-19 10:54:00'})时间段通过在画面中插入两个DTPicker控件作为起始时间和结束时间,用户可以更改vxData控件的QP值或编写脚本来实现时间赋值。

2. VisiconXGrid.vxGrid(1)从iFIX工作台的菜单栏中单击“插入\OLE对象”。

(2)从“插入对象”对话框的对象类型列表中点击选择“VisiconXGrid.vxGrid”控件。

单击“确定”按钮插入该控件。

注:vxData1控件和vxGrid1控件是iFIX的VX控件,要配合使用。

(3)从画面中单击选择控件后,点击右键选择“动画”,打开“vxGrid1动画”对话框。

基于ADO技术的iFix历史报表的设计与实现

基于ADO技术的iFix历史报表的设计与实现

基于ADO技术的iFix历史报表的设计与实现

【期刊名称】《自动化信息》
【年(卷),期】2009(000)008
【摘要】iFIX是全球领先的HMI/SCADA自动化监控组态软件之一,已有超过300,000套以上的软件在全球运行。

世界上许多成功的制造商都依靠GEFanuc 的iFIX软件来全面监控和分布管理全厂范围的生产数据。

iFIX软件内置功能强大的VBA脚本编译器,能实现复杂工程对软件的要求。

【总页数】3页(P87-89)
【作者】无
【作者单位】无
【正文语种】中文
【中图分类】TP311.13
【相关文献】
1.iFIX历史数据报表使用经验总结 [J], 苗进立
2.ADO技术在iFIX报表中的应用 [J], 靳平;方康玲;赵万峰
3.基于ODBC实现IFIX3.0历史报表 [J], 张庆国;胡永焕
4.基于ADO技术的ifix报表开发在烧结烟气脱硫中的应用实例 [J], 孙勇
5.基于ADO技术的ifix报表开发在烧结烟气脱硫中的应用实例 [J], 孙勇
因版权原因,仅展示原文概要,查看原文内容请购买。

基于ADO的iFIX实时数据库访问技术应用

基于ADO的iFIX实时数据库访问技术应用

基于ADO的iFIX实时数据库访问技术应用
徐春梅;黄晓明
【期刊名称】《工业控制计算机》
【年(卷),期】2003(016)007
【摘要】ADO、OLE DB是目前应用较广泛的数据库访问技术.文章介绍了这两种数据库访问技术的核心部分和原理,并用VB程序模拟现场数据源,通过iFIX的实时数据库以DDE方式从VB数据源中获取数据,再用ADO将实时数据库中信息送到Access数据库中的实例,说明了ADO强大的数据处理能力,也显示了iFIX处理数据的灵活性.
【总页数】2页(P26-27)
【作者】徐春梅;黄晓明
【作者单位】武汉大学动力与机械学院,430072;武汉大学动力与机械学院,430072【正文语种】中文
【中图分类】TP3
【相关文献】
1.基于ADO数据库访问技术的会计电算化系统设计与实现 [J], 阎栋
2.基于SQL的数据库访问技术应用分析 [J], 毛奇
3.基于ADO技术的ifix报表开发在烧结烟气脱硫中的应用实例 [J], 孙勇
4.基于ADO技术的iFix历史报表的设计与实现 [J], 无
5.基于ADO技术的ifix报表开发在烧结烟气脱硫中的应用实例 [J], 孙勇
因版权原因,仅展示原文概要,查看原文内容请购买。

  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。

基于ADO的IFIX历史数据报表黄重庆(福建工程学院电子信息与电气工程系福州)摘要:本次所使用的报表是基于ADO的IFIX历史数据报表,上位机采用组态软件iFix4.5,通过Visual Basic 6.0作为开发工具,运用模块化的方式,采集“智能仓储系统”和“冷却系统”所产生的数据,对各数据进行实时的监控和有效管理,同时可通过对不同信号的读取,采用本文介绍的方法设计的报表应用程序具有普遍性,通过简单修改可移植到其它工程中。

关键词:ADO;IFIX; 历史报表;VBABased on the historical data report IFIX ADOHuangChongQing(FuJian University of Technology,Electronic information and electricalengineering,fuzhou)Abstract:This time uses the report form is based on the ADO IFIX historical data report form, the superior machine uses configuration software iFix4.5, 6.0 takes the development kit through Visual Basic, the utilization modulation way, the data which gathering “the intelligence warehousing system”and “the cooling system”produces, carries on the real-time monitoring and the effective management to various data, simultaneously may through to the different signal read, use the methods design report form application procedure which this article introduced to have the universality, may transplant through the simple revision to other projects.Key words:ADO;IFIX; HIM ;VBA1 引言iFIX是全球最领先的HMI/SCADA自动化监控组态软件。

已有超过300,000套以上的软件在全球运行。

世界上许多最成功的制造商都依靠 GE Fanuc的iFIX 软件来全面监控和分布管理全厂范围的生产数据。

iFIX 软件内置功能强大的VBA脚本编译器,能实现复杂工程对软件的要求。

但是,因不同项目对历史数据报表要求不尽相同,而iFIX软件又没有提供针对历史数据报表的通用组件,通常实现报表的方法是使用第三方提供的组件(如:水晶报表),因其封装功能较多,编程不够灵活,对于比较复杂的报表功能实现起来比较麻烦,而且需要在进行报表组态时单独购买。

ADO组件集成在Visual Basic 6.0中,对于复杂的报表功能,采用ADO技术访问iFIX历史数据库实现报表非常灵活。

[1]同时采用Excel自带的强大的函数和处理数据的能力,对于实现各工程对报表功能的要求。

2 .ADO技术与iFIX历史数据库2.1 ADO概述ADO (ActiveX Data Objec t) 对象是DAO /RDO 的后继产物, 很多开发工具都支持这个对象, 比如Visual Basic 和ASP。

它是Microsoft公司专门为适应网络数据库开发和客户端需求而推出的一种跨平台远程数据库访问技术。

ADO 扩展了DAO和RDO所使用的对象模型, 它包含较少的对象、更多的属性、方法和事件, 这使得ADO 对象更容易使用。

ADO 通过OLEDB 所提供的高性能数据访问方法, 可以方便快速地对各种数据源进行访问和操作。

ADO 可访问的数据源包括关系或非关系型数据库、电子邮件和文件系统、文本和图形、自定义业务对象, 比如SQL - Server、Access、Orac le 数据库, exce l、word文档等。

[2]2.2 ADO 技术ADO (ActiveX Data Objects)是一个用于存取数据源的COM组件。

它是Microsoft新数据库访问技术,是建立在OLE DB之上的高层数据库访问技术。

ADO易于使用、高速度和较低的内存占有率的优点使得编程效率更高。

ADO常用的组件对象有:ADODB.Connection和ADODB.Recordset。

通过ADO 组件对象访问数据库,基本操作流程是:用Connection对象连接数据库,利用建立好的连接通过Connection、Command对象执行SQL命令,或利用Recordset对象取得结果记录集进行查询、处理。

2.3 iFIX历史数据库在iFIX安装时,iFIX安装程序会自动在工作站上建立两个系统数据源“FIX Dynamics Historical Data”和“FIX Dynamics Real Time Data”。

“FIX Dynamics Real Time Data”数据源连接的是iFIX实时数据库;“FIX Dynamics Historical Data”数据源连接的是iFIX历史数据库。

实时数据库和历史数据库都可通过ODBC进行访问。

3. 历史报表软件的设计与实现3.1 报表功能介绍本报表可实现与iFIX工程应用软件的无缝连接,满足查询iFIX历史数据并以报表形式显示。

如图1所示1)可以选择不同方式产生的报表,用户可选择诸如“冷却系统报表”“客户资料报表”“货物状态日报表”“库位状态日报表”等多种方式报表,并可根据发展需要和各用户之间的不同特点而随时变化2)查询变量时,按照日期查询,用户只需设置要查询的变量,输入“起始时间”、“结束时间”、“时间间隔”即可进行查询。

3)查询结果可导出,打印,对数据进行维护和修正4)添加了权限管理,不同用户所能使用的功能依权限的高低而不同。

图10所示图10图13.2设计过程及功能实现在VB中, 使用ADO访问数据库主要有两种方式, 一种是使用ADO Data控件, 通过对控件的绑定来访问数据库中数据, 即非编程访问方式; 另一种是使用ADO对象模型, 通过定义对象和编写代码来实现对数据的访问, 即编程访问方式。

本次报表功能实现主要利用ADO对象模型,使用ADO组件对象通过“FIX Dynamics Historical Data”数据源查询iFIX历史数据库和将查询的结果显示出来。

[3]1) 新建IFIX工程在WINDOWS开始/运行中输入BackupRestore.exe /FactoryDefault,按步骤提示新建工程,如果使用系统默认工程,即安装软件时的工程,运行报表程序时,将出现错误,NO HISTORICAL DATA FOUND,刚开始误以为需要配置ODBC数据源,在这里耗费了许多时间,后来无意中在其他工程中发现可以实现这个功能,经过对文献资料的阅读,确定了读取历史数据时需要使程序在新建工程中。

2) 定义所需报表变量集Ⅰ.在过程数据库中定义变量,建立相应的变量值。

如G1.G2等,这部分变量是在上位机中将用到的变量名,具体可参照IFIX电子书。

Ⅱ.在历史定义中选择所需记录的历史数据。

选定节点的一组标签名,用来标识含趋势分析所需过程数据的数据库块。

最多可以定义255个采集组,每个采集组中包含80个不同的标签。

这些标签是用户所需要记录的重要数据的数据名。

在这里我们可以定义产生一个子文件的时间和要写入文件的数据的类型和大小。

如图图2如需选用多个节点,可在SCU配置中,本地启动项选择“启动本地节点别名”。

如图3所示图3Ⅲ启动后台历史数据库数据采集,在进程中查看是否启动。

在SCU\配置\任务配置中,选择HTC ,如图4所示图4选择HTC完成后,可通过重启软件或者任务控制中HTC管理项启动,如图5所示图5小结:通过以上操作,我们可以看到在IFIX的HTRDATA文件夹下生成一个以你所定义的节点名为名称的文件夹,里面将产生在一段时间里用户所定义的标签所产生的数据,如图6所示图6FIX文件夹中的文件为*.H24或*.H08或*.H04,*代表历史数据库所定义的标签在各时间段所产生的数据,报表中要读取的数据就是从这些标签所记录的数据生成的文件中读取的。

如图7所示图73)在EXCEL中制作模板,按照实际工程所需要记录的数据,如时间,数值,标签名等在excel中作出适合的表格。

在设计模板的过程中,我们可以充分利用EXCEL自带的强大的函数功能,这样可以简化程序,将所需的数据进行更全面和准确的统计和分析,以求更加满足用户的需求。

如图8所示图8将模板另存为网页htm格式,保存在当前目录的PIC文件夹下,以htm后缀可以保证操作和查看人员只能阅读而不能对里面的数据进行修改,以防止现场误操作。

如图9所示图94)在IFIX中新建画面及布置画面配置软件开发环境,添加ActiveX控件及引用ADO对象库Ⅰ在画面中选择ComboBox控件,DPTicker控件,WebBrower控件,Timer控件和菜单编辑控件PopupMenu控件等各项需要的控件。

如果部分控件在IFIX中无法找到,可在VB中查询该控件名称,一般这些控件在C:\WINDOWS\system32中可以找到。

Ⅱ部分控件的命名和使用在程序中将DTPiker控件命名为DTPstart和DTPend,配置如图所示将ComboBox分别命名为ComboBox5,ComboBox6等,将WebBrower命名为WebBrower1,将Timer命名为aaa和ddd。

①在使用ADO对象之前,必须先将对象库引入当前工程中。

使用VB集成开发环境“工程”菜单中的“引用”对话框,将其中的“Microsoft ActiveX Data Objects 2.6 Library”和“IE Popup Menu”选中即可。

下图为基本的引用,具体工程中可根据需要添加引用。

②②对画面进行优化和布置。

用户可将各控件以自己的方式进行排列,美化画面,也可将相似的控件成组,方便管理画面。

5).使用外部数据库如果需要读取外部数据如ACCESS数据库,可以建立一个*.mdb文件,并通过程序调用。

3.3.IFIX历史报表流程图本次所使用的报表是基于ADO的IFIX历史数据报表,采用Mircrosoft新数据库访问技术,这是建立在OLEDB之上的高层数据访问。

相关文档
最新文档