package

 {

     import flash.display.Sprite;

     import flash.events.MouseEvent;

     import flash.filesystem.File;

     import flash.filesystem.FileMode;

     import flash.filesystem.FileStream;

     import flash.net.FileReference;

     import flash.net.ObjectEncoding;

     import flash.text.TextField;

     import flash.utils.ByteArray;

     /**

      * @author Frost.Yen

      * @E-mail 871979853@qq.com

      * @create 2015-8-1 下午8:54:59

      *

      */

     [SWF(width="1024",height="768")]

     public class ExportExcel extends Sprite

     {

         private var _fields:Array = ["姓名", "地址","联系电话","QQ","电子邮箱"];

         private var _fields_en:Array = ["name", "address", "tel", "qq", "email"];

         private var _datas:Array = [];

         private var _btn:TextField;

         public function ExportExcel()

         {

                 initViews();

         }

         private function initViews():void

         {

             for(var j:int = 0;j<_fields.length;j++){

                 var title:TextField = getText(100,20,_fields[j]);

                 title.x = j*100+100;

                 title.y = 50;

                 this.addChild(title);

             }

             for(var i:int = 0;i<10;i++){

                 var obj:Object = {name:"Name"+i,address:"address"+i,tel:"tel"+i,qq:"qq"+i,email:"email"+i};

                 _datas.push(obj);

                 var count:int = 0;

                 for(var key:String in obj){

                     var t:TextField = getText(100,20,obj[key]);

                     t.x = 100*count+100;

                     t.y = 20*i+70;

                     count++;

                     this.addChild(t);

                 }

             }

             _btn = new  TextField();

             _btn.selectable = false;

             _btn.autoSize = "left";

             _btn.border = true;

             _btn.text = "导出Excel";

             _btn.x = 620;

             _btn.y = 50;

             _btn.addEventListener(MouseEvent.CLICK,onExport);

             this.addChild(_btn);

         }

         private function onExport(e:MouseEvent):void

         {

             save();

         }

         private function save():void

         {

             var xlsStr:String = "<html><head></head><body><table>";

             xlsStr += "<tr>";

             for each(var fieldHead:String in _fields)

             {

                 xlsStr += "<td>" + fieldHead + "</td>";

             }

             xlsStr += "</tr>";

             for each(var item:Object in _datas)

             {

                 xlsStr += "<tr>";

                 for each(var field:String in _fields_en)

                 {

                     xlsStr += "<td>" + item[field] + "</td>";

                 }

                 xlsStr += "</tr>";

             }

             xlsStr += "</table></body></html>";

             var bytes:ByteArray = new ByteArray();

             //bytes.writeUTFBytes(xlsStr);

             bytes.writeMultiByte(xlsStr, "GB2312");

             new FileReference().save(bytes, "data.xls");

             //运用File可以达到同样效果，而且不用弹出保存对话框

             /*var file:File = File.desktopDirectory.resolvePath("data.xls");

             var fs:FileStream = new FileStream();

             fs.open(file, flash.filesystem.FileMode.WRITE);

             fs.writeMultiByte(xlsStr,"GB2312");

             fs.close();*/

         }

         private function getText(w:Number,h:Number,text:String):TextField

         {

             var t:TextField = new TextField();

             t.width = w;

             t.height = h;

             //t.autoSize = "center";

             t.selectable = false;

             t.border = true;

             t.text = text;

             return t;

         }

     }

 }

[AIR] AIR将数据保存并导出为Excel的更多相关文章

  1. 头疼3－4次的问题，数据从DB导出到EXCEL，再从EXCEL导入到DB，数据格式发生错误 ，导致 程序出错。

    反思: 1 解决 问题的思路 绕远了: 在这个问题出现前,程序是运行正确 的 问题出现前,我误删了DB 的 testcase表的所有 case ,然后 再把邮件 中的excel数据导入到 DB 然后 ...

  2. DevExpress XtraGrid 数据导出导入Excel

    // <summary> /// 导出按钮 /// </summary> /// <param name="sender"></param ...

  3. salesforce 零基础学习（二十三）数据记录导出至excel（自定义报表导出）

    我们都知道,报表有个功能为导出excel,但是有的时候客户需求往往标准的报表达不到,比如导出excel,其中本月修改的数据字段标红,如下图所示. 这就需要我们去写VF来实现此功能. 需求:将数据表记录 ...

  4. MySQL数据导出为Excel, json,sql等格式

    MySQL数据经常要导出为Excel, json,sql等格式,通过步骤都很多,麻烦,现在通过Treesoft可以方便的导出你要的数据格式. 1.在线执行SQL,在数据列表中有相应按钮,方便的将数据导 ...

  5. C#将DataTable数据导出到EXCEL的两种方法

    1.在非服务器控件的页面导出数据,需要借助一张temp空页面post回后台的数据. 前台:window.location.href = "../Temp.aspx"; 后台: tr ...

  6. DevExpress GridControl GridView 导出到 Excel 类

    说明: 1>GridView 导出到 Excel (如果分页,只导出当前页数据) 2>GridView 导出到 Excel 3>方法2可以参考DataTable 导出到 Excel ...

  7. C# winform 导出导入Excel/Doc 完整实例教程[网上看到的]

    还真没做过winform的导出导入,今天上网百度了一下.结果--- 所以还是我自己写个吧.之前做过web的,半搬半做就OK. 1添加引用:Aspose.Cells.dll(我们就叫工具包吧,可以从网上 ...

  8. sql导出到excel

    1.先查询数据ID,别名  导出到excel 2.增加标准名称,标识错误数据,导入sqlServer select distinct [StandardName] from [GMSOA].[dbo] ...

  9. pandans导出Excel并将数据保存到不同的Sheet表中

    数据存在mongodb中,按照类别导出到Excel文件,问题是想把同一类的数据放到一个sheet表中,最后只导出到一个excel文件中# coding=utf-8import pandas as pd ...

随机推荐

  1. centos7 更新源 安装ifconfig

    centos7最小化安装后,ifconfig是不可用的,可以使用ip addr或ip link查看网络信息. 更新源之前,先确定网络是否连通.我用的虚拟机,因为桥接受公司ip限制,换成了NAT模式,确 ...

  2. 微软人工智能公开课 https://mva.microsoft.com/colleges/microsoftai#!jobf=Developer

    https://mva.microsoft.com/colleges/microsoftai#!jobf=Developer

  3. CENTOS 配置好SVN服务环境后，其他服务器无法访问 Error: Can't connect to host '192.168.1.103': 由于连接方在一段时间后没有正确答复或连接的主机没有反应，连接尝试失败。

    CENTOS 配置好SVN服务环境后,其他服务器无法访问   根据 下面的步骤配置好服务后,使用本机可以正常 连接到 SVN 服务, 但是使用局域网的其他服务器访问时出现下面的错误, Error: C ...

  4. php实现二分查找法

    二分查找法需要数组是一个有序的数组 假设我们的数组是一个递增的数组,首先我们需要找到数组的中间位置. 一.要知道中间位置就需要知道起始位置和结束位置,然后取出中间位置的值来和我们的值做对比. 二.如果 ...

  5. 面向对象的JavaScript-005-Function.prototype.call()的3种作用

    1. // call的3种作用 // 1.Using call to chain constructors for an object function Product(name, price) { ...

  6. 注意for循环中变量的作用域-乾颐堂

    1 2 for e in collections:     pass 在for 循环里, 最后一个对象e一直存在在上下文中.就是在循环外面,接下来对e的引用仍然有效. 这里有个问题容易被忽略,如果在循 ...

  7. CodeForces 474B Worms (水题，二分)

    题意:给定 n 堆数,然后有 m 个话询问,问你在哪一堆里. 析:这个题是一个二分题,但是有一个函数,可以代替写二分,lower_bound. 代码如下: #include<bits/stdc+ ...

  8. schedule-pool模拟并行任务分片

    模拟并行任务分片 代码部分: package com.pool; import com.alibaba.fastjson.JSON; import java.io.BufferedReader; im ...

  9. CentOS安装gotop

    1.安装go语言环境 yum install golang 2.安装gotop程序 git clone --depth 1 https://github.com/cjbassi/gotop /tmp/ ...

  10. VC中CRect类的简单介绍

    CRect CRect类与Windows RECT结构相似,并且还包括操作CRect对象和Windows RECT结构的成员函数.在传递LPRECT,LPCRECT或RECT结构作为参数的任何地方,都 ...