把存储过程获取的数据输出到报表的html模板中

制作报表的html模板

<HTML>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<TITLE>报表模板</TITLE> 
<BODY>

<TABLE BORDER="1" cellpadding="0" cellspacing="0">

<TR>
      <TH>公司名称</TH>
   <TH>联系人</TH>
   <TH>产品名称</TH>
   <TH>产品名称</TH>
</TR>

<TR>
     <TD>Exotic Liquids</TD>
  <TD>Charlotte Cooper</TD>
  <TD>Chai</TD>
  <TD>18.0000</TD>
</TR>

<TR>
    <TD>Exotic Liquids</TD>
  <TD>Charlotte Cooper</TD>
  <TD>Chang</TD>
  <TD>19.0000</TD>
</TR>

</TABLE>
</BODY>
</HTML>

浏览器打开效果图

通过存储过程获取报表的数据,然后生成上面的报表模板html

function TForm1.DataToHtml(cds: TClientDataSet): Boolean;
var
l: TStringList;
i: Integer;
begin
Result := False;
if (cds = nil) or (not cds.Active) or (cds.IsEmpty) then
Exit;
l := TStringList.Create;
try
try
// html头
l.Add(‘<HTML>‘);
l.Add(‘<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />‘);
l.Add(‘<TITLE>报表模板</TITLE>‘);
l.Add(‘<BODY>‘);
l.Add(‘<TABLE BORDER="1" cellpadding="0" cellspacing="0">‘);
// 表头
l.Add(‘<TR>‘);
l.Add(‘<TH>门店编号</TH>‘);
l.Add(‘<TH>门店名称</TH>‘);
l.Add(‘<TH>系统版本</TH>‘);
l.Add(‘<TH>协议版本</TH>‘);
l.Add(‘<TH>离开时间</TH>‘);
l.Add(‘</TR>‘);
// 数据
cds.First;
while not cds.Eof do
begin
l.Add(‘<TR>‘);
for i := 0 to cds.FieldCount - 1 do
begin
l.Add(‘<TD>‘ + cds.Fields[i].Text + ‘</TD>‘);
end;
l.Add(‘</TR>‘);
cds.Next;
end;
// html尾
l.Add(‘</TABLE>‘);
l.Add(‘</BODY>‘);
l.Add(‘</HTML>‘);
// 保存成html文件
l.SaveToFile(ExtractFilePath(Application.ExeName) + ‘1.html‘);
Result := True;
except
Result := False;
end;
finally
l.Free;
end;
end;

把存储过程获取的数据输出到报表的html模板中

时间: 2024-10-07 03:38:20

把存储过程获取的数据输出到报表的html模板中的相关文章

将数据填充到已有的EXECL模板中

导出execl网上一大堆,最近遇到将数据导出到已有的execl模板中,具体到某行列,动态加载数据. 添加 Microsoft.Office.Interop.Excel 引用 1 /// <summary> 2 /// DataGridView 导出到execl模板中 3 /// </summary> 4 /// <param name="fileName">execl模板路径</param> 5 /// <param name=&q

PHP自学4——通过函数将数组数据输出到html的Table标签中(使用函数的例子)

这一节其实说实话并没有什么干货,不过为了防止PO主的懒癌的复发,还是坚持放一点东西,即使是内容和长度都令人发指.这一节通过一个函数来实现将数组中的内容输出html的Table标签当中显示. 函数文件——createTables.php文件: <?php //convert data in array to the element displayed in html's table tag function create_tables($dataArr, $border=1, $cellpaddi

C# 导出数据到Excel模板中(转)

今天做报表的时候遇到了多表头的问题,而且相应的报表的格式都一样.所以就采用了报表模板的方式来进行. 第一步:在开发的当前项目中引入:Microsoft.Office.Interop.Excel:System.Reflection:命名空间. 第二步:获取要导出的数据: 第三步:创建一个Excel 应用程序: //需要添加 Microsoft.Office.Interop.Excel引用 Microsoft.Office.Interop.Excel.Application app = new Mi

关于springmvc的获取前段数据和页面输出

项目的创建在这里就不写啦,如果实在不会,看看前面的,这里就直接上代码啦! 首先,是创建一个jsp文件,功能实现简单的登录功能,没什么重要的.. 这个就是简单的前段界面,这里需要注意的一点就是action="login",这里的login是一个虚拟路径, 也就是获取前端数据action的虚拟路径,要前后一致: 下面的就是获取前段数据以及验证的一种方式,这一中是比较简单的 就是在入参处获取request的对象:从而达到下面的操作 @Controllerpublic class LoginC

使用python获取webservice数据并输出到文件

上头要求设置TCP备案检查,给了个WEBSERVICE接口.查了2天,才确认还是python比较好用,我这水平也就写个脚本把数据导出,过滤检索还是用的shell.写此文备忘.WEBSERVICE接口脚本如下: #! /usr/bin/python #coding:utf-8 import codecs import suds def main(file_name, out_file): url = 'http://121.14.4.210:8088/icpautobj/ws/getIcp?wsd

OAF中输出PDF报表文件超链接

OAF中输出PDF报表文件超链接解决方案 解决思路 获取PDF文件的输出流 获取输出流之后将其转换为BLOB 将转化后的BLOB存储在附件表fnd_blobs中 构造该BLOB文件的URL 将URL存储在客户化表里形成一条唯一的记录,返回唯一ID FORM通过返回得唯一ID找到URL,调用方法,在浏览器打开URL 技术要点 使用TemplateHelper.processTemplate方法生成目标PDF的InputStream流 调用程序包将InputStream传入数据库中的BLOB字段中,

Ajax 跨域请求 jsonp获取json数据

遇到Ajax的跨域请求出问题 找了中解决办法如下: 参考内容:http://justcoding.iteye.com/blog/1366102 由于受到浏览器的限制,该方法不允许跨域通信.如果尝试从不同的域请求数据,会出现安全错误.如果能控制数 据驻留的远程服务器并且每个请求都前往同一域,就可以避免这些安全错误.但是,如果仅停留在自己的服务器上,Web 应用程序还有什么用处呢?如果需要从多个第三方服务器收集数据时,又该怎么办? 理解同源策略 同源策略阻止从一个域上加载的脚本获取或操作另一个域上的

把数据输出到Word (非插件形式)

项目开发过程中,我们要把数据以各种各样的形式展现给客户.把数据以文档的形式展现给客户相信是一种比较头疼的问题,如果没有好的方法会 使得我的开发繁琐,而且满足不了客户的需求.接下来我会通过两种开发方式介绍如何将数据输出到Word 文档上.我会分两篇文章介绍,第一篇 介绍不使用插件的情况下操作word,第二篇文章将介绍一种强大的插件操作word.下面开始第一篇文章.[本次实例源代码从这里下载] 文章梗概: ? 不使用模板将数据输出到 word ? 输出数据到 word 在后端设置输出内容 ? 输出数

Oracle中使用游标获取指定数据表的所有字段名对应的字符串

操作步骤:打开PLSQL Developer后,直接执行下面的语句就可以出来 --Oracle中使用游标获取指定数据表的所有字段名对应的字符串 declare mytablename VARCHAR(255):='STAFFDOC'; --定义要查询的数据表名变量,STAFFDOC为我测试用的数据表名,请修改成您的数据库中的对应数据表名字mystring NVARCHAR2(4000):=''; --定义要输出的字符串变量 cursor mycursor is --定义游标          s