《一种简单的组态王报表功能实现方法》由会员分享，可在线阅读，更多相关《一种简单的组态王报表功能实现方法（4页珍藏版）》请在金锄头文库上搜索。
1、一种简单的组态王报表功能实现方法2010年04月24日星期六15:18前段时间用组态王6.53做了一个小的画面组态，其中用到了KVADODBGrid控件来做报表，现总结如下。一、准备工作第一步：在组态王工程管理器中新建一个项目，项目路径为D：实验项目。第二步：新建一个ACCES数据库1、在“D：实验项目”路径下新建一个MicrosoftOfficeAccess应用程序并命名为mydatabase.mdb；2、打开“控制面板管理工具ODBC数据源管理器”选择“系统DS”选项；3、点击“添加”按钮创建新数据源，选择“MicrosoftAccessDriver(*.mdb)”；4、在数据源名处填下“
2、mydata”，并选择数据库路径为“D：实验项目mydatabase.mdb”。第三步：创建表格模板点击工程浏览器左侧的“SQL访问管理器”下的“表格模板”，新建一个表格并命名为Table。在Table中添加所需记录的变量及日期参数，其中“日期”为定长字符串型，字符长度为10；其它诸如年、月、日、时、分则为浮点型，字符长度为1。第四步：创建记录体点击工程浏览器左侧的“SQL访问管理器”下的“记录体”，新建一个表格并命名为Record，在Record中添加所需记录的变量及日期参数。记录体用来定义Access数据表格字段与组态王变量之间的对应关系。、连接数据库第一步：在工程浏览器左侧的“数据库”下
3、的“数据字典”中定义一个内存整型变量，并命名为ConnectID。第二步：创立组态王与mydata数据源的连接，并以“表格模板”Table的格式在数据库中建立名为“TheDate”的表格，命令如下：SQLConnec(tConnectID,dsn=mydata;uid=;pwd=);SQLCreateTable(ConnectID,TheDate,Table);将上面两条命令填入“工程浏览器命令语言应用程序命令语言”下的“启动时”选项中。第三步：在工程浏览器左侧的“命令语言事件命令语言”下新建一事件命令，在“事由描述”项内填下“本站点$分=01”(每小时事件发生一次)，在“发生时”框内填写SQ
4、LInsert(connectionid,TheDate,Record);/每小时向数据库保存一条记录。三：建立报表查询画面新建一个画面，并在画面上添加一个日期控件作日期查询用；添加一个KVADODBGri控件作报表显示用；添加三个按钮分别作查询、打印、退出用。第一步：添加KVADODBGri控希91. 菜单栏编辑插入通用控件KVADODBGridClass,双击添加的控件，并命名“控件名”为dayreport在控件属性里的“数据源”选择前面定义的mydata、“表名称”选择TheDate,此时下面的“有郊字段”将出现你在记录体里面加入的数据，根据需要添加到右侧，并编辑好“标题”、“格式”等内
5、容3根据需要可修改控件属性里面的“字体”、“打印设置”等第二步：添加时间控件1菜单栏编辑插入通用控件MicrosoftDateandTimePickerControl6.0(SP4)2双击添加的控件，并命名“控件名”为DayreportSelect3根据需要可修改控件属性第三步：添加查询按钮1定义按钮的“命令语言连接”“按下时”为：dayreport.RemoveAllData();2定义按钮的“命令语言连接”“弹起时”为：(下列语言中“条件句”为内存字符串格式，在“数据词典”里面定义)longa;longb;stringstr1;stringstr2;a=DayreportSelect.Mo
6、nth;b=DayreportSelect.Day;if(a10)str1=-0+StrFromInt(DayreportSelect.Month,10);elsestr1=-+StrFromInt(DayreportSelect.Month,10);if(b10)str2=-0+StrFromInt(DayreportSelect.Day,10);elsestr2=-+StrFromInt(DayreportSelect.Day,10);本站点条件句=StrFromInt(DayreportSelect.Year,10)+str1+str2;dayreport.Where=日期=本站点条件句
7、+orderby时;dayreport.FetchData();dayreport.FetchEnd();注意：在控制面板区域和语言自定义下，需定义短日期格式为“yyyy-MMm)压力(kpa)注量(m3/h)n550-10.02Se；o1690S2.027834.02770109.023919.03790120.0ZBT嵋.04gs030.02S36S.055.033.027334.0G6B0113.027110.0762.0P4.029263.0e00100.Q27110.0S45079.027834.010S3069.00it550154.02030501274.012LO2ST43Q13610310274T2.01458.054,022401565060.027334D16870S8.0260沁1760074.026024.0IBE80ECI020T48.019650C0.02556202D83072.0256B2.a2163卫72.025S&20220202S.024577.(1236ta76.0249330总结：这个报表用了组态王自带的控件KVADODBG，数据库用的是ACCES,S并用到了控件自带的SQL命令语言，总体实现起来较复杂，特别是报表所需内容较多时，需做的工作量比较的大，并且电子版的报表查看不方便。下一步可以考虑用VBExcel来实现报表功能。
