asp操作Excel的方法

合集下载

用ASP连接数据库的几种方法

用ASP连接数据库的几种方法用ASP连接DBF、DBC、MDB、Excel、SQL Server型数据库的方法：一、ASP的对象存取数据库方法在ASP中，用来存取数据库的对象统称ADO〔Active Data Objects〕，主要含有三种对象：Connection、Recordset 、CommandConnection：负责打开或连接数据Recordset：负责存取数据表Command：负责对数据库执行行动查询命令二、连接各数据库的驱动程序连接各数据库可以使用驱动程序，也可以使用数据源，不过我建议大家使用驱动程序，因为使用驱动程序非常方便、简单，而使用数据源比较麻烦。

驱动程序适用数据库类型Microsoft.Jet.OLEDB.4.0 MdbMicrosoft Access Driver AccessMicrosoft dBase Driver DbaseMicrosoft Excel Driver ExcelMicrosoft Visual FoxPro Driver DbcSQLOLEDB.1 SQL srver7.0而我们在一般情况下使用Access的数据库比较多，在这里我建议大家连接Access数据库使用下面的方法：dim connset conn = server.createobject("adodb.connection")conn.open = "provider=microsoft.jet.oledb.4.0;" & "data source = " &server.mappath("../db/bbs.mdb")其中../db/bbs.mdb是你的数据库存放的相对路径！如果你的数据库和ASP文件在同一目录下，你只要这样写就可以了：dim connset conn = server.createobject("adodb.connection")conn.open = "provider=microsoft.jet.oledb.4.0;" & "data source = " & server.map path("bbs.mdb")有许多初学者在遇到数据库连接时总是会出问题，然而使用上面的驱动程序只要你的数据库路径选对了就不会出问题了ASP连接数据库的5种方法第一种 - 这种方法用在ACCESS中最多strconn = "DRIVER=Microsoft Access Driver (*.mdb);DBQ=" _& Server.MapPath("aspfree.mdb")set conn = server.createobject("adodb.connection")conn.open strconn第二种－这种方法用在SQL SERVER中多strconn = "Driver={SQL Server};Description=sqldemo;SERVER=127.0.0.1;" _ &"UID=LoginID;Password=;DATABASE=Database_Name"set conn = server.createobject("adodb.connection")conn.open strconn第三种strconn="Driver={Microsoft Access Driver(*.mdb)};" _&"DBQ=F:\Inetpub\wwwroot\somedir\db1.mdb;DefaultDir=" _&"f:\Inetpub\wwwroot\somedir;uid=LoginID;" _&"pwd=Password;DriverId=25;FIL=MSAccess;"set conn = server.createobject("adodb.connection")conn.open strconn第四种运用系统数据源The following uses a Data Source Name: Exampleset conn = server.createobject("adodb.connection")conn.open "Example"第五种运用ODBC数据源，前提是你必须在控制面板的ODBC中设置数据源set rs = server.createobject("adodb.recordset")rs.open "tblname", "DSNName", 3, 3 第一种 - 这种方法用在ACCESS中最多strconn = "DRIVER=Microsoft Access Driver (*.mdb);DBQ=" _& Server.MapPath("aspfree.mdb")set conn = server.createobject("adodb.connection")conn.open strconnASP访问数据库的方式有哪些?在ASP中可以通过三种方式访问数据库：1、IDC〔Internet Database Connector〕方式；2、ADO〔ActiveX Data Objects〕方式；3、RDS〔Remote Data Service〕方式。

探索服务器端Excel数据处理：ASP与ADODB的协同

探索服务器端Excel数据处理：ASP与ADODB的协同《探索服务器端Excel数据处理：ASP与ADODB的协同》在当今数字化时代，数据的处理和分析变得尤为重要。

尤其是在服务器端，处理Excel文件成为了一项常见且关键的任务。

本文将深入探讨如何使用ASP（Active Server Pages）和ADODB（ActiveX Data Objects）技术来处理上传的Excel文件，实现数据的有效管理和操作。

一、ASP与ADODB：服务器端数据处理的基石ASP作为一种服务器端脚本环境，能够与数据库进行交互，处理客户端请求，生成动态网页。

而ADODB则提供了一种与数据源进行交互的途径，使得在服务器端处理数据成为可能。

二、Excel文件的服务器端读取在服务器端读取Excel文件，首先需要确保文件的路径正确，然后通过ADODB连接对象建立与Excel文件的连接。

使用特定的连接字符串，可以指定Excel文件作为数据源，并设置相应的属性以适应不同的Excel版本。

三、数据的提取与处理一旦连接建立，就可以使用ASP脚本执行SQL查询，从Excel文件中提取数据。

通过遍历结果集，可以逐行读取数据，为进一步的处理和分析做准备。

四、数据的插入与数据库操作获取数据后，常见的操作是将这些数据插入到数据库中。

通过构建合适的SQL语句，可以将Excel中的数据导入到数据库表中，实现数据的持久化存储。

五、性能优化与错误处理在处理Excel文件时，性能优化和错误处理是不可忽视的环节。

合理的资源管理和错误捕捉机制，能够确保数据处理的稳定性和可靠性。

六、结语：ASP与ADODB的协同优势通过ASP和ADODB的协同工作，服务器端的Excel数据处理变得高效且灵活。

这种技术组合不仅提高了数据处理的自动化水平，还为数据驱动的Web应用提供了强大的支持。

Aspose操作大全

名称
值类型
说明
返回 void
说明
1.2.12 Replace 在工作表中替换符合要求单元格值 void Worksheet.Replace(oldString, newString); 名称值类型说明
oldString string 要替换字符串（完全相等） newString string 替换字符串
返回 void
说明
1.2.3 ClearComments 清除所有批注 void Worksheet.ClearComments(); 名称值类型说明
返回 void
说明
1.2.4 Copy 清除所有批注 void Worksheet.Copy(sourcesheet); 名称值类型说明
sourcesheet Workbook 工作表源
freezedColumns int
返回 void
说明
1.2.7 GetSelectedRanges 获取当前光标停留的单元格 ArrayList Worksheet.GetSelectedRanges() 名称值类型说明
返回 System.Collections.ArrayList
说明
1.2.8 Move 获取当前光标停留的单元格 void Worksheet.Move(index) 名称值类型说明 index int 移动至索引序号
sourceColumn destRow destColumn
int int int
源列标目的地行标目的地列标
返回 void
说明
1.2.6 CopyConditionalFormatting 冻结窗格 void Worksheet.FreezePanes(cellName,freezedRows,freezedColumns) or (Row,Column,freezedRows,freezedColumns); +2 名称值类型 cellName freezedRows string 单元格名称;例：B2 int 冻结行(项标显示行数，如果行数大于 freezedRows，超出行隐藏) 冻结列(左标显示列数，如果列数大于 freezedColumns，超出列隐藏) Row Column int int 行标列标说明

asp实现excel中的数据导入数据库

hang=hang+1
loop
rse.movefirst
do while not rse.eof
setrst=server.CreateObject("adodb.recordset")
sqlt="select * fromSellman"
rst.opensqlt,conn,1,3
rst.addnew()
objConn.OpenstrConn
strSql="SELECT * FROM [Sheet1$]"
objRS.OpenstrSql,objConn,1,1
objRS.MoveFirst
%><%
'循环excel中所有记录
while not objRS.eof
setrs=Server.CreateObject("Adodb.Recordset")
'查询语句
sql_s= "select * fromceshiwherelname='"&objRS(0) & "' and old='"&objRS(1) & "' and sex='"&objRS(2) & "' andguojia='"&objRS(3) & "' and QQ='"&objRS(4) & "'"
rst("Homepage")=c2(rse(8))

Aspose.cell中的Excel模板导出数据

Aspose.cell中的Excel模板导出数据//Excel模板导数据(Eexcel中根据DataTable中的个数，给多个Sheet中的模板赋值) dict中模板设置 &=$qyear datatable中设置 &=dtName.cloumnName public void DataSetToManyExcel(string fileName, string fileUrl, Page page, DataSet my_ds, Dictionary<string, string> dict = null, params int[] columns){WorkbookDesigner wbookdesiger = new WorkbookDesigner();wbookdesiger.Open(fileUrl); //打开模板try{if (my_ds.Tables.Count > 0){for (var i = 0; i < my_ds.Tables.Count; i++){//设置DataTablewbookdesiger.SetDataSource(my_ds.Tables[i]);//设置变量if (dict != null){foreach (var di in dict)wbookdesiger.SetDataSource(di.Key, di.Value);}wbookdesiger.Process(i, false);//清除数据源wbookdesiger.ClearDataSource();} if (columns.Length > 0) { Style style = wbookdesiger.Workbook.Styles[wbookdesiger.Workbook.Styles.Add()];//新增样式 style.IsTextWrapped = true;//⽂本换⾏样式\n columns.ForEach(c => { var cells = wbookdesiger.Workbook.Worksheets[0].Cells[c]; cells.SetStyle(style); }); }fileName = System.Web.HttpUtility.UrlEncode(fileName, System.Text.Encoding.UTF8) + ".xls";wbookdesiger.Save(fileName, SaveType.OpenInExcel, FileFormatType.Excel2003, page.Response);page.Response.End();}}catch (Exception ex){throw ex;}}//Excel模板导数据(Eexcel中根据DataTable中的个数，复制第⼀个Sheet中的模板，然后分别赋值)public void DataSetToOneExcel(string fileName, string fileUrl, Page page, DataSet my_ds, string tabName = "", Dictionary<int, string> my_dic = null){WorkbookDesigner my_designer = new WorkbookDesigner();my_designer.Open(fileUrl);//打开⽂件Workbook my_workbook = my_designer.Workbook;try{if (my_ds.Tables.Count > 0){//给表格赋值for (var i = 0; i < my_ds.Tables.Count; i++){var temp = i + 1 >= my_ds.Tables.Count ? i : i + 1;//TableNameif (i == 0)my_ds.Tables[i].TableName = tabName != "" ? tabName : "dt";elsemy_ds.Tables[temp].TableName = tabName != "" ? tabName + i : "dt" + temp;my_workbook.Worksheets.AddCopy(0);//复制前⼀个Sheet模板my_workbook.Worksheets[i + 1].Replace(my_ds.Tables[0].TableName, my_ds.Tables[temp].TableName);//替换当前Sheet的下个Sheet的TableName my_designer.SetDataSource(my_ds.Tables[i]);my_designer.Process(i, false);my_designer.ClearDataSource();}//删除最后⼀个sheetmy_workbook.Worksheets.RemoveAt(my_workbook.Worksheets.Count - 1);//给Sheet的Name赋值if (my_dic != null){for (var i = 0; i < my_workbook.Worksheets.Count; i++){foreach (var dd in my_dic){if (i == dd.Key)my_workbook.Worksheets[i].Name = dd.Value;}}}fileName = System.Web.HttpUtility.UrlEncode(fileName, System.Text.Encoding.UTF8) + ".xls";my_designer.Save(fileName, SaveType.OpenInExcel, FileFormatType.Excel2003, page.Response);page.Response.End();}}catch (Exception ex){throw ex;}}补充：当表格数据列是动态的时候，显然模板就不⼤适⽤了，这时候我们可以使⽤Apose.Cells的填充⽅法Aspose.Cells.WorkbookDesigner wbookdesiger = new Aspose.Cells.WorkbookDesigner();wbookdesiger.Open(fileUrl); //打开模板//wbookdesiger.SetDataSource(dt);//wbookdesiger.Process();//数据渲染var workbook = wbookdesiger.Workbook;//最后合成⼀个DT来，⼀个合成的动态数据表Aspose.Cells.Cell cell = workbook.Worksheets[0].Cells.FindString("#$DATATABLE$#", null, true);//模板中的列，找出模板中固定的单元格if (cell != null){workbook.Worksheets[0].Cells.ImportDataTable(dt, true, );}int temp = 0; //合并单元格while (temp < dt.Rows.Count){var rows = dt.Select(" 序号=" + dt.Rows[temp]["序号"]);workbook.Worksheets[0].Cells.Merge(1 + temp, 0, rows.Length, 1);workbook.Worksheets[0].Cells.Merge(1 + temp, 1, rows.Length, 1);workbook.Worksheets[0].Cells.Merge(1 + temp, 2, rows.Length, 1);workbook.Worksheets[0].Cells.Merge(1 + temp, 3, rows.Length, 1);workbook.Worksheets[0].Cells.Merge(1 + temp, 4, rows.Length, 1);workbook.Worksheets[0].Cells.Merge(1 + temp, 11, rows.Length, 1);workbook.Worksheets[0].Cells.Merge(1 + temp, 12, rows.Length, 1);workbook.Worksheets[0].Cells.Merge(1 + temp, 13, rows.Length, 1);temp += rows.Length;}var sheet = workbook.Worksheets[0];var cells = sheet.Cells;int columnCount = cells.MaxColumn; //获取表页的最⼤列数int rowCount = cells.MaxRow; //获取表页的最⼤⾏数//适应列宽for (int col = 0; col < columnCount; col++){sheet.AutoFitColumn(col, 0, rowCount);}for (int col = 0; col < columnCount; col++){cells.SetColumnWidthPixel(col, cells.GetColumnWidthPixel(col) + 30);}//表格线Aspose.Cells.Style style = workbook.Styles[workbook.Styles.Add()];style.Borders[Aspose.Cells.BorderType.TopBorder].LineStyle = Aspose.Cells.CellBorderType.Thin;style.Borders[Aspose.Cells.BorderType.TopBorder].Color = System.Drawing.Color.Black;style.Borders[Aspose.Cells.BorderType.BottomBorder].LineStyle =Aspose.Cells. CellBorderType.Thin;style.Borders[Aspose.Cells.BorderType.BottomBorder].Color = System.Drawing.Color.Black;style.Borders[Aspose.Cells.BorderType.LeftBorder].LineStyle = Aspose.Cells.CellBorderType.Thin;style.Borders[Aspose.Cells.BorderType.LeftBorder].Color = System.Drawing.Color.Black;style.Borders[Aspose.Cells.BorderType.RightBorder].LineStyle =Aspose.Cells.CellBorderType.Thin;style.Borders[Aspose.Cells.BorderType.RightBorder].Color = System.Drawing.Color.Black;Aspose.Cells.Range wstrange = sheet.Cells.CreateRange(0, 0, sheet.Cells.MaxRow + 1, sheet.Cells.MaxColumn + 1);Aspose.Cells.StyleFlag stFlag = new Aspose.Cells.StyleFlag();stFlag.All = true;wstrange.ApplyStyle(style, stFlag);var stream = workbook.SaveToStream();return File(stream.ToArray(), "application/octet-stream", "xxxx.xls");。

点聚weboffice 6.0 ASP.NET 在线Word,excel,wps编辑控件

点聚weboffice 6.0 在线Word,excel,wps编辑控件WebOffice是一款由北京点聚信息技术有限公司提供的完全免费（商业用途也免费）且功能强大的在线Word/excel/wps编辑辅助控件，可以实现：1.在线编辑Word、Excel、PPT、WPS... ...2.全面支持MS Office的界面定制,包括对于Office2007的全面支持3.修订留痕4.限制打印、保存、复制5.直接保存到服务器，支持标准Http Post协议6.强大的书签管理7.套红、文档保护8.模板管理9.其他功能扩展点聚WebOffice是基于客户端的ocx控件，它的功能是将Office文档（Word、Excel、WPS）嵌入到浏览器中，并调用Office中各种接口，完成文档编辑工作，然后使用控件的Http 接口模拟表单提交，发送到数据处理页面（此文档举例为saveDoc.asp页，代码见演示文件），完成文档的存档工作。

在本地测试的时后，首先要安装插件和证书WebOffice_Setup.exe和孙小钢.pfx，然后用VS来运行示例，不要直接打开HTML，那样会报错的webOffice控件自动下载是指在打开网页时，网页会自动把webOffice控件下载下来，从而可以将word、excel嵌入到网页中。

控件自动下载的相关代码如下：< object id=WebOffice height=768 width="100%"style="LEFT: 0px; TOP: 0px"classid="clsid:E77E049B-23FC-4DB8-B756-60529A35FAD5" codebase="../js/WebOffice1.ocx#version=6,0,4,0"><param name="_ExtentX" value="6350"><param name="_ExtentY" value="6350">object>上面的脚本意思是：自动更新classid=FF1FE7A0-0578-4FEE-A34E-FB21B277D561 的COM组件，更新地址为../js/WebOffice1.ocx，codebase后的路径为相对路径也可为绝对路径,要更新的最新版本为6,0,4,0。

ASP对数据库的操作

ASP对数据库的操作ASP（Active Server Pages）是一种用于创建动态网页的编程技术，它可以通过与数据库进行交互来动态地显示、检索、更新和删除数据。

在下面的文章中，将介绍ASP对数据库的操作的一些常见技术和方法。

一、数据库连接在ASP中，连接到数据库是第一步。

可以使用以下步骤进行数据库连接：1. 引用ADO库：ADO（ActiveX Data Objects）是一种用于访问数据库的COM组件。

因此，首先需要在ASP页面的开头引用ADO库，例如：```asp```2. 创建Connection对象：使用以下代码创建一个Connection对象：```aspDim connSet conn = Server.CreateObject("ADODB.Connection")```3. 打开数据库连接：使用Open方法打开数据库连接，并指定数据库驱动程序和连接字符串，例如：```aspconn.Open "DRIVER={SQLServer};SERVER=server_name;DATABASE=db_name;UID=user_name;PWD=pa ssword;"```二、查询数据一般来说，查询数据是ASP对数据库进行的最常见的操作之一、可以使用以下步骤查询数据库：1. 创建Recordset对象：使用以下代码创建一个Recordset对象：```aspDim rsSet rs = Server.CreateObject("ADODB.Recordset")```2. 执行SQL语句：使用Open方法执行SQL语句，并使用Recordset 对象接收返回的数据，例如：```asprs.Open "SELECT * FROM table_name", conn```3. 读取数据：使用MoveNext和EOF方法循环读取Recordset对象的数据，例如：```aspDo While Not rs.EOFResponse.Write rs("column_name")rs.MoveNextLoop```4. 关闭Recordset对象：使用Close方法关闭Recordset对象，例如：```asprs.CloseSet rs = Nothing```三、插入数据除了查询数据，ASP还可以向数据库中插入数据。

asaputilities使用手册

ASAP Utilities是一款功能强大的Excel插件，提供了丰富的功能和工具，可以大大提高我们在Excel中的工作效率。

它包含了超过300多个功能，涵盖了文本、公式、筛选、数据清洗、图表、工作表、工作簿、导入导出、信息和安全等多个方面。

它的功能之多、覆盖面之广，使得它成为了Excel用户不可或缺的利器。

ASAP Utilities的使用手册包含了从基础操作到高级应用的全面指导，让用户能够轻松掌握并发挥其最大的潜力。

在使用ASAP Utilities之前，首先需要安装好这个插件。

安装完毕后，在Excel中会多出一个“ASAP Utilities”选项卡，里面包含了众多功能和工具。

在使用时，只需点击相关功能，按照提示进行相应的操作，就能轻松完成各种操作。

在ASAP Utilities的使用手册中，首先介绍基础功能的使用方法，比如在文本处理方面的操作，比如快速选取、筛选、删除重复值、添加行号等；在公式方面的操作，比如快速插入公式、转置、粘贴为值等。

然后逐步深入，介绍如何进行数据清洗和处理，比如删除空白行、合并数据、拆分内容等。

接着会介绍一些高级工具的使用方法，比如快速建立数据透视表、快速插入行列、跳转到指定单元格等。

除了基础和高级功能的介绍外，使用手册还会结合具体的案例，来展示如何利用ASAP Utilities来解决实际问题。

在处理大量数据时，如何利用ASAP Utilities来快速进行数据筛选、清洗和分析；在制作报表时，如何利用ASAP Utilities来快速生成图表和统计数据；在处理多个工作表时，如何利用ASAP Utilities来快速合并和拆分数据等等。

在文章的总结和回顾部分，我对ASAP Utilities的使用体验进行了总结。

通过使用手册的学习和实践，我深刻地体会到了ASAP Utilities的强大功能和便捷性，它大大提高了我的工作效率，让我在Excel中能够更加轻松地完成各种繁琐的操作。

1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。

大中小
楼主
asp 操作Excel的方法之前java用jxl ，.net 就不用说了。现在用easp做个web 站点，类似商城的，其中有个需求是要求对以选中的商品进行exce l 导出操作。还有一个需求是用户不想逐条后台添加商品，想要直接导入excel 文件，然后程序按字段读取后更新。一、这个站点最初的版本很有意思，excel 的导出实际上是csv格式的文件，这个比较好办，生成文本逗号分隔即可。缺点是没有格式。而批量上传则是在服务器端做存储过程，用vb写了个客户端工具。用户需要先将数据录入mdb 数据库，然后通过客户端工具“上传”。二、对于导出excel 的功能。第一次改动是将csv文件改为html 格式，并更改后缀为xls 。这样改完之后可以用excel 打开，模板也可以任意调整。但office2003 以上版本打开该文件时会弹出安全提示：要打开的文件实际类型与后缀不符。虽然不影响最终阅读，但很不人性化。三、既然是微软的excel ，那么就继续尝试，安装了微软的owc 组件。通过owc 组件进行exce l 文档生成，没想到的是，微软的owc 生成的，竟然是标准的xml格式，和第二次改动一样，只是改了个后缀。这样一来，效果和上面是一样的，也会产生安全提示。由于效果不好，这个代码也就不贴了。网上有很多，有需要的自己搜索。四、接下来，查阅了大量资料之后使用了一个方法，就是通过web 直接调用excel 的com组件进行文件读写操作。本质上讲，这个和用office 软件打开excel 文件是一样的，因此生成的效果很好。但是由于是直接调用com组件，因此需要在服务器上有相应权限。使用这个方法，在操作excel 的时候，服务器的进程中会出现excel.exe 的进程，而且在发生某
回复
引用
评分只看该用户
举报使用道具大中小
TOP
coldstone (ID: 2)
发表于: 2010-03-29 17:07:53 - IP:218.88.*.*
地板
噢。。你是用了模板。。我是直接凭空生成xls 的。。那样的话就有安全提示。。
Soul Not Found... 头衔: 创始人回复引用评分只看该用户举报使用道具大中小
TOP
xuhuan (ID: 122)
发表于: 2010-05-01 21:54:15 - IP:123.153.*.*
#4
这个可以直接编写成一个插件的话就更好了，提供一些常用接口，可以方便不少。
我的淘宝店个人博客在线代理头衔: 精灵回复引用评分只看该用户举报使用道具大中小
本帖附件 excelado.rar ( 大小:230.4 K,下载次数:73)
回复
引用
评分只看该用户
举报使用道具大中小
TOP
coldstone (ID: 2)
发表于: 2010-03-29 12:50:59 - IP:218.88.*.*
沙发
我用第四种方法生成的xls 依然有安全提示的。
Soul Not Found... 头衔: 创始人回复引用评分只看该用户举报使用道具大中小
些未知错误的时候，这个excel.exe 就可能无法退出，造成资源占用。
代码复制 - 运行
<% On Error Resume Next SuorceFile=server.mappath("book.xls")
//设置要修改的excel 文件
' 写入xls 文件 set objExcelApp = CreateObject("Excel.Application") objExcelApp.DisplayAlerts=false objExcelApp.Application.Visible=false objExcelApp.WorkBooks.add set objExcelBook = objExcelApp.ActiveWorkBook set objExcelSheets = objExcelBook.Worksheets set objExcelSheet = objExcelBook.Sheets(1) objExcelApp.WorkBooks.Open(SuorceFile) set objExcelBook = objExcelApp.ActiveWorkBook set objExcelSheets = objExcelBook.Worksheets set objExcelSheet = objExcelBook.Sheets(1) ' 存储路径 objExcelBook.SaveAs "F:\web\nBookChinese\userExcel\"&uid&"excel.xls"
/?front/thread-64-1-1[2011-2-25 14:13:22]
asp操作Excel的方法 - 第1页 - 前端及后台技术交流 - EasyASP官方交流区 - 用简单好用的ASP框架实现ASP快速开发 - Powered by bbsMax
头衔: 侠客
/?front/thread-64-1-1[2011-2-25 14:13:22]
asp操作Excel的方法 - 第1页 - 前端及后台技术交流 - EasyASP官方交流区 - 用简单好用的ASP框架实现ASP快速开发 - Powered by bbsMax
' 拼接SQL 查询语句 set rs=server.CreateObject("adodb.recordset") if etype = "marcbook" then sql="SELECT * FROM View_MARCBook WHERE MARCBookId In (" & eid & ") ORDER BY MARCBookId" end if 'response.Write(sql) rs.open sql,conn,1,1 ' 开始循环并写入到excel i=4 do while not rs.eof objExcelSheet.Range("A"&i&":J"&i).Value = Array(rs("MARCBookSN"),rs("MARCBookId"),replace(rs ("MARCBookName"),"@ 哈佛@",""),rs("Author"),rs("Publishingho"),replace(rs("IssueDate"),"21001-1","日期不详"),rs("ISBN"),rs("MARCBookPrice"),rs("Agio")&Chr(37)&Chr(40)&(100-rs("Agio"))& Chr(37)&"off"&Chr(41),rs("BookKindName")) objExcelSheet.Range("A"&i&":J"&i).HorizontalAlignment = 3 objExcelSheet.Range("A"&i&":J"&i).RowHeight = 18 objExcelSheet.Range("A"&i&":J"&i).Font.Size = 11 objExcelSheet.Range("A"&i&":J"&i).Borders(1).LineStyle = 1 objExcelSheet.Range("A"&i&":J"&i).Borders(2).LineStyle = 1 objExcelSheet.Range("A"&i&":J"&i).Borders(3).LineStyle = 1 objExcelSheet.Range("A"&i&":J"&i).Borders(4).LineStyle = 1
TOP
willgo (ID: 62)
发表于: 2010-03-29 15:06:08 - IP:59.108.*.*
板凳
这个肯定没有如果有，应该是操作方式上有差异吧。我之前用这个方式跑了几个月，后来换成虚拟主机，没权限操作了，所以使用第五种。不过我在使用第四种方法的时候，测试代码运行成功之后也是采用excel 模板的方式生成。先设置模板，然后程序读取数据库，copy模板另存，最后excel 读写。流程上和第五种微软的demo 类似，只不过直接调用excel.exe 操作。
/?front/thread-64-1-1[2011-2-25 14:13:22]
asp操作Excel的方法 - 第1页 - 前端及后台技术交流 - EasyASP官方交流区 - 用简单好用的ASP框架实现ASP快速开发 - Powered by bbsMax 头衔: 侠客
#7
Excel的操作，确实在ASP小型应用中经常用到，大大能否加入些功能？
头衔: 侠客回复引用评分只看该用户举报使用道具大中小
希望easyasp添加EXCEL 模块功能 -- by 会员 qq28289877 (2010/9/21 11:24:54)