ASP.NET读取Excel文档代码示例

显示全部楼层 · 2013-1-1 13:49:20

今日讲解一下实现思路
　一. 程序设计及运行环境

　　(1).Windows 2000 Professional

　　(2)..Net Framework SDK Beta 2

　　(3).Microsoft Access Data Component 2.6(MADC2.6)

　　二. 具体的设计思路

　　(1).获得要访问的Excel文件名称

　　(2).读出Excel文件的内容

　　(3).用DataGrid格式显示出来

　　下面就一些关键的步骤来具体说明。

　　三. 程序设计的关键步骤

　　(1).为了方便，我们就把Excel文件假定在C盘的根目录，名称为test.xls。

　　(2).为了读取Excel文件，我们必须了解一个名称空间(NameSpace)--System.Data.Oledb。System.Data.Oledb中有三个对象分别是OleDbConnection，OleDbCommand，OledbDataAdapter。我们就是通过他们来访问Excel文件的。

[C#] 纯文本查看 复制代码

　i＞ OleDbConnection对象主要是提供连接方式。

　　ii＞ OleDbCommand对象提供对目标的具体操作方法。

　　iii＞OledbDataAdapter对象是对对象进行不同操作后的返回数据集。

　　为了读取C盘的test.xls只要以下语句就可以完成：

Dim myOleDbConnection As OleDbConnection = New 
　　　OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;" & _
　　　"Data Source=c:\test.xls;" & _
　　　"Extended Properties=""Excel 8.0;""")
Dim myOleDbCommand As OleDbCommand = New OleDbCommand("SELECT * 
　　　FROM [Sheet1$]",myOleDbConnection) '如果你想读出Sheet2的内容
　　　，把Sheet1$改成Sheet2$即可
Dim myData As OledbDataAdapter= New 
　　　OledbDataAdapter(myOleDbCommand)

(3).读出Excel文件内容后，就要把他用DataGrid显示出来。为了显示，还要用另外一个名称空间--System.Data。他里面有个对象DataSet，他可以和DataGrid进行数据帮定，从而以DataGrid形式显示数据。而此时读出的数据集并不是以对象DataSet来表现的，这就需要进行转换，好在OledbDataAdapter对象提供了一个方法--Fill,可以完成转换。具体程序如下：

Dim myDataset As New DataSet()
myData.Fill(myDataset)
'完成从OledbDataAdapter对象到DataSet的转换
DataGrid1.DataSource = myDataset.Tables(0).DefaultView
DataGrid1.DataBind() '完成数据帮定，显示数据

代码展示

[HTML] 纯文本查看 复制代码

＜%@ Page Language="VB" %＞
＜%@ Import Namespace="System.Data" %＞
＜%@ Import Namespace="System.Data.Oledb" %＞ 
＜script language="VB" runat="server"＞
Sub Page_Load(sender As Object, e As EventArgs)
Dim myDataset As New DataSet()
Dim myOleDbConnection As OleDbConnection = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=c:\2.xls;" & _
"Extended Properties=""Excel 8.0;""")
Dim myOleDbCommand As OleDbCommand = New OleDbCommand("SELECT * FROM [Sheet1$]",myOleDbConnection)
Dim myData As OledbDataAdapter= New OledbDataAdapter(myOleDbCommand)

myData.Fill(myDataset)

DataGrid1.DataSource = myDataset.Tables(0).DefaultView
DataGrid1.DataBind()
End Sub
＜/script＞

＜html＞
＜head＞＜/head＞
＜body＞
＜asp:Label id="L1" runat="server"＞读取C盘根目录下的test.xls文件，并以DataGrid的形式显示出来＜/asp:label＞
＜asp:DataGrid id=DataGrid1 runat="server"/＞
＜/body＞
＜/html＞