asp操作Excel的方法

asp操作Excel的方法
asp操作Excel的方法

asp操作excel方法

asp操作excel方法 代码如下: <% ‘************************************************* ****************** ‘使用说明 ‘dim a ‘set a=new createexcel ‘a.savepath=x ‘保存路径 ‘a.sheetname=工作簿名称‘多个工作表a.sheetname=array(工作簿名称一,工作簿名称二) ‘a.sheettitle=表名称‘可以为空多个工作表a.sheetname=array(表名称一,表名称二) ‘a.data =d ‘二维数组‘多个工作表 array(b,c) b 与c为二维数组 ‘dim rs ‘set rs=server.createobject(adodb.recordset) ‘rs.open select id, classid, classname from [class] ,conn, 1, 1 ‘a.adddbdata rs, 字段名一,字段名二, 工作簿名称, 表名称, true ‘true自动获取表字段名

‘a.adddata c, true , 工作簿名称, 表名称‘c二维数组 true 第一行是否为标题行 ‘a.addtdata e, sheet1 ‘按模板生成c=array(array(aa1, 内容), array(aa2, 内容2)) ‘a.create() ‘https://www.360docs.net/doc/934836139.html,edtime 生成时间,毫秒数 ‘a.savepath 保存路径 ‘set a=nothing ‘设置com组件的操作权限。在命令行键入“dcomcnfg”,则进入com组件配置界面,选择microsoftexcel后点击属性按钮,将三个单选项一律选择自定义,编辑中将everyone 加入所有权限 ‘************************************************* ****************** class createexcel private createtype_ private savepath_ private readpath_ private authorstr rem 设置作者 private versionstr rem 设置版本 private systemstr rem 设置系统名称

EXCEL基本操作方法

EXCEL使用大全 38.恢复隐藏列2 39.快速隐藏/显示选中单元格所在行和列(微软O FFICE技巧大赛获奖作品)2 40.彻底隐藏单元格3 41.用下拉列表快速输入数据3 42.快速输入自定义短语4 43.设置单元格背景色5 44.快速在多个单元格中输入相同公式5 45.同时在多个单元格中输入相同内容5 46.快速输入日期和时间5 47.将复制的单元格安全地插入到现有单元格之间6 48.在E XCEL中不丢掉列标题的显示6 49.查看与日期等效的序列数的值7 50.快速复制单元格内容7 51.使用自定义序列排序(微软O FFICE技巧大赛获奖作品)8 52.快速格式化E XCEL单元格8 53.固定显示某列9 54.在E XCEL中快速编辑单元格9 55.使用自动填充快速复制公式和格式10 56.为单元格添加批注10 57.数据自动输入11 58.在E XCEL中快速计算一个人的年龄12 59.快速修改单元格次序12 60.将网页上的数据引入到E XCEL表格中12 1

1.恢复隐藏列 通常,选择隐藏列两边列上的单元格,然后选择“格式→列→取消隐藏”菜单项可以恢复隐藏的列。其实恢复隐藏列还有一种快捷方法:将鼠标指针放置在列标的分割线上,例如,若隐藏B列,则将鼠标指针放置在列A和列C的分割线上,轻轻地向右移动鼠标指针,直到鼠标指针从两边有箭头的单竖变为两边有箭头的双竖杠,此时拖动鼠标就可以打开隐藏的列。 2.快速隐藏/显示选中单元格所在行和列(微软Office技巧大赛获 奖作品) 在Excel中隐藏行或列, 通常可以通过格式菜单中的行或列选项中的隐藏来实现, 或者是选中行号或列标后通过鼠标右键的快捷菜单来完成, 对于分散的单元格区域, 可以这样快速隐藏: 快速隐藏选中单元格所在行:“Ctrl + 9” 快速隐藏选中单元格所在列:“Ctrl + 0” 取消行隐藏:“Ctrl+Shift+9” 取消行隐 2

ASP直接调用EXCEL数据

ASP直接调用EXCEL数据的例子(不用ODBC) 例子: 在"c:excelbook1.xls"存在一个EXCEL表book1.xsl,表的结构如下: 1 序号名称金额 2 1 张三100 3 2 李四200 4 3 王五300 序号字段不为空 注意:excel 起始行是1而不是为0 <%@language=vbscript %> <% Set xlApp = server.CreateObject("Excel.Application") strsource = "c:excelbook1.xls" Set xlbook = xlApp.Workbooks.Open(strsource) Set xlsheet = xlbook.Worksheets(1) i=1 response.write "

" while xlsheet.cells(i,1)<>"" response.write "" response.write " " response.write " " response.write " " response.write "" i=i+1 wend response.write "
" & xlsheet.Cells(i, 1) & "" & xlsheet.Cells(i, 2) & "" & xlsheet.Cells(i, 3) & "
"

asp数据库成excel文件代码

asp数据库数据生成excel文件: 生成EXCEL文件实例 在线生成EXCEL


<% if Request("act") = "" then Response.Write "生成EXCEL文件实例" else dim conn,strconn strconn="driver={SQL Server};server=wen;uid=sa;pwd=;database=DB_Test" set conn=server.CreateObject("adodb.connection") conn.Open strconn dim rs,sql,filename,fs,myfile,x Set fs = server.CreateObject("scripting.filesystemobject") '--假设你想让生成的EXCEL文件做如下的存放 filename = Server.MapPath("online.xls") '--如果原来的EXCEL文件存在的话就删除 if fs.FileExists(filename) then fs.DeleteFile(filename) end if '--创建EXCEL文件 set myfile = fs.CreateTextFile(filename,true) Set rs = Server.CreateObject("ADODB.Recordset") '--从数据库中把你想放到EXCEL中的数据读出来 sql = "select * from Tb_Execl order by id desc" rs.Open sql,conn,1,1 if rs.EOF and rs.BOF then else dim strLine,responsestr strLine="" For each x in rs.fields strLine = strLine & https://www.360docs.net/doc/934836139.html, & chr(9) Next '--将表的列名先写入EXCEL myfile.writeline strLine Do while Not rs.EOF strLine=""

告别ASPNET操作EXCEL的烦恼(总结篇)

Copy From 告别https://www.360docs.net/doc/934836139.html,操作EXCEL的烦恼(总结篇) 公元19XX年前,关于EXCEL的操作就如滔滔江水,连绵不绝,真正操作EXCEL我也是从去年下半年开始的,有些比较复杂的年度报表之类的,做起来也有点费力,不过还是都能画出来了,关于EXCEL的报表导出,考虑到导出耗时的问题我主要采用AJAX来做的,分别捕捉几个起止状态,给客户端提示3个状态:正在检索数据。。。---》准备导出数据。。。(只是从数据库成功取出,还没有读写excel文件)--》正在读写文件--》导出数据成功,当然如果哪一过程出错,都有对应的提示,只所以想到写这篇文章,主要是因为今年有个系统的部分EXCEL的操作也让我做,顺便结合之前操作EXCEL的经验作一下总结,可能也算不上什么,对于绝大多数来说也没什么技术含量,网上一搜一大把,但我想还是有必要总结一下,至少能给园子里的新手些许帮助,OK,Let's Go... 一. 程序操作EXCEL的应用主要还是在统计报表方面,您可能会考虑读EXCEL模板,也可能会考虑没必要读模板,其实读不读模板都能达到一样的效果,看实际情况而用了。 1. 读模板的话,首先模板存放在某个路径下,根据模板把从数据库里取出的数据写回EXCEL然后生成一个新的EXCEL存放都另一个路径以供下载,模板不变。 我这里的EXCEL操作主要是在VS2005里的,VS2003也可以的,不过没怎么研究03里的操作(文章最后我会把05,03的示例下载地址贴上)vs05中操作EXCEL直接引用.NET自带的COM组件 ,添加后项目的bin目录下会自动出现 Interop.Excel.dll这个DLL(需安装office2003 excel,下面的说明及示例都是基于office2003的,版本不同调用可能会不一样) 页面的命名空间引用using Excel; 下面是调用模板的一段代码 1#region使用模板导出Excel表 2case"ReportByTemp": 3 { 4 5 DataView dv = Cache["ReportByTemp"] as DataView; 6//建立一个Excel.Application的新进程 7 Excel.Application app =new Excel.Application(); 8if (app ==null) 9 { 10return; 11 } 12 app.Visible =false; 13 https://www.360docs.net/doc/934836139.html,erControl =true; 14 Workbooks workbooks = app.Workbooks; 15 _Workbook workbook = workbooks.Add(template_path +"\\EXCEL测试模板.xls");//这

EXCEL电子表格的使用方法与技巧

EXCEL电子表格的使用方法与技巧 1、如何添加快捷按钮区的项目? 单击“视图”→“工具栏”→“X X X” 2、如何打开已有的EXCEL文件? 单击“文件”→“打开”→“文件名”→“确定” 3、如何调整EXCEL表格的栏宽和行高? 4、如何给单元格中输入文字、数字,并设置字形、字体、字号在单元格中的位置? ①按正常的输入方法输入文字。 ②将要设置的单元格处于编辑状态。 ③单击“格式”→“单元格”,出现对话框。 ④单元格对话窗口中。 “对齐”栏,是设定单元格中文字或数字的位置,是居中、靠上、靠下等方式。 “字体”栏,是设定单元格中文字的字体,颜色等。 5、如何设置单元格中数字的小数位数? 说明:有两种方法,一种是先设置后输入,另一种是先输入后设置。 第一种方法操作过程: ①将要输入的数字的所有单元格处理编辑状态。

②单击“格式”→“单元格”→“数字”→“自定义”,出现对话框 ③在对话框的类型栏,选定要设置的小数位数项单击,再单击“确定” 好处:在输入小数数字时,不足的小数位数计算机会自动补齐。第二种方法操作过程: ①直接输入原始数据。 ②用第一种方法进行设置。 6、如何用自动填充方法进行序列号的设置? ①在序列的第一单元格输入第一个序列号。 ②将所有要输入序列号的单元格处于编辑状态。 ③单击“编辑”→“填充”→“序列”,出现对话框。 ④在对话框的“序列产生在”栏选“行”或“列”,在“类型”栏选“等差序列”或“等比序列”等,在“步长值”栏输入步长值。 ⑤单击“确定”取消编辑。 7、遇到几个,几十个单元格相邻,且内容一样,如何简便输入? ①在该编辑区的第一单元格输入内容。 ②将要输入相同内容的单元格处于编辑状态。 ③单击“编辑”→“填充”→“向上、向下、向左、向右填充”。 ④取消编辑。 8、如何给表格添加背景图案和颜色?

ASP实例代码 asp操作Excel类

ASP实例代码asp操作Excel类 asp操作Excel类: <% '******************************************************************* '使用说明 'Dim a 'Set a=new CreateExcel 'a.SavePath="x" '保存路径 'a.SheetName="工作簿名称" '多个工作表 a.SheetName=array("工作簿名称一","工作簿名称二") 'a.SheetTitle="表名称" '可以为空多个工作表a.SheetName=array("表名称一","表名称二") 'a.Data =d '二维数组'多个工作表array(b,c) b与c为二维数组 'Dim rs 'Set rs=server.CreateObject("Adodb.RecordSet") 'rs.open "Select id, classid, className from [class] ",conn, 1, 1 'a.AddDBData rs, "字段名一,字段名二", "工作簿名称", "表名称", true 'true自动获取表字段名 'a.AddData c, true , "工作簿名称", "表名称" 'c二维数组true 第一行是否为标题行 'a.AddtData e, "Sheet1" '按模板生成c=array(array("AA1", "内容"), array("AA2", "内容2")) 'a.Create() 'https://www.360docs.net/doc/934836139.html,edTime 生成时间,毫秒数 'a.SavePath 保存路径 'Set a=nothing '设置COM组件的操作权限。在命令行键入“DCOMCNFG”,则进入COM组件配置界面,选择MicrosoftExcel后点击属性按钮,将三个单选项一律选择自定义,编辑中将Everyone 加入所有权限 '******************************************************************* Class CreateExcel Private CreateType_ Private savePath_ Private readPath_ Private AuthorStr Rem 设置作者 Private VersionStr Rem 设置版本 Private SystemStr Rem 设置系统名称 Private SheetName_ Rem 设置表名 Private SheetTitle_ Rem 设置标题 Private ExcelData Rem 设置表数据 Private ExcelApp Rem Excel.Application Private ExcelBook Private ExcelSheets

如何用asp读取Excel文件(比较全面)

1.ASP对Excel的基本操作 (1) 建立Excel对象 创建Excel对象可以通过下面的代码来实现: <% set objExcelApp = CreateObject("Excel.Application") objExcelApp.DisplayAlerts = false '不显示警告objExcelApp.Application = false '不显示界面 %> (2) 新建Excel文件 新建Excel文件可以通过以下代码来实现: <% objExcelApp.WorkBooks.add set objExcelBook = objExcelApp.ActiveWorkBook set objExcelSheets = objExcelBook.Worksheets set objExcelSheet = objExcelBook.Sheets(1) %> (3) 读取已有的Excel文件 读取已有的Excel文件可以通过下面的代码来实现 <% strAddr = Server.MapPath(".") objExcelApp.WorkBooks.Open(strAddr & "TempletTable.xls") set objExcelBook = objExcelApp.ActiveWorkBook set objExcelSheets = objExcelBook.Worksheets set objExcelSheet = objExcelBook.WorkSheets(1) %> (4) 另存Excel文件 另存Excel文件可以通过以下代码来实现 <% objExcelBook.SaveAs strAddr & "templateTables.xls" %> (5) 保存Excel文件 保存Excel文件可以通过以下代码来实现: <% objExcelBook.Save %> (6) 退出Excel操作 <%

Excel实用操作技巧大全(图文详细版)

Excel决定企业存亡 决定企业命运的因素很多,人才、管理、资金、产品、市场……对于这些,很多人都知道。殊不知,玩不玩得好Excel,也能决定企业命运。何以见得,这就得从Excel的本质说起。不少人认为,它只是个“电子笔记本”,无非是取代了以往的纸质笔记本,用来记点数据而已。如果这样想,也这样用,那就大错特错了。只是“电子笔记本”的话,MS Office怎么可能成为全球企业通用的办公软件? 那么—— Excel是什么?它是挖掘数据背后意义的工具。 数据是什么?是企业经营决策的依据,也是企业的命脉。 举个例:阿童木办了家公司卖设备,投入仅有的100万买了A、B各100套设备。一年下来发现,A设备卖了90套,B设备卖了0套。阿童木明年应该怎么办? 抛开各种复杂的市场分析,按照小学数学教的简单加减法逻辑。既然A卖的好,自然是进货接着卖;B一台都卖不出去,就要想办法清仓减价大处理,回笼资金后转而考虑加强A,以及引进新的产品C。好啦,下了订单买90套A,消息也放出去了,要对B进行清仓处理。就在此时,销售部说:不好意思,数据做错了,其实是A卖了0套,B卖了90套。Oh my Lady Gaga!后果可想而知。 这当然是一个极端的例子。可是,我们身边又何尝不是天天在出现类似的问题。数据错误造成的直接损失、纠错成本及其他负面影响不可小视,却在被很多人忽视。

有人说:你手工做当然会错,咱们用系统的没这困扰。我不敢苟同。近几年市场上出现了一个新名词:BI。全称:Business Intelligence(商业智能)。它是一套系统,可以将企业中现有的数据转化为知识,为企业做出明智的业务经营决策提供依据。之所以会有BI的横空出世,说明传统的企业系统,无论是ERP、WMS 还是CRM,更多解决了数据的Input(输入),而不能提供完全满足需求的个性化Output(输出)。从技术层面上讲,商业智能也不是什么新技术,它只是数据仓库、OLAP和数据挖掘等技术的综合运用。而对于Excel 来说,只要源数据足够优秀,应付大多数企业的数据挖掘需求,那是小菜一碟。谁让它就是专门干这个的呢,桌面数据处理之王可不是吹的。 回想一下,有哪一位老板点点鼠标,根据系统生成的基础报表就能做决策。通常不都是各部门整理数据,出具手工制作的数据分析报告。有系统也好,没系统也罢,投影在会议室幕墙上的数据分析结果,大多是Excel 的杰作。 说它重要,一点不为过。 2011年06月13日 Excel到底是不是小玩意儿?!我认为不是。重视Excel很必要,为什么?咱们算一笔账:一家公司有20个人,其中2个人做数据工作。但是他们不会用Vlookup和透视表,于是查找/比对和制作汇总表占用了他们全部的时间。按月薪2000元/人算,公司一年将支出48000元。而这些活儿交给懂Excel的人,能快几百倍完成。 这两样我称之为哼哈二将,不会用痛苦万分,用会了幸福百倍。对于实际的工作需求,在所有技能中,他们的重要性我给排第一。 知道多卖东西能赚钱,虽然也都知道省成本也能赚钱,但真正关注成本的企业却不多,尤其在对待Excel这件事上。如果半个能人的活要2个人来做,成本就会增加。36000元的成本对于一家产品毛利10%的企业,意味着36万的销量增长。相比增加销量,恐怕还是省钱来的容易些。 -------------------------------------------------------------------------------------------------- 博友们说: @简约力——太有同感了!往往从ERP捞出的资料相对分散,用一下Vlookup-->然后透视表一下-->照相机再拍--->交给画图并红圈标出重点-->邮件发出-->再用Excel记下本次重点-->下个月再一次这样循环。 @MrExcel——确实如此,从另一个角度来讲,对Excel 各种功能的错误理解和误用可能会给组织造成巨大的财务和社会形象损失。这个网站列举了很多关于这方面的案例,https://www.360docs.net/doc/934836139.html,/h44NaI。对于组织的管理者,是不是会突然觉得:Excel管理深度应用培训并不是可有可无的投资?对员工进行Excel等办公软件的培训和对员工进行设备的熟练操作的培训性质是一样的,都可以达到提高工作效率,提高工作(产品)质量的目的。 @熊饼饼——还好我会Vlookup和透视表。。。

asp写入excel

<%@ LANGUAGE="VBSCRIPT" %> <%option explicit%> 生成EXCEL文件 生成EXCEL文件


<% if Request("act") = "" then Response.Write "生成EXCEL文件" else dim conn,strconn strconn="driver={SQL Server};server=xxx;uid=sa;pwd=;database=DB_Test" set conn=server.CreateObject("adodb.connection") conn.Open strconn dim rs,sql,filename,fs,myfile,x Set fs = server.CreateObject("scripting.filesystemobject") '--假设你想让生成的EXCEL文件做如下的存放 filename = Server.MapPath("online.xls") '--如果原来的EXCEL文件存在的话删除它 if fs.FileExists(filename) then fs.DeleteFile(filename) end if '--创建EXCEL文件 set myfile = fs.CreateTextFile(filename,true) Set rs = Server.CreateObject("ADODB.Recordset") '--从数据库中把你想放到EXCEL中的数据查出来 sql = "select * from Tb_Execl order by sort desc" rs.Open sql,conn if rs.EOF and rs.BOF then Response.Write "库里暂时没有数据!"

Excel使用技巧大全(经典超全)

经典 Excel 2007使用技巧集锦——168种技巧 目录 一、基本方法7 1.快速选中全部工作表7 2.快速启动E XCEL7 3.快速删除选定区域数据 8 4.给单元格重新命名8 5.在E XCEL中选择整个单元格范围9 6.快速移动/复制单元格9 7.快速修改单元格式次序 9 8.彻底清除单元格内容10 9.选择单元格10 10.为工作表命名11 11.一次性打开多个工作簿 11 12.快速切换工作簿13 13.选定超级链接文本(微软O FFICE技巧大赛获奖作品)14 14.快速查找14 15.修改默认文件保存路径 14 16.指定打开的文件夹15 17.在多个E XCEL工作簿间快速切换15 18.快速获取帮助16 19.创建帮助文件的快捷方式16 20.双击单元格某边移动选定单元格16

21.双击单元格某边选取单元格区域17 22.快速选定不连续单元格 17 23.根据条件选择单元格18 24.复制或移动单元格18 25.完全删除E XCEL中的单元格18 26.快速删除空行19 27.回车键的粘贴功能19 28.快速关闭多个文件20 29.选定多个工作表20 30.对多个工作表快速编辑 20 31.移动和复制工作表21 32.工作表的删除21 33.快速选择单元格22 34.快速选定E XCEL区域(微软O FFICE技巧大赛获奖作品)22 35.备份工件簿22 36.自动打开工作簿23 37.快速浏览长工作簿23 38.快速删除工作表中的空行23 39.绘制斜线表头24 40.绘制斜线单元格25 41.每次选定同一单元格26 42.快速查找工作簿26 43.禁止复制隐藏行或列中的数据27 44.制作个性单元格27 二、数据输入和编辑技巧28 1.在一个单元格内输入多个值 28 2.增加工作簿的页数28 3.奇特的F4键29 4.将格式化文本导入E XCEL29

Excel使用技巧大全(超全)

Excel 使用技巧集锦——163种技巧 目录 一、基本方法7 1.快速选中全部工作表7 2.快速启动E XCEL7 3.快速删除选定区域数据 7 4.给单元格重新命名7 5.在E XCEL中选择整个单元格范围7 6.快速移动/复制单元格8 7.快速修改单元格式次序 8 8.彻底清除单元格内容8 9.选择单元格8 10.为工作表命名9 11.一次性打开多个工作簿 9 12.快速切换工作簿9 13.选定超级链接文本(微软O FFICE技巧大赛获奖作品)10 14.快速查找10 15.修改默认文件保存路径 10 16.指定打开的文件夹10 17.在多个E XCEL工作簿间快速切换10 18.快速获取帮助11 19.创建帮助文件的快捷方式11 20.双击单元格某边移动选定单元格11 21.双击单元格某边选取单元格区域11 22.快速选定不连续单元格 11 23.根据条件选择单元格11 24.复制或移动单元格12

25.完全删除E XCEL中的单元格12 26.快速删除空行12 27.回车键的粘贴功能12 28.快速关闭多个文件12 29.选定多个工作表12 30.对多个工作表快速编辑 13 31.移动和复制工作表13 32.工作表的删除13 33.快速选择单元格13 34.快速选定E XCEL区域(微软O FFICE技巧大赛获奖作品)13 35.备份工件簿14 36.自动打开工作簿14 37.快速浏览长工作簿14 38.快速删除工作表中的空行14 39.绘制斜线表头14 40.绘制斜线单元格15 41.每次选定同一单元格15 42.快速查找工作簿15 43.禁止复制隐藏行或列中的数据15 44.制作个性单元格16 二、数据输入和编辑技巧16 1.在一个单元格内输入多个值 16 2.增加工作簿的页数16 3.奇特的F4键16 4.将格式化文本导入E XCEL16 5.快速换行17 6.巧变文本为数字17 7.在单元格中输入0值17 8.将数字设为文本格式18

Asp连接读取excel内容并导入到数据库

Asp连接读取excel内容并导入到数据库asp连接excel Set connnew = Server.CreateObject("ADODB.Connection") 'hdr取值yes,no ,表示第一行是否为字段名 connStr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath(“test.xls”)&";Extended Properties='Excel 8.0;HDR=No;IMEX=1';" connnew.open connstr Set rsnew=Server.CreateObject("ADODB.Recordset") 'Sheet1为excel里面的表名,表名后面一定要加$ sqlnew = "select * from [Sheet1$]" rsnew.open sqlnew,connnew,1,1 'rows是读取的excel里面数据的行数 rows=rsnew.recordcount 'cells是读取excel里面数据的列数 cells=rsnew.Fields.Count 输出记录集rsnew里面的数据,规则是这样的: 如果HDR赋值是No的话 rsnew(0)输出的是excel里第一行第一列的内容 如果HDR赋值是Yes的话 rsnew(0)输出的是excel里第二行第一列的内容

如果想输出第二行的内容,只需在语句前加rsnew.movenext 输出就这么简单的完成了! 连接网站数据库,相信各位程序猿都已经会了。要做的就是用sql语句判断要导入的数据是否存在,存在用update修改一下。不存在的话addnew重新插入一条即可。 如果想要实现上传excel后导入的话,可以加上一个上传程序,将上传后的excel 路径传输到asp连接excel的字符串里面。 asp读取excel并导入数据库就完成了,如果有不明白的可以联系作者! 注意事项 ? 注意excel里的表名是不是Sheet1.不是话注意和程序保持一致 程序只适合固定模板excel使用。如果excel格式不同,无法使用这个程序统一导入。

ASP生成Excel文件方法

ASP生成Excel文件方法 方法一:导出到csv文件,存放在服务器端任一路径,然后给客户下载优点: 1、可以进行身份认证后给客户下载,如果放到非web目录就没有对应的url,客户无法随时下载。 2、也是因为生成了文件,所以占用了服务器的空间,但是可以把文件名存放到数据库,再次给客户下载的时候不需要重复生成文件。 3、csv文件是文本文件,逗号隔开字段,回车隔开行,易于数据导入导出。 实现方法: SqlConnection conn=new SqlConnection("conn"]); SqlDataAdapter da=new SqlDataAdapter("select*from tb1",conn); DataSet ds=new DataSet(); da.Fill(ds,"table1"); DataTable dt=ds.Tables["table1"]; string name="downloadurl"].ToString()+"yyyyMMdd")+new Random(".csv";//存放到web.config中downloadurl指定的路径,文件格式为当前日期+4位随机数 FileStream fs=new FileStream(name,FileMode.Create,FileAccess.Write); StreamWriter sw=new StreamWriter(fs,"gb2312")); sw.WriteLine("自动编号,姓名,年龄"); foreach(DataRow dr in dt.Rows) { sw.WriteLine(dr["ID"]+","+dr["vName"]+","+dr["iAge"]); } sw.Close();

Excel操作技巧大全II

Excel操作技巧大全II-----数据输入和编辑技巧 2.2.1 在一个单元格内输入多个值我们有时需要在某个单元格内连续输入多个数值,以查看引用此单元格的其他单元格的效果。但每次输入一个值后按回车键,活动单元格均默认下移一个单元格,非常不便。其实可以采用以下方法:单击鼠标选定单元格,然后按住Ctrl键再次单击鼠标选定此单元格,此时,单元格周围将出现实线框,再输入数据,敲回车键就不会移动了。 2.2.2 增加工作簿的页数单击“插入→工作表”命令,即可在底部看到一个新名称的工作表。 2.2.3 奇特的F4键Excel中有一个快捷键的作用极其突出,那就是F4键。作为“重复”键,F4键可以重复前一次操作,在很多情况下起作用,比如在工作表内加入或删除一行,然后移动插入点并按下F4键以加入或删除另一行,根本不需要使用菜单。 2.2.4 将格式化文本导入Excel 1.在Windows“记事本”中输入格式化文本,每个数据项之间会被空格隔开,当然你也可以用逗号、分号、Tab键作为分隔符。输入完成后,保存此文本文件并退出; 2.在Excel 中打开刚才保存的文本文件,出现“文本导入向导-3步骤之1”对话框,选择“分隔符号”,单击“下一步”; 3.在“文本导人向导-3步骤之2”对话框中选择文本数据项分隔符号,Excel提供了Tab键、分号、逗号以及空格等供你选择。注意,这里的几个分隔符号选项应该单选。你在“预览分列效果”中可以看到竖线分隔的效果。单击“下一步”; 4.在“文

本导人向导-3步骤之3”对话框中,你可以设置数据的类型,一般不需改动,Excel自动设置为“常规”格式。“常规”数据格式将数值转换为数字格式,日期值转换为日期格式,其余数据转换为文本格式。单击“完成”按钮即可。 2.2.5 快速换行我们在使用Excel制作表格时经常会遇到需要在一个单元格输入一行或几行文字的情况,如果输入一行后敲回车键就会移到下一单元格,而不是换行,有一个简便实用的操作方法可以实现换行:在选定单元格输入第一行内容后,在换行处按“Alt+回车键”,即可输入第二行内容,再按“Alt+回车键”输入第三行以此类推。 2.2.6 巧变文本为数字在工作中,发现一些通过文本文件或其它财务软件的数据导入Excel中后居然是以文本形式存在的(数字默认是右对齐,而文本是左对齐的),即使是重新设置单元格格式为数字也无济于事。有一个办法可以快速地将这些文件转变回数字:在空白的单元格中填人数字1,然后选中这个单元格,执行“复制”命令,然后再选中所要转换的范围,选择“选择性粘贴”中的“乘”,你就会发现它们都变为数字了。 2.2.7 在单元格中输入0值一般情况下,在Excel表格中输入诸如“05”、“4.00”之类数字后,只要光标一移出该单元格,格中数字就会自动变成“5”、“4”,Excel默认的这种做法让人使用非常不便,我们可以通过下面的方法来避免出现这种情况:先选定要输入诸如“05”、“4.00”之类数字的单元格,鼠标右键单击,在弹出的快捷菜单中单击“设置单元格格式”,在接着出现的界面中选“数字”标签页,在列表框

ASP用模板生成Excel、Word

用模板生成Excel、Word最大优点: Word、Excel文档样式易于控制和调整,以往用Excel.Application来生成Excel、Word,需要写很多代码来控制排版的样式,用模版几乎不受任何限制,只需要打开word或Excel,编辑文档,选择"文件->另存为web页",即可方便的做好模板,用office生成的模板要比直接在DW中做好模板更加符合office偏好,生成后文件样式可与原word、Excel格式99%一样,因此建议大家用office(office97~office2003)直接来生成模板框架。 主要的代码 function.asp 复制内容到剪贴板代码: <% ''开启容错机制 on error resume next '功能,检测服务器是否支持指定组件 Function object_install(strclassstring) on error resume next object_install=false dim xtestobj set xtestobj=server.createobject(strclassstring) if -2147221005 <> Err then object_install=true set xtestobj=nothing end function if object_install("Scripting.FileSystemobject")=false then Response.Write "

对不起,您的空间不支持FSO组件,请与管理员联系!
" Response.End end if if object_install("adodb.stream")=false then Response.Write "
对不起,您的空间不支持adodb.stream功能,请与管理员联系!
" Response.End end if '----------------------------------------------------------------------------- '函数名称:ReadTextFile '作用:利用AdoDb.Stream对象来读取文本文件 '参数:FileUrl文件相对路径,FileCharSet:文件编码 Function ReadFromTextFile (FileUrl,FileCharSet)'函数 dim str set stm=server.CreateObject("adodb.stream") stm.Type=2 '指定或返回的数据类型, stm.mode=3 '指定打开模式,现在为可以读写模式,类似于word的只读或锁定功能

在ASP中怎么把页面中的数据导出到EXCEL

使用asp怎样将数据导出到excel文件 Web 注意:两个函数中的“data“是网页中要导出的table的 id 导出到Excel代码 导出到Word代码