分类
学习笔记 日记

免费开源类库EPPlus操作Excel

官网http://epplus.codeplex.com/

EPPlus是一个可以读写Excel的第三方插件。主要支持Office Open XML标准,Office 2007以上XLSX格式的读写。EPPlus全称是ExcelPackage Plus,即ExcelPackage的增强版,它在ExcelPackage的基础上,增强了许多功能包括对流、Linq的支持。

该类库使用中不需要安装Office,不使用Office COM组件。

以下为操作excel示例:

示例创建一带有样式的表格,并且计算了相关单元格求和等。官网中示例代码中还有更多的,不一一摘录。例如可以创建excel统计图表、柱状图等复杂图形。

 

using System;
using System.Collections.Generic;
using System.Text;
using System.IO;
using OfficeOpenXml;
using System.Xml;
using System.Drawing;
using OfficeOpenXml.Style;

namespace EPPlusSamples
{
    class Sample1
    {
        /// <summary>
        /// Sample 1 - simply creates a new workbook from scratch.
        /// The workbook contains one worksheet with a simple invertory list
        /// </summary>
        public static string RunSample1(DirectoryInfo outputDir)
        {
            FileInfo newFile = new FileInfo(outputDir.FullName + @"\sample1.xlsx");
            if (newFile.Exists)
            {
                newFile.Delete();  // ensures we create a new workbook
                newFile = new FileInfo(outputDir.FullName + @"\sample1.xlsx");
            }
            using (ExcelPackage package = new ExcelPackage(newFile))
            {
                // add a new worksheet to the empty workbook
                ExcelWorksheet worksheet = package.Workbook.Worksheets.Add("Inventory");
                //Add the headers
                worksheet.Cells[1, 1].Value = "ID";
                worksheet.Cells[1, 2].Value = "Product";
                worksheet.Cells[1, 3].Value = "Quantity";
                worksheet.Cells[1, 4].Value = "Price";
                worksheet.Cells[1, 5].Value = "Value";

                //Add some items...
                worksheet.Cells["A2"].Value = 12001;
                worksheet.Cells["B2"].Value = "Nails";
                worksheet.Cells["C2"].Value = 37;
                worksheet.Cells["D2"].Value = 3.99;

                worksheet.Cells["A3"].Value = 12002;
                worksheet.Cells["B3"].Value = "Hammer";
                worksheet.Cells["C3"].Value = 5;
                worksheet.Cells["D3"].Value = 12.10;

                worksheet.Cells["A4"].Value = 12003;
                worksheet.Cells["B4"].Value = "Saw";
                worksheet.Cells["C4"].Value = 12;
                worksheet.Cells["D4"].Value = 15.37;

                //Add a formula for the value-column
                worksheet.Cells["E2:E4"].Formula = "C2*D2";

                //Ok now format the values;
                using (var range = worksheet.Cells[1, 1, 1, 5]) 
                {
                    range.Style.Font.Bold = true;
                    range.Style.Fill.PatternType = ExcelFillStyle.Solid;
                    range.Style.Fill.BackgroundColor.SetColor(Color.DarkBlue);
                    range.Style.Font.Color.SetColor(Color.White);
                }

                worksheet.Cells["A5:E5"].Style.Border.Top.Style = ExcelBorderStyle.Thin;
                worksheet.Cells["A5:E5"].Style.Font.Bold = true;

                worksheet.Cells[5, 3, 5, 5].Formula = string.Format("SUBTOTAL(9,{0})", new ExcelAddress(2,3,4,3).Address);
                worksheet.Cells["C2:C5"].Style.Numberformat.Format = "#,##0";
                worksheet.Cells["D2:E5"].Style.Numberformat.Format = "#,##0.00";

                //Create an autofilter for the range
                worksheet.Cells["A1:E4"].AutoFilter = true;

                worksheet.Cells["A2:A4"].Style.Numberformat.Format = "@";   //Format as text
                worksheet.Cells.AutoFitColumns(0);  //Autofit columns for all cells

                // lets set the header text 
                worksheet.HeaderFooter.OddHeader.CenteredText = "&24&U&\"Arial,Regular Bold\" Inventory";
                // add the page number to the footer plus the total number of pages
                worksheet.HeaderFooter.OddFooter.RightAlignedText =
                    string.Format("Page {0} of {1}", ExcelHeaderFooter.PageNumber, ExcelHeaderFooter.NumberOfPages);
                // add the sheet name to the footer
                worksheet.HeaderFooter.OddFooter.CenteredText = ExcelHeaderFooter.SheetName;
                // add the file path to the footer
                worksheet.HeaderFooter.OddFooter.LeftAlignedText = ExcelHeaderFooter.FilePath + ExcelHeaderFooter.FileName;

                worksheet.PrinterSettings.RepeatRows = worksheet.Cells["1:2"];
                worksheet.PrinterSettings.RepeatColumns = worksheet.Cells["A:G"];

                // Change the sheet view to show it in page layout mode
                worksheet.View.PageLayoutView = true;

                // set some document properties
                package.Workbook.Properties.Title = "Invertory";
                package.Workbook.Properties.Author = "Jan K鋖lman";
                package.Workbook.Properties.Comments = "This sample demonstrates how to create an Excel 2007 workbook using EPPlus";

                // set some extended property values
                package.Workbook.Properties.Company = "AdventureWorks Inc.";

                // set some custom property values
                package.Workbook.Properties.SetCustomPropertyValue("Checked by", "Jan K鋖lman");
                package.Workbook.Properties.SetCustomPropertyValue("AssemblyName", "EPPlus");

                // save our new workbook and we are done!
                package.Save();

            }

            return newFile.FullName;
        }
    }
}

分类
日记 相册

游“高家大院”和“寒窑遗址公园”

高家大院

钟鼓楼,西安的标志性建筑物,地处市中心。鼓楼后的回民巷,绝对算的上西安最喧闹的小吃街之一,来西安的海内外游客,基本都光顾过。拥挤的人潮,玲琅满目的吃货,让食客们肯定都记忆犹新吧。不过在喧闹的回民巷中,还有一处悠闲的去处,就是——高家大院。今日路过鼓楼,抽空进去转了转。

门口挂“榜眼及第”的匾额,宅院主人高岳崧曾经获一甲第二名,钦点榜眼,是明三百余年中西安地区唯一考进全国前三甲的人。院落建筑风格基本是陕西民居样式,雕梁画栋,牌匾对联,很有文化氛围。后院几只会说话的八哥特别可爱,我喊“再见”,它答“byebye”,甚是惹人爱。

寒窑遗址公园

下午,我携女友晓婷童鞋漫步曲江池,今日湖畔绿树环绕,阳光明媚,我们踩着幸福的节拍,一直漫步到了寒窑遗址公园,去追寻珍爱。寒窑如今已是西安最大的爱情主题公园了,古今中外,一切和爱情有关的故事,在门口红墙上都有所展示,白素贞与许仙,梁山伯与祝英台,罗密欧与朱丽叶,亚当与夏娃,牛郎与织女…..爱情在这里没有国界,不分人鬼蛇神,跨越恒古。“寒窑”同样也承载着一段美好的爱情故事。戏剧里“五典坡”就讲的是寒窑的故事。女主角王宝钏,是丞相王允的女儿,彩楼招亲,打中屌丝男薛平贵,王允嫌贫爱富,让女猪脚退了,女儿不从,遂同父决裂,奔赴寒窑,同薛平贵成亲了。没多久,平贵西征,王允黑心想害之,不过没搞定他,阴差阳错,平贵在西凉国当上了驸马,后成国王。这一去,岁月荏苒,时光飞逝十八载后,平贵才艰难的联系上王宝钏。再相见,两人泪眼婆娑,平贵久久不忘宝钏,宝钏一心挂念平贵,后平贵封宝钏为皇后。然而,人生相逢何其短,在宝钏为皇后十八天后,她永远的离开了她的爱人薛平贵,同时也给世人留下了一段动人、坚贞、至死不渝的悲凉爱情故事。故事的真实性不必考证。支撑王宝钏在寒窑苦守十八年的信念是啥?我想一定是爱情的坚贞,漫漫长夜,面对寒窑这片天地,我们今人在窑洞待几分钟就感到憋屈,然而她虽然才智过人,但毕竟是柔柔一女性,苦守寒窑十八载,春去冬又来,一日复一日,她也一定曾漫步曲江畔,每日在塬上望夫归来吧…爱情究竟是神马?我后来一路在思考,不由的攥紧了晓婷童鞋的手。执子之手,与尔偕老。携手相伴,不离不弃吧。看见曲江池畔拍婚纱照的一对对新人,真心祝福他们幸福。然而,“陪她一起慢慢变老”是我理解的爱情吧,其他皆是浮云罢了。

高家大院

IMG_0010

分类
学习笔记

Windows2003中IIS6.0文件上传大小限制解决方法

在服务器上进行如下操作:
1)在服务管理器里关闭 iis admin service 服务。
2)打开 windows\system32\inetsrv\ 下的 metabase.xml 文件。
3)用查找方式找到 ASPMaxRequestEntityAllowed 将默认为:204800(200K)的值修改为需要的值,如需要上传20M的文件则修改为:20480000,然后保存。
4)然后在服务管理器里重启 iis admin service 服务,接着重启IIS,OK完成!

解决超过4M的附件无法下载限制
在服务器上进行如下操作:
1)在服务管理器里关闭 iis admin service 服务。
2)打开 windows\system32\inetsrv\ 下的 metabase.xml 文件。
3)用查找方式找到 AspBufferingLimit 将默认的值修改为需要的值,如需要200M则修改为:204800000,然后保持。
4)然后在服务管理器里重启 iis admin service 服务,接着重启IIS,OK完成!

分类
日记

2012年票游之——大唐芙蓉园游记

大唐芙蓉园开园已久,由于囊中羞涩,始终没有机会进园一睹大唐风采。今年喜闻年票包含了芙蓉园一日游,今日有空,携女友一同领略了唐风唐韵,一起感受了盛唐文化。夏日芙蓉园里芙蓉湖畔,柳帘层层迷人眼,锦鲤争食惹人爱。随行随拍,请欣赏吧。年票仅仅能去一次,以后就算这个园无限次,我也不想再去了,没旁边免费的曲江遗址公园热闹有趣。

IMG_0024