登录
首页 工控软件 工控软件
回帖 发帖
正文

主题:iFix报表--EXCEL报表

点击:1033 回复:0

ifix报表--excel报表  
来源:极易ifix论坛
http://www.geifix.com/index.asp?boardid=6

ifix中如何实现excel报表
在vba中引用microsoft excel 11.0 object library和microsoft ado 6.0 library。在画面中添加个按钮。复制以下代码:
‘----------开始复制(不包括此行)--------------
option explicit
dim rsado as adodb.recordset
dim cnado as adodb.connection
private sub command1_click()
   dim strdir as string
   strdir = e:    
   dim i as long
   dim sql as string
   sql = select * from thisnode
   set cnado = new adodb.connection
   set rsado = new adodb.recordset
   cnado.c
   cnado.open
   rsado.cursorlocation = aduseclient
   rsado.open sql, cnado, adopendynamic, adlockunspecified, -1
   
   if rsado.recordcount
注意:1.ifix历史数据库只支持读90天的数据,在sql语句中限定时间即可。
        2.也可以读取其他数据源的数据,如access、sql server等,只要改一下connectionstring。
----------------------------------------------
此篇文章从博客转发
原文地址: Http://blog.gkong.com/more.asp?id=96963&Name=springal
09-08-12 02:23

工控新闻

更多新闻资讯