為大家介紹vb.net操作excel的實現(xiàn)代碼,有需要的朋友可以參考下。
一、運行環(huán)境
(1).Windows 2000 Professional
(2)..Net Framework SDK Beta 2
(3).Microsoft Access Data Component 2.6(MADC2.6)
二、設(shè)計思路
(1).獲得要訪問的Excel文件名稱
(2).讀出Excel文件的內(nèi)容
(3).用DataGrid格式顯示出來
三、關(guān)鍵步驟
(1).為了方便,我們就把Excel文件假定在C盤的根目錄,名稱為test.xls。
(2).為了讀取Excel文件,我們必須了解一個名稱空間(NameSpace)--System.Data.Oledb。System.Data.Oledb中有三個對象分別是OleDbConnection,OleDbCommand,OledbDataAdapter。我們就是通過他們來訪問Excel文件的。
i> OleDbConnection對象主要是提供連接方式。
ii> OleDbCommand對象提供對目標(biāo)的具體操作方法。
iii>OledbDataAdapter對象是對對象進行不同操作后的返回數(shù)據(jù)集。
讀取C盤的test.xls:
(3).讀出Excel文件內(nèi)容后,就要把他用DataGrid顯示出來。
為了顯示,還要用另外一個名稱空間--System.Data,有個對象DataSet,可以和DataGrid進行數(shù)據(jù)幫定,從而以DataGrid形式顯示數(shù)據(jù)。而此時讀出的數(shù)據(jù)集并不是以對象DataSet來表現(xiàn)的,這就需要進行轉(zhuǎn)換,好在OledbDataAdapter對象提供了一個方法--Fill,可以完成轉(zhuǎn)換。
具體程序:
四、完整代碼
<%@ 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:.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>