ASP.NET应用开发程教学资源的案例6 实现信息表格形式显示

中实时图表的实现⽅法分享在对⼤批量的数据进⾏分析⽐较时，最常⽤也是最直观明了的表现⽅法莫过于绘制趋势图表。

⼀般情况下，我们利⽤EXCEL 制作各种类型的趋势图表，但它们都是基于静态数据的，即数据是事先整理好的⽽不是动态⽣成的。

如果在⽹上发布，只能将绘制好的图表以静态GIF图像发布，这⽆法从根本上满⾜不同⽤户对不同数据的需求。

ASP擅长服务器端的Web编程，操作后台数据库更是它的强项。

但是⽤ASP制作实时数据库图表有点困难，因为ASP本⾝并不⽀持图表功能，只能借助第三⽅控件进⾏开发，如VB的MSChart控件。

微软推出的.NET Framework较好地解决了这个问题。

微软在.NET平台上集成了实时数据库图表制作组件—OWC（Microsoft Office Web Components）。

通过在页⾯中调⽤OWC，我们可以轻松地绘制出各种类型的实时图表。

OWC⽀持近50种图表类型，包括曲线图、折线图、柱状图、⾯积图、K线图等。

与MSChart相⽐，OWC功能强⼤，操作简单。

此外，由于OWC是基于服务端的，⽽MSChart只能应⽤在客户端，因此在服务器端的Web开发中，MSChart要⽐OWC逊⾊不少。

下⾯笔者将结合实例来具体阐述OWC在页⾯中的应⽤，这个实例是笔者开发的项⽬《化纤产品及其原料市场分析系统》中的⼀个⼦系统，笔者在该项⽬中⽤到OWC，充分享受到了OWC的强⼤功能给开发⼯作带来的⽅便。

三层结构系统整体架构采⽤了B/S三层结构模式，将系统分为⽤户界⾯层（也称为表现层）、业务逻辑层（也称为功能层）和数据库服务层（也称为数据层），开发平台则采⽤了.NET Framework，有效地降低了系统对客户机的要求，避免了在客户机上分发应⽤程序与版本控制的困难。

●⽤户界⾯层: ⽤户界⾯采⽤的是技术。

技术的应⽤增强了系统的通⽤性，客户端只需安装IE或Netscape 等任⼀款浏览器，⽆需加载任何组件。

●业务逻辑层: 采⽤了.NET Framework调⽤OWC的技术，能够根据⽤户的要求快速取得数据库中的数据动态⽣成图表。

动态生成表格的方法之技巧动态生成表格的方法之技巧动态生成表格的方法之技巧 Table控件动态生成表格操作实例(代码调试通过).aspxpowered by <form id="Form1" method="post" runat="server"><asp:Label id="Label1" style="Z-INDEX: 101; LEFT: 256px; POSITION:absolute; TOP: 40px" runat="server"> Table控件动态生成表格操作实例</asp:Label><asp:Button id="Button1" style="Z-INDEX: 105; LEFT: 272px; POSITION:absolute; TOP: 120px" runat="server"Text="生成"></asp:Button><asp:Table id="Table1" style="Z-INDEX: 104; LEFT: 272px; POSITION:absolute; TOP: 160px" runat="server"GridLines="Both"></asp:Table><asp:DropDownList id="DropDownList2" style="Z-INDEX: 103; LEFT:344px; POSITION: absolute; TOP: 88px"runat="server"><asp:ListItem Value="1">1列</asp:ListItem><asp:ListItem Value="2">2列</asp:ListItem><asp:ListItem Value="3">3列</asp:ListItem><asp:ListItem Value="4">4列</asp:ListItem><asp:ListItem Value="5">5列</asp:ListItem></asp:DropDownList><asp:DropDownList id="DropDownList1" style="Z-INDEX: 102; LEFT:280px; POSITION: absolute; TOP: 88px"runat="server"><asp:ListItem Value="1">1行</asp:ListItem><asp:ListItem Value="2">2行</asp:ListItem><asp:ListItem Value="3">3行</asp:ListItem><asp:ListItem Value="4">4行</asp:ListItem><asp:ListItem Value="5">5行</asp:ListItem></asp:DropDownList></form>.aspx.csprivate void Button1_Click(object sender, System.EventArgs e) {int numrows;int numcells;int i=0;int j=0;int row=0;TableRow r;TableCell c;//产生表格numrows=Convert.ToInt32(DropDownList1.SelectedValue);numcells=Convert.ToInt32(DropDownList2.SelectedValue);for(i=0;i<numrows;i++){r=new TableRow();if(row/2!=0){r.BorderColor=Color.Red;}row+=1;for(j=0;j<numcells;j++){c=new TableCell();c.Controls.Add(new LiteralControl("row"+j+",cell"+i));r.Cells.Add(c);}Table1.Rows.Add(r);}}实现提取数据到table中不用服务器控件1.后台方法public string id;public string usercode;public void tbalelist(string strsql){string str = string.Empty;DBCon OAcon = new DBCon();SqlConnection myConn = new SqlConnection(OAcon.getOAcon());myConn.Open();SqlCommand sc = new SqlCommand(strsql, myConn);SqlDataReader sr = sc.ExecuteReader();if(sr.Read()){id=sr[0].T oString();usercode = sr[1].T oString();}sr.Close();myConn.Close();}2.前台<table align="center" border="0" cellpadding="5" cellspacing="1" width="100%"><tr><td class="hback" width="5%"><font color="#cc3300"><b>ID</b></font></td><td class="hback" width="10%"><font color="#cc3300"><b>张号</b></font></td></tr><tr><td class="hback" width="5%"><%= id %></td><td class="hback" width="10%"><%= usercode %></td> </tr></table>。

基于随机显示一条数据表记录的设计与实现
石明辉
【期刊名称】《计算机时代》
【年(卷),期】2009(0)7
【摘要】提出了一种基于ASRNET的随机显示一条数据表记录的方法.该方法利用Visual 2008和Microsoft SQL Server2008开发工具实现,主要使用了Visual 2008提供的SqlDataSource、FormView等控件.该方法在徐州师范大学科文学院的通识课程规范化网站开发中得到了实际应用.网站的Top 框架中运用该方法克服了传统网站中内容相对固定的不足,既方便了用户,又便于显示内容的后台动态维护.
【总页数】3页(P40-42)
【作者】石明辉
【作者单位】徐州师范大学科文学院,江苏,徐州,221116
【正文语种】中文
【中图分类】TP3
【相关文献】
1.基于随机矩阵理论的电力大数据表征方法 [J], 陈星豪;黄柳萍;陶国飞
随机考试系统的设计与实现 [J], 邵国强;孔铁臣;王涛
3.基于AM335X车辆速度显示记录系统设计与实现 [J], 余军军;王勇
4.基于中Fullcalendar日历中显示数据表信息 [J], 陈国才
5.基于的产品信息树型显示系统的设计与实现 [J], 李辉燕
因版权原因，仅展示原文概要，查看原文内容请购买。

在中进行EXCEL开发在 中进行 EXCEL 开发在显示大量数据的时候，使用 EXCEL 无疑是一个很好的选择，以网格为基本的数据单元，配合上众多的计算公式和颜色、线条可以组成功能强大而美观的数据报表。

在现代企业中，这种应用也是最为广泛的。

因此在 Web 项目中，生成并输出 EXCEL 报表也成了非常常见的功能。

但是，在 中使用 EXCEL 却一直存在着以 EXCEL 进程无法释放为代表的几个比较讨厌而且难于解决的问题，在这篇文章中将给出完整的解决方案。

其中包含以下几个方面：开发环境配置DCOM在 中进行 EXCEL 编程优化 EXCEL 的执行效率在 Web 项目中使用 EXCEL 的其他方案本文使用了下列技术：.NET、C# 或 Visual Basic .NET、Visual Studio .NET、EXCEL 本页内容开发环境本文讨论的是在 中使用 Microsoft Excel Object Library 进行开发的过程，开发环境的配置如下：Windows 2000 + SP4Office XP + SP1Visual 2003注意：在这里，请确认一下你的操作系统和Office 的版本，包括补丁的版本。

虽然在绝大多数情况下Windows2000/WindowsXP、Office2000/OfficeXP 的任意组合都能正常工作，但也确实存在同样的代码在仅仅是SP版本不同的两台机器上一个执行正常，而另一个却出现异常的情况。

所以，强烈建议使用与服务器环境完全一致的开发环境。

配置DCOM对Excel 进行编程，实际上就是通过 .Net Framework 去调用Excel 的 COM 组件，所有要在 Web 环境下调用 COM 组件的时候，都需要对其进行相应的配置。

很多朋友都反映在Windows 环境下调试正常的程序，一拿到Web 环境中就出错，实际上就是因为缺少了这一步。

下面就详细介绍 DCOM 的配置过程。

中用后台代码创建DataTable和HTML表格<%@ Page Language="C#" AutoEventWireup="true" CodeBehind="Default.aspx.cs"Inherits="WebHTML_Table._Default" %><!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" ""><html xmlns="" ><head runat="server"><title>HTML表格测试</title><style type="text/css">tr{line-height:22px;}A{color:#669966;}.table_tr_Over{background-color:#F6F6F6;}.table_tr_Out{background-color:#FFFFFF;}</style></head><body><form id="form1" runat="server"><div><asp:PlaceHolder ID="plhTable" runat="server"></asp:PlaceHolder></div></form></body></html>后台文件：using System;using System.Collections.Generic;using System.Linq;using System.Web;using System.Web.UI;using System.Web.UI.WebControls;using System.Data;using System.Web.UI.HtmlControls;namespace WebHTML_Table{public partial class _Default : System.Web.UI.Page{protected void Page_Load(object sender, EventArgs e){if (!IsPostBack){Initialize();}}/// <summary>/// 初始化/// </summary>private void Initialize(){//获取数据集DataTable tableSource = getTable();if (null == tableSource){return;}//创建HTML表格HtmlTable tableHTML = new HtmlTable();//初始化表格tableHTML.Width = "100%";tableHTML.CellPadding = 0;tableHTML.CellSpacing = 0;tableHTML.Border = 1;//HTML行HtmlTableRow rowHTML = new HtmlTableRow();//HTML单元格HtmlTableCell cellHTML = new HtmlTableCell();//HTML<A>元素HtmlAnchor AnchorHTML;//第一步：将表格的标题获取出来for (int i = 0; i < tableSource.Columns.Count; i++){cellHTML = new HtmlTableCell();cellHTML.Align = "center";cellHTML.VAlign = "middle";cellHTML.InnerHtml = "<b>" + tableSource.Columns[i].T oString() + "</b>";rowHTML.Cells.Add(cellHTML);tableHTML.Rows.Add(rowHTML);}//第二步：添加表格的内容，遍历数据集foreach (DataRow item in tableSource.Rows){//创建新的行rowHTML = new HtmlTableRow();//添加特效事件rowHTML.Attributes.Add("onmouseover","this.className='table_tr_Over'");rowHTML.Attributes.Add("onmouseout","this.className='table_tr_Out'");//依次循环tableSource中某一行的每一列，跟踪一下就明白for (int i = 0; i < tableSource.Columns.Count; i++){//创建新的元素AnchorHTML = new HtmlAnchor();AnchorHTML.HRef = "Index.aspx";//可根据item[i]或item["Name"]来获取数据AnchorHTML.InnerHtml = item[tableSource.Columns[i].T oString()].ToString();//创建新的单元格cellHTML = new HtmlTableCell();//添加元素cellHTML.Controls.Add(AnchorHTML);//添加单元格rowHTML.Cells.Add(cellHTML);}//向HTML表格中添加行tableHTML.Rows.Add(rowHTML);}//向PlaceHolder容器中添加表格plhTable.Controls.Add(tableHTML);}/// <summary>/// 获取数据集/// </summary>/// <returns></returns>private DataTable getTable(){//创建表DataTable tableInfo = new DataTable();//列DataColumn dcName = new DataColumn("Name", Type.GetType("System.String"));DataColumn dcEmail = new DataColumn("Email", Type.GetType("System.String"));DataColumn dcAddress = new DataColumn("Address", Type.GetType("System.String"));//添加列tableInfo.Columns.Add(dcName);tableInfo.Columns.Add(dcEmail);tableInfo.Columns.Add(dcAddress);for (int i = 0; i < 10; i++){//行DataRow dr = tableInfo.NewRow();dr["Name"] = "Name" + i.ToString();dr["Email"] = "Email" + i.ToString();dr["Address"] = "Address" + i.ToString(); //添加行tableInfo.Rows.Add(dr);}return tableInfo;}}}。

在 中进行EXCEL 开发在 中进行EXCEL 开发在显示大量数据的时候，使用EXCEL 无疑是一个很好的选择，以网格为基本的数据单元，配合上众多的计算公式和颜色、线条可以组成功能强大而美观的数据报表。

在现代企业中，这种应用也是最为广泛的。

因此在Web 项目中，生成并输出EXCEL 报表也成了非常常见的功能。

但是，在 中使用EXCEL 却一直存在着以EXCEL 进程无法释放为代表的几个比较讨厌而且难于解决的问题，在这篇文章中将给出完整的解决方案。

其中包含以下几个方面：开发环境配置DCOM 在 中进行EXCEL 编程优化EXCEL 的执行效率在Web 项目中使用EXCEL 的其他方案本文使用了下列技术：.NET、C# 或Visual Basic .NET、Visual Studio .NET、EXCEL 本页内容开发环境本文讨论的是在 中使用Microsoft Excel Object Library 进行开发的过程，开发环境的配置如下：Windows 2000 + SP4Office XP + SP1Visual 2003注意：在这里，请确认一下你的操作系统和Office 的版本，包括补丁的版本。

虽然在绝大多数情况下Windows2000/WindowsXP、Office2000/OfficeXP 的任意组合都能正常工作，但也确实存在同样的代码在仅仅是SP版本不同的两台机器上一个执行正常，而另一个却出现异常的情况。

所以，强烈建议使用与服务器环境完全一致的开发环境。

配置DCOM对Excel 进行编程，实际上就是通过.Net Framework 去调用Excel 的COM 组件，所有要在Web 环境下调用COM 组件的时候，都需要对其进行相应的配置。

很多朋友都反映在Windows 环境下调试正常的程序，一拿到Web 环境中就出错，实际上就是因为缺少了这一步。

下面就详细介绍DCOM 的配置过程。

1、运行“dcomcnfg”，打开DCOM 配置程序。

本文详细介绍中利用水晶报表创建图表在很多的应用程序中，报表是不可缺少的，一张好的报表能直观地让人把握数据的情况，方便决策。

在这篇文章中，我们将以一个三层结构的程序为例，介绍如何使用crystal report ，来制作一份报表，其中介绍了不少和水晶报表的技巧。

在这个例子中，我们设想的应用要为一个销售部门制作一份报表，管理者可以查看某段时间之内的销售情况，以列表或者折线图的形式反映出销售的趋势。

我们将使用SQ L Server 2000做为数据库，使用编写中间层逻辑层，而前端的表示层使用C#。

我们先来看下数据库的结构。

其中，tbitem表中存放的是每张订单中所订购的货品，tbsales存放的是每张订单，tblsalesperson是销售员表，存放该出版社的每位销售员。

接下来，使用SQL Server 2000来创建这些表。

表的结构如下所示：CREATE TABLE [dbo].[tblItem] ([ItemId] [int] NOT NULL ,[Description] [varchar] (50) NOT NULL) ON [PRIMARY]CREATE TABLE [dbo].[tblSalesPerson] ([SalesPersonId] [int] NOT NULL ,[UserName] [varchar] (50) NOT NULL ,[Password] [varchar] (30) NOT NULL) ON [PRIMARY]CREATE TABLE [dbo].[tblSales] ([SaleId] [int] IDENTITY (1, 1) NOT NULL ,[SalesPersonId] [int] NOT NULL ,[ItemId] [int] NOT NULL ,[SaleDate] [datetime] NOT NULL ,[Amount] [int] NOT NULL) ON [PRIMARY]并且用以下的代码创建表之间的约束关系。

实验报告一（第1章与Visual Studio开发平台）1.1实训创建一个简单课表查询网站1.1.1实训目的通过本实训理解网站应用程序的6个基本步骤；掌握Visual Studio集成开发环境各子窗体的使用方法，理解它们的作用；掌握在Visual Studio环境中设置和更改控件属性的基本方法1.1.2实训要求本实训假设某学校有3个班级，要求设计一个能通过IE浏览器进行各学生班级课表查询的网站1.1.3实验步骤1、设计方法分析网站由4个独立的网站组成（1个网站主页和3个班级课表页），各网页之间通过超链接建立联系。

主页中包含分别指向不同课表内容页的3个HyperLink控件，各课表内容页由包含Table控件的网页构成。

2、创建网站项目3、设计Web页面（1）请添加新的Default2.aspx页面，作为该网站的首页面。

输入页面的标题文字。

例如“曙光学校课程表查询”，在工具栏中，执行“居中”命令，使文字处于页面的水平正中位置。

用户可以像在Word中一样使用VisualStudio工具栏中的字体、字型和字号工具设置文字的格式。

（2）在Default2.aspx页面中添加一个HTML表格。

切换到设计视图，执行Visual Studio“表”菜单下的“插入表”命令，按需要设置表格为1行3列及其他参数后单击“确定”按钮。

（3）在Default2.aspx页面中，将光标分别定位到HTML的3个单元格中，双击工具箱的“标准”选项中的超链接控件图标HyperLink，将其分别添加到3个单元格中。

Default2.axpx页面设计如下图1所示：图1在表格中添加HyperLink控件（4）本实训网站除了具有系统默认创建的Default2.aspx页面外，还需要手工添加3个用于显示各班级课表的页面，即Class1.aspx、Class2.aspx和Class3.aspx。

（5）添加了Class1.aspx页面后，切换到设计视图，，参照前面的方法在页面中添加一个用户布局的HTML表格（4行5列）和内容文字。

实现直接在浏览器预览Word、Excel、PDF、Txt文件（附源码）实现直接在浏览器预览Word、Excel、PDF、Txt文件（附源码）1.功能说明输入文件路径，在浏览器输出文件预览信息，经测试360极速（Chrome）、IE9/10、Firefox通过分类文件及代码说明 DemoFiles 存放可测试文件 Default.aspx 启动页2.3.ExcelPreview.cs Excel预览类4.public static void Priview(System.Web.UI.Page p, string in FilePath, string outDirPath = '')5.word-spacing:="/" /> {6.word-spacing:="/"/> Microsoft.Office.Interop.Excel.Application excel = null;7.Microsoft.Office.Interop.Excel.Workbook xls = null;8.e xcel = new Microsoft.Office.Interop.Excel.Application();9.object missing = Type.Missing;10.object trueObject = true;11.excel.Visible = false;12.excel.DisplayAlerts = false;13.string randomName = DateTime.Now.Ticks.T oString(); //output fileName14.xls = excel.Workbooks.Open(inFilePath, missing, trueO bject, missing,15.missing, missing, missing, missing, missing, missing, m issing, missing,16.missing, missing, missing);17.//Save Excel to Html18.object format = Microsoft.Office.Interop.Excel.XlFileFo rmat.xlHtml;19.Workbook wsCurrent = xls;//(Workbook)wsEnumerato r.Current;20.String outputFile = outDirPath + randomName + '.ht ml';21.wsCurrent.SaveAs(outputFile, format, missing, missing, missing,22.missing, XlSaveAsAccessMode.xlNoChange, missing,23.missing, missing, missing, missing);24.excel.Quit();25.//Open generated Html26.Process process = new Process();eShellExecute = true;28.process.StartInfo.FileName = outputFile;29.process.Start();30.}31.PDfPreview.cs Pdf预览类1.public static void Priview(System.Web.UI.Page p, string inFilePath)2. {3. p.Response.ContentType = 'Application/pdf';4. string fileName = inFilePath.Substring(stIndexOf('') + 1);5. p.Response.AddHeader('content-disposition','filename=' + fileName);6. p.Response.WriteFile(inFilePath);7. p.Response.End();8. }TextFilePreview.cs 文本文件预览类view sourceprint?01.public static void Preview(System.Web.UI.Page p, string inFilePath)02. {03. string fileName = inFilePath.Substring(stIndexOf('') + 1);04. p.Response.ContentType = 'text/plain';05. p.Response.ContentEncoding = System.Text.Encoding.UTF8; //保持和文件的编码格式一致06. p.Response.AddHeader('content-disposition','filename=' + fileName);07. p.Response.WriteFile(inFilePath);08. p.Response.End();09. }WordPreview.cs Word预览类Readme.txt 说明了基本功能及引用Com组件的方法(首先需要安装office)，需引入的组件包括Microsoft Word 15.0 Microsoft Excel 15.0预览效果1、Word2、Excel3、Pdf4、Txt32.33.未解决的问题Pdf、txt文件只能在当前页显示，并导致后退键无效，请各位帮忙解决此两种文件和doc、xls一样在新的tab中打开。

MVC视图（显⽰数据库数据表格） MVC 视图(显⽰数据库数据表格)在这篇教程中，我⽰范了显⽰⼀系列数据库记录的两个⽅法。

我演⽰了在⼀个HTML表格中格式化⼀系列数据库记录的两个⽅法。

⾸先，我演⽰了如何直接在视图中格式化数据库记录。

接下来，我⽰范了如何在格式化数据库记录时利⽤部分类。

1.1创建模型类我们将要显⽰Movies数据库表中的⼀系列记录。

Movies数据库表包含下⾯的列：Column Name Data Type Allow NullsId Int FalseTitle Nvarchar(200)FalseDirector NVarchar(50)FalseDateReleased DateTime False为了表⽰Movies数据库表，我们将利⽤Linq to SQL作为我们的数据访问技术。

换⾔之，我们将会使⽤LINQ to SQL来绑定我们的MVC模型类。

创建⼀系列LINQ to SQL类的最快办法就是利⽤Visual Studio Object Relational Designer（Visual Studio 对象关系设计器）。

右键点击Models⽂件夹，选择“Add（添加）”，“New Item（新建项）”，选择Linq To Sql类模板，将这个类命名为Movie.dbml，并且点击Add按钮（如图1）。

图1：创建LINQ to SQL类在你创建完Movie Linq to Sql 类以后，会⽴即出现对象关系设计器。

你可以将数据库表从服务器浏览器（Server Explorer）窗⼝中拖曳到对象关系设计器中，以便创建代表着特定数据库表的Linq to Sql类。

你需要将Movies数据库表添加到对象关系设计器中（如图2）。

图2：使⽤对象关系设计器默认情况下，对象关系设计器将会试图创建⼀个类名，该类名是数据库表名的单数版本。

换⾔之，如果你有⼀个叫做Customers的数据库表，那么对象关系设计器将会创建⼀个叫做Customer的类名。

利用ASP显示Excel电子表格利用ASP显示Excel电子表格本课程演示如何在网页中显示一个 Microsoft Excel 电子表格。

如同在以前课程中那样，将使用ADO。

然而，在本课程中，您将连接到Excel 电子表格，而不是 Access 数据库。

准备将在 Active Server Page 中显示的 Excel 电子表格使用 Excel 98 或 Excel 2000，创建一个电子表格，并将其保存在x:\Inetpub\Wwwroot\Tutorial 中，文件名为 ASPTOC.xls。

创建电子表格时不要包括任何特殊的格式或列标签。

用随机数据填充一些字段。

将单元格的第一行作为列名称。

选中要在网页中显示的电子表格的行和列（在某一单元格中单击，然后沿对角线拖动鼠标选中一组单元格）。

在“插入”菜单上，选择“名称”，然后单击“定义”。

所有工作簿的名称和单元格区域都在此对话框中定义。

确保选中的单元格区域正确显示在底部。

为您的工作簿键入名称“MYBOOK”，然后选择“添加”。

无论何时改变 MYBOOK 时，请确保在“定义名称”窗口底部的“引用位置”文本框中显示了正确的单元格区域。

仅仅在新选中一组单元格后选择 MYBOOK，不会更新单元格区域。

在名称显示在工作簿列表后，单击“确定”按钮。

保存电子表格。

关闭Excel，去除对文件的锁定，以便ASP 网页可以对其进行访问。

在第3 课的示例中，将在连接字符串中指定提供程序的名称，以映射到特定的 ADO DLL。

在本示例中，将使用一个驱动程序名称，使ASP 使用此驱动程序的默认提供程序。

将下列代码复制并粘贴到文本编辑器中，将文件保存在x:\Inetpub\Wwwroot\Tutorial 目录中，文件名为“ViewExcel.asp”。

在浏览器地址栏中键入http://localhost/Tutorial/ViewExcel.asp 查看此示例。

<%@ Language=VBScript %>。

ASP生成excel表格！<%dim excelstringdim excelstrdim excelstr2dim headexcelstring = ""head = "Sn" & "," & "Reason" & "," & "Empid" & "," & "Empname" & "," & "Ext" & "," & "Depname" excel="creat"If excel<>"" ThenSet rs2 = Server.CreateObject ("ADODB.Recordset")sql2 = "Select * from value_table "rs2.open sql2,conn,1,3do while not rs2.eofexcelstr =" " & rs2(0) & """,""" & rs2(1) & """,""" & rs2(2) & """,""" & rs2(3) & """,""" & rs2(4) & """,""" & rs2(5) & """"excelstr2 = excelstr2 & Chr(13) & excelstrrs2.movenextloopexcelstring = head &Chr(13)& excelstr2'response.Write(excelstring)'rs2.closeSet rs2=Nothingset fs = CreateObject("scripting.FileSystemObject")set exc = fs.OpenTextFile(server.MapPath("excel.csv"),2,True)exc.write(excelstring)if fs.FileExists(Server.MapPath("excel.csv")) thenResponse.Write("<a href=excel.csv>报表已经生成，点击查看</a>")'Response.write(excelstring)elseResponse.Write("生成报表失败！")end ifEnd if%>调试通过！----------------------------------------------------------------------------------------------这可能是将一个html 表格变成Microsoft Excel 格式的最快方法。