VC、IE、ASP环境下打印、预览的完美解决方案
2024-05-04 11:06:31
供稿：网友
一种基于xml的报表开发工具，它支持从设计报表，调用api打印、预览，能支持分布式报表、方便报表的存储、转发。在报表中能嵌入vbscript,能方便地访问vb,vc的变量，能访问com组件、ado等遵循activex标准的控件。
包括报表可视化开发界面、报表语法解释器，基于com的组件。是分布式报表的完美解决方案
语法如下:
<?xml version="1.0" encoding="gb2312" ?>
<!doctype report system "print_report.dtd" >
<report name='报表'>
<report_script>
dim rs,con,sql,lsh
dim temp
set con =createobject("adodb.connection") '创建ado组件
con.connectionstring = "dbq=d:/uml_project/report/demo/asp/report.mdb;driver={microsoft access driver (*.mdb)};"
con.open
set rs =createobject("adodb.recordset")
sql="select * from cj,student where cj.id=student.id "
rs.open sql,con,1,3
</report_script>
<report_head height='20'>
<text name='vfptext' font_name='宋体' font_size='14' font_weight='700' font_italic='0' font_underline='0' top='10' left='78' width='26' height='5' >
成绩明细表
</text>
</report_head>
<page_head height='10'> <!--报表头-->
<text name='vfptext' font_name='宋体' font_size='9' font_weight='100' font_italic='0' font_underline='0' top='2' left='162' width='6' height='3' >
合计
</text>
</page_head>
<page_body height='10'>
<text name='vfptext' font_name='宋体' font_size='9' font_weight='100' font_italic='0' font_underline='0' top='2' left='15' width='25' height='4' >
<report_script>
report.write cstr(rs("xm"))
</report_script>
</text>
</page_body>
</report>
